N
naidinp
Guest
Bonjour a tous,
Voila j'ai ce macro qui normalement il doit copier une selection de la feuille active du classeur A vers le classeur B mais rien a faire il ne veut pas marcher j'ai l'erreur d'execution 1004 "Erreur definie par l'application ou par l'objet".
Comme je suis debutant VBA je ne sais pas comment faire ?
Sub enregis()
Sheets("modele").Range("sauve").Select
Sheets("modele").Range("sauve").Copy
Dim repertoire As String
Dim fichier As String
repertoire = "g:\facturev2.2\archive"
fichier = Sheets("modele").Range(H4)
fichier = repertoire & fichier
ActiveWorkbook.SaveAs Filename:=archive.xls
ActiveWindow.Close
End Sub
merci d'avance pour votre aide
Voila j'ai ce macro qui normalement il doit copier une selection de la feuille active du classeur A vers le classeur B mais rien a faire il ne veut pas marcher j'ai l'erreur d'execution 1004 "Erreur definie par l'application ou par l'objet".
Comme je suis debutant VBA je ne sais pas comment faire ?
Sub enregis()
Sheets("modele").Range("sauve").Select
Sheets("modele").Range("sauve").Copy
Dim repertoire As String
Dim fichier As String
repertoire = "g:\facturev2.2\archive"
fichier = Sheets("modele").Range(H4)
fichier = repertoire & fichier
ActiveWorkbook.SaveAs Filename:=archive.xls
ActiveWindow.Close
End Sub
merci d'avance pour votre aide