Discussion :

[chrnoe]

bonjour à tous,

Je voudrais savoir si il est possible avec un bouton d'ouvrir un fichier référencé au mois?

c'est à dire que mon fichier peut s'appeler

fichier 01.xls (pour janvier)
fichier 02.xls (pour fevrier)
fichier 03.xls (pour mars)
...ainsi de suite

je voudrais savoir si un seul bouton peut ouvrir le fichier du mois en cours par rapport au calendrier windows?

Merci d'avance.

[alsimbad]

salut
essaye ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Sub test()
MsgBox (Month(Date))
nomfichier = "fichier" & Month(Date) & ".xls"
MsgBox nomfichier
End Sub

[chrnoe]

bonjour,

Je voudrais ensuite ouvrir le fichier qui ce trouve dans le msgBox j'ai essayé ceci mais il ne fonctionne pas.

est ce que j'ai fait une betise?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub CommandButton2_Click()
'MsgBox (Month(Date))
nomfichier = "T:\travail\Suivi-heures\Gestion-HEURES-CN-2009-0" & Month(Date) & ".xls"
MsgBox nomfichier
Application.Workbooks.Open "nomfichier"
End Sub

Merci d'avance.

[AlainTech]

mais il ne fonctionne pas.

C'est vraiment trop de dire ce qui ne fonctionne pas?