Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: VBA Zentrieren ohne Verbinden - Vertical

VBA Zentrieren ohne Verbinden - Vertical
04.05.2007 12:28:00
lobby007
Hallo Spezialisten,
ich habe ein Makro das über Zellen horizontal Verbindet ohne die Zellen zu verbinden. (Verbundene Zellen machen oft Kummer)
Jetzt brauche ich das ganze vertikal, d.h. ich markiere z.B. A1:A4 und der Inhalt soll mit -90 Grad Schrift (also von unten nach oben) über diese 4 Zeilen zentriert werden - aber ohne die Zellen zu verbinden.
Hier das horizontal Makro:

Sub center_col()
On Error GoTo Fehler
With Selection
.HorizontalAlignment = xlCenterAcrossSelection
End With
Exit Sub
Fehler:
MsgBox "Bereich markieren !"
End Sub


Wer weiss wie das vertical geht?
Gruß lobby007

Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Zentrieren ohne Verbinden - Vertical
04.05.2007 13:06:36
Hoffi
Hallo,

With Selection
.VerticalAlignment = xlCenter
.Orientation = 90
End With


Grüße
Hoffi

Soviel ich weiß, geht es nicht über mehrere Zeilen
04.05.2007 14:13:00
Matthias
Hallo,
Soviel ich weiß, geht es nicht über mehrere Zeilen
nur die horizontale Zentrierung über mehrer Spalten ist möglich.
in einer höheren Excelversion ist es evtl. schon möglich - keine Ahnung (ich hab XL2000)
Ich lasse mich also auch gern eines Besseren belehren ;-)
Gruß Matthias

Anzeige
AW: VBA Zentrieren ohne Verbinden - Vertical
04.05.2007 14:23:00
lobby007
Hallo Hoffi,
das zentriert über eine Zeile, aber eben nicht über mehrere.
Hast Du eine Idee wie es über mehrere klappt?
Test: in Celle A1 Test eingeben
dann A1:A4 markieren und Makro laufen lassen - dann sollte es über alle Zeilen zentriert sein.
gruß lobby007

AW: VBA Zentrieren ohne Verbinden - Vertical
04.05.2007 17:48:42
Hans
Hi,
icg sags ja nicht gerne, aber das geht gar nicht.
mfg Hans

Anzeige
AW: VBA Zentrieren ohne Verbinden - Vertical
04.05.2007 20:57:06
lobby007
Hallo Hans,
es geht - aber wohl nur mit Verbinden der Zellen und gerade das soll vermieden werden.
In Excel habe ich gelernt: geht nicht - gibt es nicht.
Meistens hat irgendein schlauer Fuchs eine Idee - vielleicht der große Meister Herber persönlich.
gruß lobby007

AW: VBA Zentrieren ohne Verbinden - Vertical
04.05.2007 22:04:00
Hans
Hi,
ja, mit verbinden geht es, aber das wolltest du doch explizit nicht. Ohne dem gehts halt nicht!
mfg Hans
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Excel Zellen Vertikal Zentrieren ohne Verbinden


Schritt-für-Schritt-Anleitung

Um die Zellen in Excel vertikal zu zentrieren, ohne sie zu verbinden, kannst du das folgende VBA-Makro verwenden. Dies ist besonders nützlich, wenn du den Text über mehrere Zellen zentrieren möchtest, ohne die Zellen zu verbinden.

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Klicke auf Einfügen und wähle Modul.

  3. Füge den folgenden Code in das Modul ein:

    Sub center_vertically()
       On Error GoTo Fehler
       With Selection
           .VerticalAlignment = xlCenter
           .Orientation = 90
       End With
       Exit Sub
    Fehler:
       MsgBox "Bereich markieren!"
    End Sub
  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Markiere die Zellen, die du vertikal zentrieren möchtest (z.B. A1:A4).

  6. Führe das Makro aus, indem du ALT + F8 drückst, das Makro auswählst und auf Ausführen klickst.

Jetzt sollte der Text in den ausgewählten Zellen vertikal zentriert sein, ohne dass die Zellen verbunden werden.


Häufige Fehler und Lösungen

  1. Das Makro funktioniert nicht.

    • Stelle sicher, dass du einen Bereich ausgewählt hast, bevor du das Makro ausführst.
  2. Der Text wird nicht vertikal zentriert.

    • Überprüfe den Code; die .VerticalAlignment-Eigenschaft sollte auf xlCenter gesetzt sein und die .Orientation auf 90 für vertikale Ausrichtung.
  3. Excel zellen verbinden geht nicht.

    • Wenn du die Zellen nicht verbinden möchtest, achte darauf, dass du die richtige Methode verwendest, wie oben beschrieben.

Alternative Methoden

Wenn du eine Excel-Version verwendest, die keine vertikale Zentrierung über mehrere Zellen unterstützt, gibt es alternative Methoden:

  • Text über Zellen zentrieren ohne Verbindung: Du kannst den Text manuell in die oberste Zelle eingeben und dann die Schriftart auf Vertikal stellen, was den Eindruck einer vertikalen Zentrierung vermittelt.

  • Excel über Auswahl zentrieren: Eine weitere Möglichkeit ist, die Zellen zu formatieren, indem du den Text in der obersten Zelle platzierst und die anderen Zellen leer lässt.


Praktische Beispiele

  • Beispiel 1: Du möchtest den Text "Überschrift" vertikal über die Zellen A1:A4 zentrieren. Markiere die Zellen und führe das oben genannte Makro aus.
  • Beispiel 2: Für einen Listenpunkt, der in den Zellen B1:B5 stehen soll, kannst du den gleichen Prozess ausführen, um den Text vertikal und mittig zu zentrieren.

Tipps für Profis

  • Verwende den Shortcut ALT + H + A + C, um den Text horizontal zu zentrieren. Kombiniere dies mit dem vertikalen Zentrieren für eine bessere Gestaltung deiner Tabellen.
  • Experimentiere mit der Schriftart und der Größe, um den besten Effekt zu erzielen, insbesondere wenn du den Text über mehrere Zellen zentrierst.

FAQ: Häufige Fragen

1. Kann ich den Text auch horizontal und vertikal zentrieren? Ja, du kannst sowohl die horizontale als auch die vertikale Ausrichtung kombinieren, indem du beide Eigenschaften im VBA-Code setzt.

2. Geht die vertikale Zentrierung in allen Excel-Versionen? In älteren Excel-Versionen kann es Einschränkungen geben. Stelle sicher, dass du eine Version verwendest, die die vertikale Zentrierung unterstützt.

3. Was tun, wenn die Zellen nicht verbunden werden? Wenn das Verbinden der Zellen nicht möglich ist, verwende die oben genannten alternativen Methoden zur Formatierung.

4. Gibt es eine Möglichkeit, das Makro schneller auszuführen? Ja, du kannst einen Shortcut für das Makro erstellen, um es schneller auszuführen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige