Bonjour,
J'utilise la boucle:
pour afficher dans la colonne "B" les jours que comprend le mois en cours (février en l'occurence) sous la forme "01D", "02L"...
La lettre derrière le chiffre désigne le jour de la semaine.
Y aurait-il un code plus "simple" pour arriver à ce même résultat ?
Par avance merci à tous,
J'utilise la boucle:
Code:
Dim i As Integer
Dim j As String
For i = 1 To Day(WorksheetFunction.EoMonth(Date, 0))
If i < 10 Then
j = "0" & i
Else
j = i
End If
Range("B" & i + 6) = j & UCase(Left(Format(i, "ddd"), 1))
Next i
pour afficher dans la colonne "B" les jours que comprend le mois en cours (février en l'occurence) sous la forme "01D", "02L"...
La lettre derrière le chiffre désigne le jour de la semaine.
Y aurait-il un code plus "simple" pour arriver à ce même résultat ?
Par avance merci à tous,