[] [Excel] Fusionner des cellules

Version imprimable

13/12/2002, 18h01
SamyD

[] [Excel] Fusionner des cellules

J'utilise vb 6 pour ouvrir un classeur Excel et modifier son contenu. J'aimerais fusionner deux (ou plusieurs) celulles à partir du code VB.
Exemple fusionner les cellules 1:1 -> 4:3
Merci d'avance
13/12/2002, 18h09
SpaceFrog

enregistre une macro sous excel en mode enregistrement et visualise ensuite le code ...

Code:

1
2
3
4
5
6
7
8
9
10
11
12
  Range("B8:D11").Select
    With Selection
        .HorizontalAlignment = xlCenter
        .VerticalAlignment = xlBottom
        .WrapText = False
        .Orientation = 0
        .AddIndent = False
        .ShrinkToFit = False
        .MergeCells = False
    End With
    Selection.Merge
End Sub

13/12/2002, 18h37
DarkVader

et en abbrégé ?

Code:

Range("B8:D11").Merge

%)

Fuseau horaire GMT +2. Il est actuellement 09h11.