creation d'un formulaire

[yomenb]

slut equipe

le suis debutant en vba mon problème est le suivant
dans le formunaire si joint, je veux renvoyer les données de la feuille "cahier" dans la feuille consolidation
et je veux que les cellules de la feuille cahier soient vide a la fin de l'operation
lors ce que j'execute la macro les données sont bien renvoyées dans la feuille consolidation mais la feuille feuille cahier ne se mais pas a blanc automatiquement
par aillieur je resoit le message "erreur d'execution '424': odjet requis"

voici le code

Sub test()
ligne = Sheets("consolidation").[B650000].End(xlUp).Row + 1
With Sheets("consolidation")
.Cells(ligne, 1) = Sheets("cahier").[A2]
.Cells(ligne, 2) = Sheets("cahier").[B2]
.Cells(ligne, 3) = Sheets("cahier").[C2]
.Cells(ligne, 4) = Sheets("cahier").[D2]
.Cells(ligne, 5) = Sheets("cahier").[E2]
End With
[saisie].ClearContents
End Sub

je compte sur votre experience merci

 

[phlaurent55]

Re : creation d'un formulaire

Bonjour yomenb, et bienvenue sur le forum

l'erreur est ici je présume:
[saisie].ClearContents


c'est normal parce que saisie n'est pas défini
à remplacer par:
[A2:E2].ClearContents

à+
Philippe

 

[yomenb]

Re : creation d'un formulaire

SA MARCHE merci mon grand