---

Hallo,

möchte folgendes erreichen in excel 2003:

ich springe  in eine Zelle.
Tippe Text ein, sagen wir (als Beispiel) nach 15 Zeichen drücke ich "alt"+"enter".
Nun möchte ich, dass die Spaltenbreite automatisch angepasst wird, immer nach dem Zeilenumbruch (alt+enter).

Danke!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo luj,

ohne VBA fällt mir gerade nichts passendes ein, außer ein Workaround: Du stellst Deine Eingaben (in der betreffenden Spalte) fertig und klickst danach doppelt mit der linken Maustaste zwischen zwei Spaltenüberschriften - dann wird die Breite automatisch an die längste Zeile angepasst..?

------------------
DIN1055.de  |  Lastannahmen für Anwender NEU: Foren zu DIN 1055

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

hallo,
genau. es wird leider nicht an dem zeilenumbruch angepasst.

ich habe es schon mit vba versucht. komme aber nicht weiter.

vielleicht hat jemand einen ansatz.

so habe ich ich nach einem zeichen gesucht:

Option Explicit

Sub test()
Dim rngWo As Range
Dim strSuchen As String

strSuchen = "?"

Set rngWo = ActiveWorkbook.ActiveSheet.UsedRange.Find(strSuchen, LookIn:=xlValues, Lookat:= _
xlPart)
    If Not rngWo Is Nothing Then
        MsgBox "gefunden"
    End If

End Sub

man muesste hier nach Chr(10) suchen und anschliessend die anpassung an der richtigen stelle.

danke
gruß

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hm...

Probier mal das hier in einem Modul:

Code:

---

Sub UmbruchZelle()

'Selection.WrapText = True 'IMMER Umbruch fuer gewaehlte Zelle
Selection.WrapText = Not Selection.WrapText 'Umbruch an/aus
'Selection.ColumnWidth = 1 'schmal
Selection.EntireColumn.AutoFit

End Sub

---

Lässt sich z. B. auf einen Toggle-Button legen. Leider wird die Spalte auf die maximale Breite festgelegt...

------------------
DIN1055.de  |  Lastannahmen für Anwender NEU: Foren zu DIN 1055

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

hallo,
danke.
ich brauche schon die spaltenbreite-anpassung direkt nach dem umbruch.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

das geht nicht wärend der Eingabe da im Eingabemodus keine Makros laufen können.

------------------
Gruß
Nepumuk 

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP