gildas lechat
XLDnaute Occasionnel
Bonjour le forum,
Vous trouverez ci dessous un extrait de macro qui consite a copier des valeurs saisie dans un Userform à la fois sur un tableau ( Sheet "enregistrement") faisant partie du fichier où est enregistré la macro et sur la feuille ( Sheet " Imp020") faisant partie du fichier "Imp063.xls" auparavent ouvert.
Je n'arrive pas à préciser la copie des valeurs de l'userform dans la feuille "Imp020" faisant partie du fichier "Imp063.xls" auparavent ouvert.
( erreur en rouge sur la macro)
Pouvez vous m'aider?
Merci d'avance
Vous trouverez ci dessous un extrait de macro qui consite a copier des valeurs saisie dans un Userform à la fois sur un tableau ( Sheet "enregistrement") faisant partie du fichier où est enregistré la macro et sur la feuille ( Sheet " Imp020") faisant partie du fichier "Imp063.xls" auparavent ouvert.
Je n'arrive pas à préciser la copie des valeurs de l'userform dans la feuille "Imp020" faisant partie du fichier "Imp063.xls" auparavent ouvert.
( erreur en rouge sur la macro)
Pouvez vous m'aider?
Merci d'avance
Private Sub CommandButton1_Click()
LIG = Sheets("Enregistrement").UsedRange.Rows.Count + 1
With Sheets("Enregistrement")
.Cells(LIG, 1).Value = TextBox8.Value
.End With
ChDir "\\ML350\Qualite\Revue de premier article\Dossier RPA vierge"
Workbooks.Open Filename:= _
"\\ML350\Qualite\Revue de premier article\Dossier RPA vierge\Imp063.xls"
With Sheet.("Imp20")
.Cells(3, 10) = TextBox5.Text
End With
End Sub