Bonjour,
J'ai un tableau avec des saisies de données ci-dessous (je cache les données pour un point de vue de confidentialité.
Mon objectif est de faciliter la saisie en utilisant un userform :
Le code associé à cet userform est le suivant :
Private Sub CommandButton1_Click()
Dim TB As Variant, LR& 'définit les variable
With Worksheets("Arrêts")
LR = .Cells(.Rows.Count, 4).End(xlUp).Row + 1
.Cells(LR, 4) = ListeLignes
.Cells(LR, 5) = ListeInstallations
.Cells(LR, 6) = ListePannes
.Cells(LR, 7) = ListeServices
.Cells(LR, 9) = Date_début
.Cells(LR, 10) = TextDurée
.Cells(LR, 12) = TextCommentaires
End With
MsgBox "Export terminé", vbInformation 'message après le collage réussi
End Sub
La copie des données dans la feuille de calcul fonctionne, mais le problème est que les données sont collées en ligne 1399 (la ligne 1398 donne des résultats de moyenne en fonction des valeurs saisies plus haut), mais je voudrais qu'elles soient collées à la suite des valeurs saisies, donc ligne 256, 257, 258, etc...
Est-ce que cela est possible, ou bien je dois retirer la ligne 1399 (en la retirant ca colle bien ligne 256) ?
Si nécessaire je peux faire un fichier "test" ...
Merci par avance pour votre aide !
Cdlt,