Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

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.
 

Pièces jointes

  • FormatCellule_MACx01.xlsm
    27.6 KB · Affichages: 40

phlaurent55

Nous a quittés en 2020
Repose en paix
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+
 

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+
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…