ich möchte in allen Zeilen die Zellen der Spalten A-F verbinden.
Also in Zeile A die Zellen A1 bis F1, etc.
Hat mir da einer ne Idee?
Vielen Dank im Voraus.
Grüße von
Alex
ich möchte in allen Zeilen die Zellen der Spalten A-F verbinden.
Also in Zeile A die Zellen A1 bis F1, etc.
Hat mir da einer ne Idee?
Vielen Dank im Voraus.
Grüße von
Alex
For a = 1 To 10
Range("A" & a & ":F" & a).Select
With Selection
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = 0
.AddIndent = False
.ShrinkToFit = False
.MergeCells = False
End With
Selection.Merge
Next a
ich würde vorschlagen die Zellen nicht verbinden sonder den Inhalt in Spalte A schreiben. Verbundene Zellen machen Probleme beim Formatieren.
Gruß Hajo
Dein Vorschlag macht eine einzige Zelle von a1 bis g65536
Mein Vorschlag macht eine Zelle in Zeile 1, eine Zelle in Zeile 2, eine Zelle in Zeile 3 usw.
So habe ich die Frage verstanden. Aber vielleicht hast Du Recht
Alan Hathway
und wie geht das???
ich bin mal davon ausgegangen das die länge der Tabelle an Spalte A festgestellt wird und die Zellinhalte mit einem Leerzeichen verbunden werden
Gruß Hajo
horizontal verbundene Zellen sind so unnötig wie ein Kropf; den gewünschten Effekt (zentrierten Text) kann man auch anders erreichen.
Teste doch mal folgendes:
1. Verbundene Zellen markieren.
2. Format / Zellen / Ausrichtung / Horizontal (Zentriert über Spalten) / Zellen verbinden (Haken rausnehmen).
So lässt sich jede Zelle des (ehemaligen) Zellverbundes einzeln ansprechen und die Makro-Klimmzüge entfallen.
Für vertikal verbundene Zellen gibt es diese Möglichkeit leider nicht.
MfG
WernerB.
bitte entschuldige, dass ich Dich mit "Thomas" angeredet habe.
Ich war mal wieder einen Moment unaufmerksam; als ich meinen Fehler bemerkt habe, war das Kind bereits in den Brunnen gefallen.
MfG
WernerB.