Ce programme :
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Lig As Long
If Target.Columns.Count = Application.Columns.Count Then 'Si j'insère une ligne, alors [...]
Exit Sub ' [...] je quitte ma macro
End If
If Not Intersect(Target, Columns("E:E")) Is Nothing Then
Lig = 1
Do While Not IsEmpty(Range("A" & Lig))
Lig = Lig + 1
Loop
Range("A" & Lig).Select
End If
End Sub
Reviens au même que celui la :
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Lig As Long
If Not Intersect(Target, Columns("E:E")) Is Nothing Then
Lig = 1
Do While Not IsEmpty(Range("A" & Lig))
Lig = Lig + 1
Loop
Range("A" & Lig).Select
End If
End Sub
Les deux programme font la même chose c'est à dire qu'il revienne à la ligne en colonne A quand je rentre ma valeur en colonne E.
Cependant, moi, je souhaiterai additionner un des deux programme avec lui même afin que ça fasse exactement la même chose mais EN PLUS en colonne D. Donc en gros il me fasse un retour à la ligne dans la colonne A quand celle-ci est vide quand je rentre une valeur dans La colonne D et ensuite aussi quand je rentre une valeur dans la colonne E
Ai-je été clair ?