Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
680to684
680to684
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

autofit bei verbundenen Zellen

Forumthread: autofit bei verbundenen Zellen

autofit bei verbundenen Zellen
13.10.2005 15:41:37
Michael
Hallo Forum,
ich habe eine Tabelle in der die Zellen A1 und B1 verbunden wurden, als Wert ist ein längerer String enthalten. In den Zellen B2, B3, B4 usw. stehen jeweils kürzere Strings. Ich möchte nun für Spalte B über Autofit die optimale Breite einstellen, allerdings soll Zelle A1(inkl. B1) darin mitberücksichtigt werden, man soll also den String in A1 auch vollständig lesen können. Excel berücksichtigt A1 aber nicht. Wie kann man das machen (über VBA)?
Dank & Gruß,
Michael
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: autofit bei verbundenen Zellen
16.10.2005 10:59:15
Herbert
hallo Michael,
ja,über VBA kann man das machen:


Public Sub AutoF_Verbundene_Zellen()
With ActiveSheet
    .Columns("B:B").Columns.AutoFit
    .[a1].UnMerge
    .[a1].Columns.AutoFit
    .Columns("A:A").ColumnWidth = _
    .Columns("A:A").ColumnWidth - Columns("B:B").ColumnWidth
    .[a1:b1].Merge
End With
End Sub

     gruß Herbert
Anzeige
;

Forumthreads zu verwandten Themen

Zeilenumbruch bei verbundenen Zellen
oblivion

Hallo, ich habe mal eine Frage zum Zeilenumbruch. Wenn ich eine einzelne Zelle habe und über die Eigenschaften den Zeilenumbruch einstelle, dann wird automatisch die Zelle größer (nach unten) je mehr ich reinschreibe.
Wenn ich jetzt aber zwei oder mehr Zellen verbinde und die gleichen Einst...
22.08.2008 12:42:00
Thread-ID: 1003815
4 Beiträge
Zwei Dinge in einer Zelle
Sabine

Hallo,
ich möchte ein Problem mit Excel Formeln und ohne VBA lösen.
Es gibt drei Spalten: Datum1, Zweck, Datum 2
Wenn in Zweck in einer Spalte das Wort "Show" eingetragen wird, soll in Datum 2 in der entsprechenden Zeile stehen "Bitte nennen Sie ein Verwendungsdatum". Das kriege ich...
29.08.2008 15:25:00
Thread-ID: 1005860
2 Beiträge
vertikal und horizontal
ludmila

Hallo Spezialisten,
In der Tabelle "Liste" sind Daten horizontal eingetragen.
Diese sollen nun in der Tabelle "Projekt" vertikal eingetragen werden.
Nachstehendes makro ließt jedoch nur das Datum ab der Zelle A 63 ein.
wo liegt der Fehler?
Danke!
LG Ludmila
Sub Lie...
15.03.2009 10:58:27
Thread-ID: 1060364
3 Beiträge
Anzeige
Zwei Zeilen in einer Zelle
Michael

Hallo,
ich habe folgendes Problem. In einer Zelle steht ein Ort allerdings steht dieser innerhalb der Zelle nach unten verrückt, so dass in der Zelle quasi eine Leerzeile ist. Gibt es eine Möglichkeit diese Leerzeilen innerhalb der Zellen zu löschen?
Ich habe hier mal eine Grafik eingef...
26.03.2009 13:12:43
Thread-ID: 1064220
5 Beiträge
Zellenhöhe bei verbundenen Zellen (VBA Code?)
Micha

Hallo liebe Spezialisten,
ich habe folgendes Problem und würde mich über einen VBA-Code riesig freuen.
In der Tabelle1 sind in dem Bereich B53:AI63 die Zellen verbunden.
Der in diesem Bereich von anderen Usern eingegebene Text ist unterschiedlich lang.
Der Zeilenumbruch funktion...
17.09.2009 13:18:38
Thread-ID: 1103550
2 Beiträge
Locked Eigenschaft bei verbundenen Zellen
Christoph

Hallo zusammen,
nachdem mir eben schonmal wunderbar geholfen wurde, wende ich mich mit einem anderen Problem an euch. Szenario schaut wie folgt aus:
Ich habe eine Arbeitsmappe mit mehreren Arbeitsblättern. Die Gesamte Mappe soll gesperrt werden, in einzelnen Arbeitsblättern gibt es jedo...
16.11.2010 14:38:41
Thread-ID: 1187125
5 Beiträge
Zwei Zellbezüge in einer Zelle
WillyJ

Hilferuf eines Laien:
In A1 steht "Aktuelles Datum"
In A2 steht =heute()
In A3 soll stehen: Aktuelles Datum 31.03.2011
mit Bezug zu A1 und A2
Wenn ich in A3 eingebe: =&"a1"& a2 erscheint statt des Datums der Datumswert 40633
Danke im voraus für eure Hilfe.
31.03.2011 12:02:57
Thread-ID: 1208457
4 Beiträge
Anzeige
zwei Hintergrundfarben in einer Zelle
siegfried

Hallo zusammen,
ich habe entweder einen Text oder je nach Fall auch zwei Textbausteine in einer Zelle verknüpft.
Um den Text1 von Text2 besser zu unterscheiden, habe ich bisher per VBA den Text1 in der Farbe "rot" geschrieben und den Text2 in "dunkelblau".
Kommt nur ein Text in di...
15.11.2011 15:37:08
Thread-ID: 1237968
3 Beiträge
Anzeige
Automatischer Zeilenumbruch bei verbundenen Zellen
Andre´

Hallo alle zusammen,
folgendes Makro funktioniert ganz gut. https://www.herber.de/mailing/137101h.htm
Sub AutoFitMergedCellRowHeight2() Dim CurrentRowHeight As Single, MergedCellRgWidth As Single Dim CurrCell As Range Dim ActiveCellWidth As Single, PossNewRowHeight As Single Dim iX As...
01.03.2012 22:38:07
Thread-ID: 1253121
2 Beiträge
Anzeige
zwei werte von textbox in einer Zelle
textbox

Hallo und guten Morgen,
an bei mal wieder eine Frage an Euch.
ist es möglich aus der UserForm zwei Textboxen deren Inhalte in die Tabelle zu übertragen, und das in nur einer Zelle? in der Excel Tabelle Funktioniert das.
Aber geht das über VBA auch?
Ich würde nämlich gerne die P...
29.09.2012 12:04:10
Thread-ID: 1279973
3 Beiträge
Zwei Ergebnisse in einer Zelle
EVA

Hallo,
da ich hier immer sehr gute Antworten gefunden habe, diesmal jedoch nichts zu meinem aktuellen Problem finden kann, versuche ich mein Glück mit einer Fragestellung zum Thema Wenn-Dann-Funktion:
Ich habe eine Tabelle mit vielen Wenn-Dann-Prüfungen, die sich auf Datumsangaben bezie...
14.07.2013 19:23:12
Thread-ID: 1322367
16 Beiträge
Zellschutz bei verbundenen Zellen (VBA)
Herbert

Hallo Forum,
Mit diesem Makro aktiviere ich auf allen Blättern
in den Zellen wo Eingaben gemacht wurden den Zellschutz.Das Problem ist aber,daß bei verbundenen Zellen der Zellschutz nicht aktiviert wird.Gibt es hier eine Möglichkeit das Problem zu beheben.
Danke
Gruß HerbertSub Zel...
05.07.2002 18:03:28
Thread-ID: 134282
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige