Inversion jour et mois dans une date

M

MIB1688

XLDnaute Nouveau

• 8 Décembre 2023

• #16

en fait c'est un code que je n'ai pas créé je te rassure mais que j'avais trouvé sur internet pour que toute une colonne se mette en masjucule
et il y a une autre colonne où c'est la 1e lettre du mot qui est en majuscule

 

Vote positif 0 Vote négatif

M

MIB1688

XLDnaute Nouveau

• 8 Décembre 2023

• #17

ChTi160 à dit:

Re
Columns("M").Numberformat="d/m/yyyy"
pas sur d'avoir compris Lol

Jean marie

Cliquez pour agrandir...

super cela fonctionne !! merci
petite question au lieu d'afficher 8/4/2024 pour le 8 avril 2024 est-il possible de paramétrer pour afficher "8-avr-24" ?

 

Vote positif 0 Vote négatif

M

MIB1688

XLDnaute Nouveau

• 8 Décembre 2023

• #18

je pense avoir trouvé "d-mmm-yy"

encore merci pour ton aide cela à l'air de fonctionner

 

Vote positif 0 Vote négatif

ChTi160

XLDnaute Barbatruc

• 8 Décembre 2023

• #19

Re
Pour cela je n'ai pas vue la procédure

et il y a une autre colonne où c'est la 1e lettre du mot qui est en majuscule

Cliquez pour agrandir...

Mais il faut pour mette un Mot en Nom Propre utiliser

VB:

Set nMnP = Intersect(Target, Columns("B"))
If Not nMnP Is Nothing Then
nMnP = Application.Proper(nMnP)'On met en Nom propre la cellule trouvée
End If

ou un truc du genre

VB:

Columns("A").Value = Evaluate("PROPER(" & Columns("A").Address & ")")

Jean marie

 

Vote positif 0 Vote négatif