Colorier cellule fusionné

Question

Bonsoir, jai fait une petite macro pour colorier les cellules selectionné par contre ca ne colorie pas les cellules fusionnées. les lignes 1 et 2 sont fusionnées dans les colonnes A et C . Ce que je veux faire : colorier 2 lignes puis sauter 2 lignes et colorier 2 ext.. Ma macro marche bien pour le saut de lignes et pour colorier mais pas dans les cellules fusionnées.

Sub colory()For i = 1 To Range("A100").End(xlEnd).Row Step 4 Rows(i).Select Rows(i).Interior.ColorIndex = 36 Rows(i + 1).Interior.ColorIndex = 36 Next End Sub

Merci d'avance.

cs_MPi · Answer

Au risque de me répéter, on ne devrait pas utiliser la fusion de cellules sous Excel. C'est beaucoup plus simple si on utilise le centrage sur plusieurs colonnes (menu Format de cellules). Au besoin, on peut aussi utiliser Alt-Enter (vbLf) pour écrire sur plusieurs lignes à l'intérieur d'une même cellule.

MPi²
Pour ceux qui programment sous Office, n'oubliez pas qu'il existe un forum dédié à ces applications VBA....... ICI

cs_baz187rem · Answer

Ce que je faisais et que  je fais encore parfois lorsque j'ai pas envi de me prendre la tete, c'est de réaliser une macro automatique et de m'en servir pour base.

En gros j'ai fusionné les céllules Range("A3:C4").Select qui ont été fusionnées précédemment et avec le code suivant je colorie la zone

With Selection.Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .ThemeColor = xlThemeColorAccent1
        .TintAndShade = -0.499984740745262
        .PatternTintAndShade = 0
    End With

Voila te reste plus qu'a te servir de ca pour continuer sur ton programme

Colorier cellule fusionné

2 réponses

Votre réponse

Discussions similaires