Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
588to592
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
588to592
588to592
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

input-box

input-box
23.03.2005 18:23:03
jürg
Hallo
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

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: input-box
24.03.2005 00:15:15
Klaus
Hallo Jürg,
wie wär's hiermit:

Sub CommandButton1_Click()
Dim ziel As Range
Set ziel = Application.InputBox("Welche Zelle möchten Sie auswählen?", Type:=8)
With ziel
.WrapText = True
.Value = "Zeile 1" & Chr(10) & "Zeile 2"
End With
End Sub

Jetzt Zelle angeben, z.B. A10 , dann sollte es funktionieren.
Gruß Klaus
AW: input-box
24.03.2005 07:25:05
jürg
Hallo Klaus
vielen Dank es funktioniert!!
mit gruss
Jürg
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige