Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel couleur automatique

couleur automatique

3 réponses
Avatar
David
Bonjour,

Sous VBA, après avoir coloré quelques
cellules en utilisant ce type de commande :

MaFeuille.Cells(10, 5).Interior.ColorIndex = 6 'jaune

Comment faire pour que toutes les cellules
retrouvent leur couleur d'origine (blanc)
d'un coup d'un seul ?

a+
Jean-Pol DAVID
ICQ 28394733
--
Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ? Quomodo ? Quando ?
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Nicolas B.
Salut David,

Sheets("MaFeuille").Cells.Interior.ColorIndex = xlNone


A+
--
Nicolas B.

Adresse @adresse.bidon.com invalide,
E-mail : www.cerbermail.com/?gAAILfkPsC


Bonjour,

Sous VBA, après avoir coloré quelques
cellules en utilisant ce type de commande :

MaFeuille.Cells(10, 5).Interior.ColorIndex = 6 'jaune

Comment faire pour que toutes les cellules
retrouvent leur couleur d'origine (blanc)
d'un coup d'un seul ?

a+
Jean-Pol DAVID
ICQ 28394733
--
Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ? Quomodo ? Quando ?


Avatar
Philippe.R
Bonjour David,
Ceci convient il ?

Sub pascouleur()
With UsedRange
MaFeuille.Cells.Interior.ColorIndex = xlNone
End With
End Sub

--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"David" a écrit dans le message de news:40420260$0$317$
Bonjour,

Sous VBA, après avoir coloré quelques
cellules en utilisant ce type de commande :

MaFeuille.Cells(10, 5).Interior.ColorIndex = 6 'jaune

Comment faire pour que toutes les cellules
retrouvent leur couleur d'origine (blanc)
d'un coup d'un seul ?

a+
Jean-Pol DAVID
ICQ 28394733
--
Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ? Quomodo ? Quando ?




Avatar
David
"Nicolas B." de son plus beau stylet à gravé dans le marbre
Salut David,
Sheets("MaFeuille").Cells.Interior.ColorIndex = xlNone
Nicolas B.



Bonjour Nicolas,

"Et même que ca marche!"
Un grand merci.

a+
Jean-Pol DAVID
mailto:
ICQ 28394733
--
Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ? Quomodo ? Quando ?