VBA - N° de semaine en fonction d'une date

Numéro
Vba

pololow Messages postés 7 Date d'inscription Statut Membre Dernière intervention -
pololow Messages postés 7 Date d'inscription Statut Membre Dernière intervention - 25 janv. 2019 à 16:34

Bonjour,

Quelqu'un connaît le code VBA pour afficher dans une cellule (A2 par exemple) le numéro de semaine (exemple : S4) d'une date située dans une autre cellule (A1 par exemple)?

Merci d'avance :)

Afficher la suite

1 réponse

Réponse 1 / 1
f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention 1 717

Bonjour,

Pourquoi VBA, formule dans A2: ="S"&NO.SEMAINE(A1)
A vous de dire…..
0
1. pololow Messages postés 7 Date d'inscription Statut Membre Dernière intervention
  
  Parce que j'ai des conditions.
  La date peut potentiellement changer mais je souhaite conserver la semaine de la 1ère actualisation de la date.
  
  0
2. f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention 1 717
  
  Re,
  
  Ok
  je souhaite conserver la semaine
  Et ce ad vitam aeternam, quelque soit la date????
  
  0
3. pololow Messages postés 7 Date d'inscription Statut Membre Dernière intervention
  
  Oui oui
  
  0
4. f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention 1 717
  
  Re,
  Une facon de faire, a vous de voir pour declacher le code!!
  Sub Num_Sem() With Worksheets("feuil1") If .Cells(1, 1) <> "" And IsDate(.Cells(1, 1)) And .Cells(2, 1) = "" Then .Cells(2, 1) = "S" & DateDiff("w", DateSerial(Year(.Cells(1, 1)), 1, 1), .Cells(1, 1)) + 1 End If End With End Sub
  
  0
5. pololow Messages postés 7 Date d'inscription Statut Membre Dernière intervention
  
  Merci pour l'aide :)
  J'ai réussi à traffiquer quelque chose de fiable avec DatePart("ww", Date, 2, 2)
  
  0

VBA - N° de semaine en fonction d'une date

1 réponse

Discussions similaires

Newsletters