[VBA] [résolu] Excel - bug sur macro toute simple

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [VBA] [résolu] Excel - bug sur macro toute simple

daboos

Bonjour à tous

Je suis en train de me créer quelques macro perso, la j'en ai fait une qui me donne la couleur de fond de la cellule sélectionnée et ca marche

Code :

Sub DeterminerCodeCouleurCellule()
a = Selection.Interior.ColorIndex
b = MsgBox(a)
End Sub

par contre, j'ai essayé de faire ca pour la couleur de la police et la ca ne marche plus du tout :pfff: J'ai essayé plusieuers variantes mais aucune n'a marché (sauf quand je lui indique la cellule à sélectionner dans le code, mais c pas terriblement pratique...), le code actuel étant :

Code :

Sub DeterminerCodeCouleurPolice()
a = Selection.Characters(1, 1).Font.ColorIndex
b = MsgBox(a)
End Sub

Comment réussir à se planter sur une macro de 2 lignes... j'ai honte mais j'y arrive pas. Si quelqu'un pouvait me dépanner ca serait sympa :ange:

Merci d'avance et bonne journée à tous

Daboos

Message édité par daboos le 12-02-2007 à 15:36:31

Publicité

eric455

Bonjour à tous
Bonjour Daboos

As tu essayé :
selection.font.colorindex=35

A+

daboos

Bonjour eric455

En fait, je veux connaître le numéro de colorindex du texte de la case sélectionnée... et pas lui attribuer un code.

Après avoir trituré le code un peu plus, j'ai enfin trouvé la solution. Je pensais qu'il fallait appliquer Font à Characters mais en fait, en l'appliquant juste à la sélection ca marche nickel. Le code corrigé donne donc :

Code :

Sub DeterminerCodeCouleurPolice()
a = Selection.Font.ColorIndex
b = MsgBox(a)
End Sub

Voila voila, au cas où ca intéresserait qqn

Bonne fin de journée à tous

DaBoos

FORUM HardWare.fr

Programmation

VB/VBA/VBS

[VBA] [résolu] Excel - bug sur macro toute simple

Sujets relatifs
[Résolu][VS6] WinXP=>Win2k: "This program cannot be run in DOS Mode"	[RESOLU] interdir le download de fichier
macro Excel VBA : Création automatique de 140 graphiques	Passages C++/VBA en XLL/COM Questions
[Résolu]Variables globales qui ne se réinitialise pas...	[Résolu] Trouve le bon nom d'un répertoire juste avec le début
[Résolu] [Batch] Création d'un dossier à l'ouverture de Windows	[resolu]gros doute par rapport à l'affichage écran d'un code
Plus de sujets relatifs à : [VBA] [résolu] Excel - bug sur macro toute simple

Page générée en 0.032 secondes