Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Couleurs§§§

3 réponses
Avatar
Francis
Bonsoir à Tous

Quelle est la formule ne VBA pour
donner l'ordre à Excel de colorier
la cellule A1 par exemple en fond Rouge
(With Selection.Interior.ColorIndex=3.Pattern=xlSolid.PatternColorIndex =
xlAutomatic)

Merci et bonne soirée

3 réponses

Avatar
JPMonnier
Bonjour,
La procédure est celle-ci, a savoir à quel moment tu veux qu'elle se lance
Sub Coul()
[a1].select
With Selection.Interior
.ColorIndex = 3
.Pattern = xlSolid
End With
End Sub
--
Cordialement


Francis" a écrit dans le message de
news:48d67b3d$0$10412$
Bonsoir à Tous

Quelle est la formule ne VBA pour
donner l'ordre à Excel de colorier
la cellule A1 par exemple en fond Rouge
(With Selection.Interior.ColorIndex=3.Pattern=xlSolid.PatternColorIndex =
xlAutomatic)

Merci et bonne soirée



Avatar
Philippe.R
Bonsoir,
Le code cité le fera, pour peu que la cellule A1 soit sélectionnée et que 3
soit l'index de la couleur rouge dans la palette de l'application.
Sinon, à tous coup :
Range("a1").Interior.Color = vbRed
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"Francis" a écrit dans le message de
news:48d67b3d$0$10412$
Bonsoir à Tous

Quelle est la formule ne VBA pour
donner l'ordre à Excel de colorier
la cellule A1 par exemple en fond Rouge
(With Selection.Interior.ColorIndex=3.Pattern=xlSolid.PatternColorIndex =
xlAutomatic)

Merci et bonne soirée



Avatar
Francis
Merci Jp ;0))


"JPMonnier" a écrit dans le message de news:
%
Bonjour,
La procédure est celle-ci, a savoir à quel moment tu veux qu'elle se lance
Sub Coul()
[a1].select
With Selection.Interior
.ColorIndex = 3
.Pattern = xlSolid
End With
End Sub
--
Cordialement


Francis" a écrit dans le message de
news:48d67b3d$0$10412$
Bonsoir à Tous

Quelle est la formule ne VBA pour
donner l'ordre à Excel de colorier
la cellule A1 par exemple en fond Rouge
(With Selection.Interior.ColorIndex=3.Pattern=xlSolid.PatternColorIndex =
xlAutomatic)

Merci et bonne soirée