J
Jean
Guest
Bonjour à tous
Voici ce que je voudrais réussir à faire:
A) faire un USF (ça je suis capable)
B) y placer un combobox avec le nom de tous les mois (ça je suis capable)
C) choisir un mois et ajouter le nom de ce mois au début du nom d'un dizaine de fihciers excel que je dois sauvegarder après chaque mois (ça je n'y arrive pas).
Exemple: janvierclasseur1.xls
janvierclasseur2.xls
Voici le code pour le usf:
Private Sub UserForm_Initialize()
Dim Mois(1 To 12) As String
Dim i As Integer
For i = 1 To 12
Mois(i) = Format(DateSerial(1, i, 1), "mmmm")
Me.ComboBox1.AddItem Mois(i)
Next i
End Sub
Merci pour votre aide
Jean
Voici ce que je voudrais réussir à faire:
A) faire un USF (ça je suis capable)
B) y placer un combobox avec le nom de tous les mois (ça je suis capable)
C) choisir un mois et ajouter le nom de ce mois au début du nom d'un dizaine de fihciers excel que je dois sauvegarder après chaque mois (ça je n'y arrive pas).
Exemple: janvierclasseur1.xls
janvierclasseur2.xls
Voici le code pour le usf:
Private Sub UserForm_Initialize()
Dim Mois(1 To 12) As String
Dim i As Integer
For i = 1 To 12
Mois(i) = Format(DateSerial(1, i, 1), "mmmm")
Me.ComboBox1.AddItem Mois(i)
Next i
End Sub
Merci pour votre aide
Jean