nommer champs de cellules

bansan

XLDnaute Junior
Bonjour,
je cherche a faire une macro qui nomme les champs de mes cellules de octobre07 à octobre08 automatiquement
Cependant, je ne trouve pas le moyen d'enlever le "20" quand j'utilise Year
car j'aimerais que mes cellules soient nommer octobre07 et non octobre2007
Merci

Sub test_ii()
Dim esso As Date
esso = [C2]
annee = Year(esso)

MsgBox MonthName(Month(esso)) & annee
End Sub
 

bansan

XLDnaute Junior
Re : nommer champs de cellules

Je ne comprend pas pourquoi ma macro ne marche pas
alors que je l'ai fait a partir d'une macro automatique que l'ordi a fait lui meme

Sub tester()

Range("F3").Select
ActiveWorkbook.Worksheets("Paiement Immediat").Names.Add Name:="test", _
RefersToR1C1:="='Paiement Immediat'!R3C6"
ActiveWorkbook.Worksheets("Paiement Immediat").Names("test").Comment = ""
End Sub
 

Discussions similaires

Réponses
1
Affichages
1 K

Statistiques des forums

Discussions
312 896
Messages
2 093 387
Membres
105 716
dernier inscrit
jrmdprt