input-box
23.03.2005 18:23:03
jürg
forum
mochte aus zwei eins machen
möchte mit input box zelle auswählen und dann anschliessend dass aus der zelle zwei zeilen entstehen
kann mir jeman nen typ geben
mit Gruss
jürg
Sub CommandButton1_Click()
Dim ziel As Range
Set ziel = Application.InputBox("Welche Zelle möchten Sie auswählen?", Type:=8)
'ziel.Select
'End Sub
'
Sub Zeilenumbruch()
'With Worksheets(1)
'ziel.Select
ziel.WrapText = True
Value = "Zeile 1" & Chr(10) & "Zeile 2"
'End With
End Sub
Anzeige