Je rencontre un pb quand je nomme et enregistre le classeur 1 : " & Ran
Bonjour le Forum
Voila apres qques recherches sur le fil, j'ai reussi à reunir en 1 seul classeur (classeur 1)plusieurs classeurs(classeur 2, classeur 3...)- le nombre de classeurs ouverts est variable
Je rencontre un pb quand je nomme et enregistre le classeur 1 : " & Range("A1").Value, FileFormat:= _
Voici ma macro
Windows("Classeur1").Activate
Sheets("bul").Select
Sheets("bul").Name = "bul1"
ActiveCell.Offset(7, 0).Range("A1:F1").Select
ActiveWorkbook.Save
Windows("Classeur2").Activate
ActiveWindow.WindowState = xlNormal
Sheets("bul").Select
Sheets("bul").Move Before:=Workbooks("Classeur1").Sheets(1)
Windows("Classeur1").Activate
ActiveWindow.WindowState = xlMaximized
ActiveCell.Select
Application.CutCopyMode = False
ChDir "\\Colbert\Labo2\MICROBIOLOGIE\base de données\FAX DUCA"
ActiveWorkbook.SaveAs Filename:= _
"\\Colbert\Labo2\MICROBIOLOGIE\base de données\FAX DUCA\" & Range("A1").Value, FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
Debut des problemes
Windows("Classeur3").Activate
ActiveWindow.WindowState = xlNormal
Sheets("bul").Select
Sheets("bul").Move Before:=Workbooks("Classeur1").Sheets(1) forcement "classeur1" n'est plus reconnu et je ne sais pas comment faire
Windows("Classeur4").Activate
ActiveWindow.WindowState = xlNormal
Sheets("bul").Select
Sheets("bul").MMove Before:=Workbooks("Classeur1").Sheets(1)
Merci pour votre aide