je désire copier une feuille excel sous un autre nom et fermer ce fichier. voici mon code :
val = "" val = Worksheets("Fiche Bid_NoBid" ).Cells(4, 2).Value 'sauvegarde de la feuille Bid no bid 'transférer la feuille dans un autre classeur Worksheets("Fiche Bid_NoBid" ).Select Worksheets("Fiche Bid_NoBid" ).Copy ActiveWorkbook.SaveAs Filename:= _ "C:\toto\" & val, _ Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _ CreateBackup:=False
ActiveWorkbook.Close
-------------
mon souci : ma feuille est bien enregistrée la premiere fois mais quand je demande de réécraser le classeur j'ai dr watson qui me mets une erreur... que dois-je faire????
Marsh Posté le 27-08-2002 à 20:10:10
je désire copier une feuille excel sous un autre nom et fermer ce fichier.
voici mon code :
val = ""
val = Worksheets("Fiche Bid_NoBid" ).Cells(4, 2).Value
'sauvegarde de la feuille Bid no bid
'transférer la feuille dans un autre classeur
Worksheets("Fiche Bid_NoBid" ).Select
Worksheets("Fiche Bid_NoBid" ).Copy
ActiveWorkbook.SaveAs Filename:= _
"C:\toto\" & val, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
ActiveWorkbook.Close
-------------
mon souci : ma feuille est bien enregistrée la premiere fois mais quand je demande de réécraser le classeur j'ai dr watson qui me mets une erreur...
que dois-je faire????