Discussion :

[nattalia]

Bonjour

Je suis novice en VBA (merci à Daniel pour son aide)

J'aurais besoin d'aide pour voir pourquoi :

- Lorsque je valide mes saisies, elles se mettent bien en place (sauf la première saisie), puis quand je passe au formulaire suivant, je retourne sur ma première ligne ?
- Ma colonne Geste add. se met sur la ligne 2 alors que je l'ai remplie lors d'une autre saisie (ligne 6).

Merci

Nat

[Docmarti]

Bonjour


Avant d'écrire les données, tu pourrais à chaque fois déterminer la dernière ligne utilisée grâce à une fonction bien connue que tu peux adapter à tes besoins:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 Ligne = derniereLigne
 
If CheckBox1.Value Then
    Cells(Ligne, "J").Value = 1
End If
...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Function derniereLigne()
rRange = "A:N"
Set f = ActiveSheet
 
Set cel = f.Range(rRange).Find("*", , LookIn:=xlFormulas, SearchOrder:=xlByRows, SearchDirection:=xlPrevious)
If Not cel Is Nothing Then
 derniereLigne = cel.Row + 1
Else
 derniereLigne = 2
End If
End Function

Cordialement

Docmarti

[spookyz]

Bonsoir à tous,
pour le problème de geste,date et numero formulaire tu devras aussi adapter le code de docmarti

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
Private Sub TextBox1_Change()
'ici tu assigne un adresse de cellule précise
[A2] = TextBox1
End Sub
'ici tu assigne un adresse de cellule précise
Private Sub TextBox2_Change()
[B2] = TextBox2
End Sub
'ici tu assigne un adresse de cellule précise
Private Sub TextBox3_Change()
[N2] = TextBox3
End Sub

cordialement