XL 2013 Modifier Format Cellule via VBA

[MACx]

Bonjour à vous,

J'ai un soucis avec mon tableau ci-joint.
Les cellules C et D apparaissent avec le coin haut gauche de couleur verte spécifiant que le format de mes cellules ne sont pas "idéales".
Je souhaite garder le format Standard pour la colonne C et le format monétaire pour la colonne D.
Pourriez-vous m'aider svp ?
Merci d'avance.

 

[phlaurent55]

Re : Modifier Format Cellule via VBA

Bonjour MACx,

pour les colonnes C & D

 Range("A1048576").End(xlUp).Offset(0, 2).Value = TextBox1.Text '= N°Facture en denière ligne colonne C
 Range("A1048576").End(xlUp).Offset(0, 3).Value = Format(TextBox2, "0,0 €") '= Montant à payer en denière ligne colonne D

à+
Philippe

 

[Paf]

Re : Modifier Format Cellule via VBA

Bonjour MACx, phlaurent55,


ou bien
= CStr(TextBox1) '= N°Facture en denière ligne colonne C
= CDbl(TextBox2) '= Montant à payer en denière ligne colonne D

A+

 

[MACx]

Re : Modifier Format Cellule via VBA

ça fonctionne!
Merci beaucoup

 

[MACx]

Re : Modifier Format Cellule via VBA

Paf,
ça ne fonctionne pas pour la colonne D

phlaurent55,
ça me le mets en format comptable alors que je voudrais le format monétaire stp... Merci

 

[Paf]

Re : Modifier Format Cellule via VBA

re,

Paf,
ça ne fonctionne pas pour la colonne D

Sans plus de précision, peut être essayer :

= CDbl(Replace(TextBox2, ".", ",")) si c'est un problème de . ou de ,

ou/et rajouter:

Range("A1048576").End(xlUp).Offset(0, 3).NumberFormat = "#,##0.00 $" si c'est un problème d'affichage; mais normalement le rajout d'une ligne dans ce type de tableau copie formules et formats.

A+

 

[MACx]

Re : Modifier Format Cellule via VBA

J'ai juste utilisé le "#,##0.00 $" et ça fonctionne
Merci