Zellen per Makro verbinden und zusammenführen

27. Januar 2010
Martin Althaus Von Martin Althaus, Excel, Office ...

So fassen Sie mehrere Zellen zu einer zusammen

Für Überschriften in Tabellen oder andere Anwendungen ist es oft sinnvoll, mehrere Zellen zu einer einzigen Zelle zusammenzufassen. Das können Sie erledigen, indem Sie die Zellen markieren, anschließend die Tastenkombination STRG 1 drücken und im Register "Ausrichtung" die Option "Zellen verbinden" wählen. Aber wie erledigen Sie diese Aufgabe aus einem Makro heraus?

Setzen Sie den folgenden Programmcode ein:

Sub VerbindeZellen()
ActiveSheet.Range("B1") = "Überschrift"
With ActiveSheet.Range("A1:E1")
 .Merge
 .HorizontalAlignment = xlCenter
End With
End Sub

Das Makro fasst die fünf Zellen von A bis E in einer Zeile zu einer einzigen Zelle zusammen. In diese Zelle wird der Text "Überschrift" eingetragen und zentriert dargestellt. Die folgende Abbildung zeigt, wie das Ergebnis nach der Ausführung des Makros aussieht:

Tipp: Falls Sie wissen möchten, wie Sie Makros in Excel eingeben und starten, finden Sie hier eine Kurzbeschreibung: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-geben-sie-makros-in-excel-ein.html

Werden Sie mit unseren Tipps zum Excel-Profi!

Jetzt gratis per E-Mail

DDV Ehrencodex E-Mail-Marketing
  • Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters.
  • Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter.
  • Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Datenschutzgarantie:

Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters. Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter. Jederzeit abbestellbar durch einen Link im Newsletter.

Weitere Artikel zum Thema

Newsletter

Jetzt kostenlose Excel-Hilfe anfordern!

  • die besten Tipps
  • völlig kostenlos
  • jederzeit abbestellbar
DDV Ehrencodex E-Mail-Marketing
  • Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters.
  • Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter.
  • Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Datenschutzgarantie:

Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters. Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter. Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Experten

Rudolf Ring twittert für @Computerwissen

Die von Ihnen eingegebene E-Mail Adresse ist nicht korrekt. Bitte korrgieren Sie Ihre Eingabe und klicken Sie auf "OK":

Bitte wählen Sie mindestens einen Newsletter aus und klicken Sie auf "OK"