taille de caractères dans colonne

[pancaspremium]

bonjour
j'essaie de trouver la phrase magique à insérer dans mon exemple ci-dessous que tous les caractères se trouvant dans la colonne F
aient la taille 8 en Font. Qui peux m'aider MERCI A TOUS


Private Sub Worksheet_Activate()
ThisWorkbook.RefreshAll
Range("f1").ColumnWidth = 40
With Columns("f:f")
.NumberFormat = "0"
.HorizontalAlignment = xlRight


End With


End Sub

 

[tototiti2008]

Re : taille de caractères dans colonne

Bonjour pancaspremium,

connais-tu l'enregistreur de macros ?
Pour ce type de demande, ça te permet facilement de voir comment l'écrire

 

[ERIC S]

Re : taille de caractères dans colonne

Bonjour

dans ce genre de problème pense à utiliser l'enregistreur de macro

cela te donne un code brut, dans ton cas

Columns("F:F").Select
With Selection.Font
.Name = "Arial"
.Size = 8
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With

tu peux en déduire que .font.size doit pouvoir résoudre ton pb


edit : bonjour tototiti

 

[pancaspremium]

Re : taille de caractères dans colonne

bjr je crois m'être mal exprimé et vous remercie pour vos conseils, je connais l'enregistreur automatique, mais dans mon cas
le code ou instruction doit être inséré dans le nom de l'onglet avec clic droit 'visualiser le code' et c'est la que je veux que la taille soit de 8
merci

 

[tototiti2008]

Re : taille de caractères dans colonne

Bonjour Eric 🙂,
Re,

Mais au contraire, je crois qu'on a compris, tu enregistres un macro (Eric l'a même fait pour toi)
tu regardes la ligne correspondante à la taille des caractères (donc bien .Font.Size = 8)
et tu la retapes (ou la copies) dans ta macro évènementielle d'activation de ta feuille
Ou alors je n'ai vraiment rien compris ?

 

[pancaspremium]

Re : taille de caractères dans colonne

ok c'est bon ça marche
merci pour votre aide