Microsoft Excel

Herbers Excel/VBA-Archiv

Zellen verbinden | Herbers Excel-Forum


Betrifft: Zellen verbinden von: Ralph
Geschrieben am: 24.01.2012 08:10:42

Hallo,
folgendes Problem:
möchte zellen automatisch verbinden. z.B. ich ziehe von A1 bis G1, dann sollte automatisch diese zellen verbunden sein und eine farbe bekommen. es sind aber nicht immer gleich viele zellen die ich verbinde.
Gruß und danke
Ralph

  

Betrifft: AW: Zellen verbinden von: hary
Geschrieben am: 24.01.2012 08:20:41

Hallo Ralph

Sub verbinden()
With Selection
 .Merge
 .Interior.ColorIndex = 3 'Rot
 End With
End Sub

gruss hary


  

Betrifft: AW: Zellen verbinden von: Ralph
Geschrieben am: 24.01.2012 11:14:30

Hallo Hary,
danke für die schnelle antwort, aber wohin muß ich das schreiben??
Ralph


  

Betrifft: AW: Zellen verbinden von: Ralph
Geschrieben am: 24.01.2012 11:26:52

Hallo Hary,

habs schon rausgefunden, klappt prima, danke.

Hast du vielleicht auch eine Lösung dafür wie ich das per Klick oder so wieder löschen kann und ich meine weißen einzelnen zellen wieder habe?

Danke Ralph


  

Betrifft: AW: Zellen verbinden/aufheben von: hary
Geschrieben am: 24.01.2012 13:06:17

Hallo Ralph

hier mal fuer beides


Sub verbinden()
With Selection
.MergeCells = True
.Interior.ColorIndex = 3 '
End With
End Sub
Sub aufheben()
With Selection
.MergeCells = False
.Interior.Color = xlNone
End With
End Sub

gruss hary


Beiträge aus den Excel-Beispielen zum Thema "Zellen verbinden"