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

Couleurs....

7 réponses
Avatar
Francis
Bonsoir à Tous,

Ou puis-je trouver ( cela m' aiderai
pour une macro ) le code ( en chiffre )
de la palette de couleurs de Excel 2007 ???
Merci

Fr@ncis

7 réponses

Avatar
Papyjac
Bonjour Francis,

Pour le savoir il suffit de s'en servir :
Sub test()
For L = 0 To 100
Cells(L, 1) = L
Cells(L, 2).Interior.ColorIndex = L
Next
End Sub

Chez moi, ca plante à 57

--
Papyjac


"Francis" a écrit :

Bonsoir à Tous,

Ou puis-je trouver ( cela m' aiderai
pour une macro ) le code ( en chiffre )
de la palette de couleurs de Excel 2007 ???
Merci







Avatar
Fredo P
Bonsoir Francis
Essaye en démarrant l'enregistreur de macro et ensuite de mettre une couleur
dans plusieurs cellules à chaque fois différente, tu verras, de la sorte ce
que te donnera l'enregistrement.
"Francis" a écrit dans le message de news:
48cd3106$0$11974$
Bonsoir à Tous,

Ou puis-je trouver ( cela m' aiderai
pour une macro ) le code ( en chiffre )
de la palette de couleurs de Excel 2007 ???
Merci





Avatar
garnote
Salut Francis,

En repenant la macro de Papyjac :

Sub test1()
For L = 0 To 56
Cells(L + 1, 1) = L
Cells(L + 1, 2).Interior.ColorIndex = L
Next
End Sub


Serge


"Francis" a écrit dans le message de news: 48cd3106$0$11974$
Bonsoir à Tous,

Ou puis-je trouver ( cela m' aiderai
pour une macro ) le code ( en chiffre )
de la palette de couleurs de Excel 2007 ???
Merci





Avatar
Francois L
garnote a écrit :

Bonsoir Serge,

Le monsieur a dit qu'il avait 2007 (que je n'ai pas) mais là, avec 2007,
si j'ai bien compris, les couleurs c'est le bazar surtout en VBA et il
n'y a plus de ColorIndex.

:o)

--
François L


Salut Francis,

En repenant la macro de Papyjac :

Sub test1()
For L = 0 To 56
Cells(L + 1, 1) = L
Cells(L + 1, 2).Interior.ColorIndex = L
Next
End Sub


Serge


"Francis" a écrit dans le message de news: 48cd3106$0$11974$
Bonsoir à Tous,

Ou puis-je trouver ( cela m' aiderai
pour une macro ) le code ( en chiffre )
de la palette de couleurs de Excel 2007 ???
Merci









Avatar
garnote
Ave François,

J'ai testé la macro sous 2007 et elle fonctionne correctement.

Serge


"Francois L" a écrit dans le message de news:
uN%
garnote a écrit :

Bonsoir Serge,

Le monsieur a dit qu'il avait 2007 (que je n'ai pas) mais là, avec 2007, si j'ai bien compris, les couleurs c'est le bazar
surtout en VBA et il n'y a plus de ColorIndex.

:o)

--
François L


Salut Francis,

En repenant la macro de Papyjac :

Sub test1()
For L = 0 To 56
Cells(L + 1, 1) = L
Cells(L + 1, 2).Interior.ColorIndex = L
Next
End Sub


Serge


"Francis" a écrit dans le message de news: 48cd3106$0$11974$
Bonsoir à Tous,

Ou puis-je trouver ( cela m' aiderai
pour une macro ) le code ( en chiffre )
de la palette de couleurs de Excel 2007 ???
Merci










Avatar
Modeste
Bonsour® Francois L avec ferveur ;o))) vous nous disiez :

Le monsieur a dit qu'il avait 2007 (que je n'ai pas) mais là, avec
2007, si j'ai bien compris, les couleurs c'est le bazar surtout en
VBA et il n'y a plus de ColorIndex.



mais si ;o)))
http://www.andrewsexceltips.net/Classic_Excel_Colors.zip

voir aussi le blog de JWalk
http://spreadsheetpage.com/index.php/blog/excel_2007_vba_challenge/
http://spreadsheetpage.com/index.php/blog/exploring_theme_colors/
http://spreadsheetpage.com/index.php/blog/more_on_office_2007_colors/

et puis aussi :
http://proofficedev.com/blog/2007/08/21/colours-in-word-2007-part-1/
http://proofficedev.com/blog/2007/10/10/colours-in-word-2007-part-2/

--
--
@+
;o)))
Avatar
Francois L
garnote a écrit :

Ave Serge,

Bon ben j'ai appris quelque chose... merci

--
François L

Ave François,

J'ai testé la macro sous 2007 et elle fonctionne correctement.

Serge


"Francois L" a écrit dans le message de news:
uN%
garnote a écrit :

Bonsoir Serge,

Le monsieur a dit qu'il avait 2007 (que je n'ai pas) mais là, avec 2007, si j'ai bien compris, les couleurs c'est le bazar
surtout en VBA et il n'y a plus de ColorIndex.

:o)

--
François L


Salut Francis,

En repenant la macro de Papyjac :

Sub test1()
For L = 0 To 56
Cells(L + 1, 1) = L
Cells(L + 1, 2).Interior.ColorIndex = L
Next
End Sub


Serge


"Francis" a écrit dans le message de news: 48cd3106$0$11974$
Bonsoir à Tous,

Ou puis-je trouver ( cela m' aiderai
pour une macro ) le code ( en chiffre )
de la palette de couleurs de Excel 2007 ???
Merci