Obliger de quitter excel pour que macro March

imis -  
 imis -
Bonjour,

J'ai un petit soucis, je suis obligé de quitter excel pour que la macro qui remplis mon tableau automatiquement en recherchant la dernière ligne vide de mon tableau fonctionne. C'est pas très clair mais voilà:

Private Sub CommandButton2_Click()

Dim lig As Long
lig = Range("A65536").End(xlUp).Row
If lig < 10 Then
lig = 10
Else: lig = lig + 1
End If

With Sheets("Feuil4")
.Cells(lig, 1) = TextBox2
.Cells(lig, 2) = TextBox1
.Cells(lig, 3) = TextBox3
.Cells(lig, 4) = TextBox4
.Cells(lig, 5) = TextBox5
.Cells(lig, 6) = TextBox6
.Cells(lig, 9) = TextBox7
.Cells(lig, 7) = TextBox8
.Cells(lig, 8) = TextBox9
.Cells(lig, 10) = TextBox10
.Cells(lig, 11) = TextBox11
.Cells(lig, 12) = TextBox12
.Cells(lig, 13) = TextBox13
.Cells(lig, 14) = TextBox14
.Cells(lig, 15) = TextBox15
.Cells(lig, 16) = TextBox16
.Cells(lig, 18) = TextBox17
End With
Unload UserForm4
End Sub

Et ce code fonctionne à merveille mais je suis obligé de quitter excel, réouvrir, resaisir pour que cela fonctionne autrement si j'execute le programme sans quitter excel bah les nouvelles données effacent les précedentes :(
(Ah oui je suis débutant alors les termes "macro" et "code" ne sont peut être pas utilisés correctement dsl)
MERCI D'AVANCE
A voir également:

1 réponse

imis
 
j'ai beau chercher je ne trouve pas :( . Si une âme généreuse pouvait m'aider ce ne serait pas de refus.
J'ai essayé d'effacer tous le contenue de mes textbox mais sans résultat. Pourtant il fonctionne super bien, mais vous me l'accorderez ce n'est pas top de quitter excel pour pouvoir saisir une autre ligne.

MERCI D'AVANCE
0