Macro texte avec mise en forme

Bonjour,

Je voudrais créer une macro simple en enregistrement (je ne connais pas le langage VBA).

Sur plusieurs cellules sélectionnées non contigües, je voudrais en activant une macro obtenir dans ces cellules le mot RTT avec un fond jaune.

J'ai essayé, mais seule la première cellule sélectionnée reçoit le résultat.

Comment faire ?

Merci pour votre aide.

mets en route l'enregistrement d'une nouvelle macro

sélectionne une cellule, puis les autres en tenant la touche ctrl enfoncée

clic droit sur la cellule, format, change la couleur

valide

arrête l'enregistrement

tu as un truc comme ça

Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 10/10/2010 par jm
'

'
    Range("F2,G4,H2").Select
    Range("H2").Activate
    With Selection.Interior
        .ColorIndex = 6
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
    End With
End Sub

et ça marche, vive l'enregistreur

bgrvfe

Bonjour à tous,

le même en + direct

Sub ColorCell()
   Range("F2,G4,H2").Interior.ColorIndex = 6
End Sub

Claude