Format pour une colonne en VB

[Thierry]

Bonjour,

je souhaite en VB assigner le format pourcentage avec 2 décimales à toute une colonne ou le format numérique sans décimale avec séparateur de milliers.

Comment je m'y prends ? Je n'arrive pas à exploiter correctement l'aide en ligne VB pour trouver la solution

Worksheets(nom).Range(A1:A10).?????? = ??????
ou autre chose

Merci pour le coup de main.

Thierry

 

[myDearFriend!]

Bonjour Thierry, le Forum.

Voici comment faire Thierry (grâce à l'enregistreur de macro) :
[ol][li]Menu Outils/Macros/Nouvelle Macro...[/li]
[li]Choisir Enregistrer la macro dans : 'Ce classeur'[/li]
[li]Sélectionner la plage A1:A10[/li]
[li]Puis, menu Format/Cellules... onglet Nombre : choisir pourcentage et régler Nombre de décimales à   2.[/li]
[li]Puis, menu Outils/Macros/Arrêter l'enregistrement.[/li]
[li]Ensuite tu fais ALT+F11 pour accéder à l'éditeur VBE et dans Module1 tu trouveras le code ci-dessous :

Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 01/09/2005 par XXXX
'
      Range('A1:A10').Select
      Selection.NumberFormat = '0.00%'
End Sub

[/li]
[li]Tu obtiens ainsi le code souhaité.[/li][/ol]
Et si tu veux améliorer un peu ce code (la sélection de cellule n'étant pas obligatoire pour modifier cette dernière par VBA), tu peux le mettre sous cette forme :

Worksheets(nom).Range('A1:A10').NumberFormat = '0.00%'

Cordialement,

 

[Hervé]

Bonjour thierry, le forum

Dans ces cas, j'utilise l'enregistreur de macro, qui me donne :

Sub Macro2()
'
' Macro2 Macro
' Macro enregistrée le 01/09/2005 par Compaq_Propriétaire
'

'
    Range('E11').Select
    Selection.NumberFormat = '0.00%'
    Range('E12').Select
    Selection.NumberFormat = '#,##0'
End Sub

et j'adapte le code à mon point précis :

Sub Bouton2_QuandClic()
Worksheets('Feuil1').Range('A1:A10').NumberFormat = '0.00%'
Worksheets('Feuil1').Range('B1:B10').NumberFormat = '#,##0'
End Sub

Au moins je suis sur de la synthaxe;

salut

 

[Hervé]

re thierry, bonjour didier

je vois qu'on à le meme professeur.

désolé pour la collision.

salut

 

[myDearFriend!]

Salut Hervé,

Pas de problème... au moins notre ami Thierry verra que l'aide VBA ainsi que l'enregistreur de macro sont des compagnons indispensables...

A+