Tom's Guide > Forum > Programmation > Macro de sauvegarde

Macro de sauvegarde

Forum Programmation : Macro de sauvegarde

TomsGuide.com : 800 000 inscrits répondent à toutes vos questions high-tech et informatique. Pour obtenir de l'aide, inscrivez-vous gratuitement !
Mot :    Pseudo :           
 

Je souhaite enregistrer une feuille de calcul aprés remplissage dans un fichier J'ai écrit la macro suivante mais ça bug au niveau de (xx): Range("A1:Q54" ).Select Range("Q54" ).Activate Selection.Copy ChDir "C:\VERIFICATION\TRANS" Workbooks.Open Filename:="C:\VERIFICATION\TRANS\MASQUESCONSTAT.xlt" ActiveSheet.Paste Application.CutCopyMode = False numan = Format(Date, "yy" ) numj = Format(Date, "dd" ) nummois = Format(Date, "mm" ) numt = ActiveSheet.Range("G48" ).Cells ChDir "C:\VERIFICATION\TRANS\" & nomtech ActiveWorkbook.SaveAs Filename:="C:\VERIFICATION\TRANS\" & nomtech & "\" & "C" & numan & numj & nummois & numt & ".xls", _ (xx) FileFormat:=xlNormal, Password:="", WriteResPassword:="", _ ReadOnlyRecommended:=False, CreateBackup:=False ActiveWindow.Close ActiveWindow.SmallScroll Down:=-24 Range("A20" ).Select Avez-vous une solution

Liens sponsorisés
Inscrivez-vous ou connectez-vous pour masquer ceci.
Tom's Guide > Forum > Programmation > Macro de sauvegarde
Aller à :

Il y a 973 utilisateurs connus et inconnus. Pour voir la liste des connectés connus, cliquez ici.

Liens