Macro date

[khenty]

Bonjour,

* J'aimerais savoir si il est possible de trouver le numéro de la semaine de l'année à partir d'une date et inversement.

exemple : 1/04/2011 donne la semaine 14 et à l'inverse semaine 14 donne la date...


* De plus, peut on demander à Excel de supprimer des données non protégées sur une page qui contient des données protégées. Si oui quel programme peut-on créer avec VB ?

Merci 🙂

 

[Efgé]

Re : Macro date

Bonjour khenty,
Pour trouver la semaine par rapport à une date:

Sub Test()
Dat = "01/04/2011"
MsgBox "Semaine = " & Format(Dat, "WW")
End Sub

Pour vider les cellules non protégées:

Sub Test2()
For Each C In Sheets("Feuil1").UsedRange
    If C.Locked = False Then C.ClearContents
Next C
End Sub

Pour trouver la date par rapport à la semaine, je ne sais pas 😡.
Cordialement

 

[Efgé]

Re : Macro date

Re
Pour trouver la date par rapport à la semaine regarde Ce Fil
Cordialement

 

[ROGER2327]

Re : Macro date

Bonjour à tous

On peut jeter un œil ici (entre autres…)

ROGER2327
#5222

Dimanche 15 Palotin 138 (Capture du Fourneau, ST)
15 Floréal An CCXIX
2011-W18-3T12:42:43Z

 

[khenty]

Re : Macro date

Un grand merci à tous grâce à votre aide j'ai réussi à créer mes macros 🙂