Affichage d'un calendrier en fonction de la date

[Margouillats974]

Bonjour à tous,

J'essaie de mettre un planning en place très simple. J'aimerais juste qu'il s'affiche avec la semaine en cours à l'écran.
Etant une bille, je viens solliciter votre aide.
Merci d'avance.

 

[James007]

Re : Affichage d'un calendrier en fonction de la date

Bonjour,

Tu n'as qu'à modifier ta cellule D2 ... et y inscrire
=Aujourdhui()

A+

 

[JCGL]

Re : Affichage d'un calendrier en fonction de la date

Bonjour à tous,

Peux-tu essayer ce fichier ?
Utilisation de :

Option Explicit

Sub Ouvre_Semaine()
With Sheets("Matériel")
.Cells(2, CDbl(Format(Date, "dd")) - 4).Select
End With
End Sub

Comme il n'y a pas de Samedi et Dimanche j'ai du composer
J'ai placé dans le _Open mais tu peux déposer dans le _Activate de la feuille

A+