Formatage cellule

CMoa · 5 Février 2008

Bonjour à tous
Comment peut-on formater toute une colonne en lui imposant un format précis de date.
avec l'enregistreur de macro ;j'ai obtenu ceci :

Code:

Range("A12").Select
    ActiveCell.FormulaR1C1 = "4-Dec-2007"
    Range("A12").Select
    Selection.NumberFormat = "dd/mm/yy"
    Range("A16").Select

et j'aimerais si possible l'étendre en reprenant la date figurant dans la cellule.
Merci pour votre aide.

Staple1600 · 5 Février 2008

Re : Formatage cellule

Bonjour CMoa

A tester
Range("A1:A" & [a65536].End(xlUp).Row).NumberFormat="dd/mm/yy"

edit: bonjour Wilfried

wilfried_42 · 5 Février 2008

Re : Formatage cellule

bonjour

un exemple sur toute la colonne B

Range("B:B").NumberFormat = "dd mmmm yyyy"

Edit : oups collision, bonjour jean-marie

jmd2 · 5 Février 2008

Re : Formatage cellule

Bonjour

ma question : pourquoi une macro, et pas un formatage "clic droit, format de cellule" ?

CMoa · 5 Février 2008

Re : Formatage cellule

Bonjour staple1600;wilfried_42;le Forum
Merci pour ces 2 solutions qui fonctionnent parfaitement sur des cellules "manuscrites" mais hélas là elles sont copiées par macro et j'ai cru à tort que ça venait de la macro .
je pense que je vais abandonner ce projet par manque de solution.
En tout cas merci à tous les 2 et particulièrement à staple 1600 qui à passé une bonne partie de la nuit dernière à essayer de trouver une solution.
Bonne journée

Formatage cellule

CMoa

XLDnaute Occasionnel

Staple1600

XLDnaute Barbatruc

wilfried_42

XLDnaute Barbatruc

jmd2

XLDnaute Accro

CMoa

XLDnaute Occasionnel

Discussions similaires