besoin d'une macro pour une tâche ennuyeuse

[fenec]

Bonjour le forum

Besoin de votre aide car même avec l’enregistreur je ne parviens pas à faire ce que je désire faire.

En fait je voudrais automatiser ma tâche qui devient à force pénible, je m’explique, chaque début de mois, je dois imprimer une feuille avec la date en « A2 » et le jour correspondant en « B2 » et ce pour le mois entier.

Y aurait-il un moyen à l’aide d’une macro d’automatiser cette tâche ?

D’avantage merci

Cordialement

 

[Victor21]

Re : besoin d'une macro pour une tâche ennuyeuse

Bonjour.

=aujourd'hui() en A2 format date
=aujourdhui() en B2 format jjjj
(sous réserve d'avoir compris...)

 

[fenec]

Re : besoin d'une macro pour une tâche ennuyeuse

Re et merci Victor

Déjà merci pour ta réponse mais j’ai su faire cela

Je vois que je n’ai pas été assez précis
Je dois en fait imprimer cette même feuille mais avec la date de chaque date et jour du mois

Exemple :
Une feuille au 01-03-2012
Une feuille au 02-03-2012
Une feuille au 03-03-2012
Etc…
Et ce tout les mois de l’année

J’espère avoir été plus précis

 

[Victor21]

Re : besoin d'une macro pour une tâche ennuyeuse

Re,

Quelque chose comme ça ?

 Sub imprime()
Dim i As Date
Dim j As Date
Dim x As Long

i = InputBox("Date de début")
j = InputBox("Date de fin")

For x = i To j
Range("A2").Value = CDate(x)
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Next x
End Sub

 

[fenec]

Re : besoin d'une macro pour une tâche ennuyeuse [ résolu ]

Bonjour le forum et Victor 21

Merci beaucoup Victor viens de tester sur une semaine c'est nickel

Encore merci pour ton aide

Cordialement

Fenec