XL 2013 Modifier Format Cellule via VBA

MACx

XLDnaute Occasionnel
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.
 

Fichiers joints

phlaurent55

XLDnaute Barbatruc
Re : Modifier Format Cellule via VBA

Bonjour MACx,

pour les colonnes C & D

Code:
 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

XLDnaute Barbatruc
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

XLDnaute Occasionnel
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

XLDnaute Barbatruc
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+
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas