[Visual Basic] Problème d'active workbook
Fermé
Help :)
-
25 mars 2009 à 08:48
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 - 25 mars 2009 à 09:29
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 - 25 mars 2009 à 09:29
A voir également:
- [Visual Basic] Problème d'active workbook
- Visual basic - Télécharger - Langages
- Microsoft 365 basic - Guide
- Microsoft visual c++ runtime - Guide
- Visual petanque - Télécharger - Sport
- Visual paradigm - Télécharger - Gestion de données
2 réponses
Polux31
Messages postés
6917
Date d'inscription
mardi 25 septembre 2007
Statut
Membre
Dernière intervention
1 novembre 2016
1 204
25 mars 2009 à 09:07
25 mars 2009 à 09:07
bonjour,
Voilà une procédure qui reçoit une date en paramètre d'entrée et sauvegarde le fichier sous le format : "Commande_Global_mm_yyyy.xls":
Voilà une procédure qui reçoit une date en paramètre d'entrée et sauvegarde le fichier sous le format : "Commande_Global_mm_yyyy.xls":
Sub SaveXL(ByVal mDate As Date) Dim nameXL As String If mDate = "" Then Exit Sub 'si le paramètre d'entrée est vide, on sort de la procédure nameXL = DatePart("m", mDate) 'on récupère le mois de la date 'Si 1 digit on passe sur 2 digits. If Len(nameXL) = 1 Then nameXL = "0" & nameXL nameXL = "Commande_Global_" & nameXL & "_" & DatePart("yyyy", mDate) & ".xls" ThisWorkbook.SaveAs (nameXL) End Sub
Polux31
Messages postés
6917
Date d'inscription
mardi 25 septembre 2007
Statut
Membre
Dernière intervention
1 novembre 2016
1 204
25 mars 2009 à 09:29
25 mars 2009 à 09:29
de rien,
Bonne continuation
;o)
Bonne continuation
;o)
25 mars 2009 à 09:11