Discussion :

[_developpeur_]

Bonjour,
Je tente de formater une colonne excel en format nombre depuis Access.
Après avoir fait une recherche, j'ai trouvé la fonction numberformat

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
 xlSheet.Columns("T").NumberFormat = "General"

J'exécute le code, et ensuite j'ouvre le fichier, click droit sur une des cellules de la colonne T, le format est standard au lieu d'être en nombre comme demandé
Savez-vous pourquoi ?
Merci

[Frank]

Voilà ce que je fais personnellement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

xlSheet.Columns("T").NumberFormat  = "0"

[_developpeur_]

Oui merci mais ça c'est personnalisé.
Moi je voudrais le format nombre de Excel. Et puis je peux avoir plusieurs chiffres après la virgule, je ne sais comment spécifier cela ?
Merci

[batou22003]

Tu dis avoir fait une recherche.
En fait, tu n'as pas besoin d'en faire une.
Ce que tu fais, c'est que dans Excel, tu utilises l'enregistreur de Macro au préalable, tu fais l'opération que tu souhaites (soit changer le format d'une cellule...) , tu stoppes la macro.
Après tu vas sur modifier macro, et tu regardes quel code est généré.

Il ne te reste plus qu'à l'adapter pour Access.
Tu m'en diras des nouvelles.

[Frank]

Tu dis avoir fait une recherche.
En fait, tu n'as pas besoin d'en faire une.
Ce que tu fais, c'est que dans Excel, tu utilises l'enregistreur de Macro au préalable, tu fais l'opération que tu souhaites (soit changer le format d'une cellule...) , tu stoppes la macro.
Après tu vas sur modifier macro, et tu regardes quel code est généré.

Il ne te reste plus qu'à l'adapter pour Access.
Tu m'en diras des nouvelles.

+1

[batou22003]

petit rappel: Dans Excel, tu vas sur la cellule, clic droit, format de
la cellule.
Tu choisis Nombre et nombre de décimal =2.

Grace au générateur de macro tu obtiens:

Selection.NumberFormat = "0.00"

Adapte pour ton code.

[Frank]

petit rappel: Dans Excel, tu vas sur la cellule, clic droit, format de
la cellule.
Tu choisis Nombre et nombre de décimal =2.

Grace au générateur de macro tu obtiens:

Selection.NumberFormat = "0.00"

Adapte pour ton code.

En clair, en cherchant un peu par toi-même au lieu d'attendre la solution à ton problème, tu aurais adapté mon code pour ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

xlSheet.Columns("T").NumberFormat  = "0.00"

[_developpeur_]

OK ça marche merci.