Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
944to948
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
944to948
944to948
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Rows("6:6") über Inputbox
30.01.2008 11:35:26
Andre´
Hallo alle zusammen,
ich möchte das Rows("6:6") von einer Inputbox übernommen wird
Kann mir bitte jemand einen Tipp geben wie ich nachfolgendes Makro umschreiben muss

Sub markieren()
Range(Rows("6:6"), Rows("6:6").End(xlDown)).Select
End Sub


Danke im Voraus!
MFG Andre

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Zusatz
30.01.2008 11:39:47
Andre´
wenn einmal eine Eingabe in der Box gemacht wurde, dann soll der Wert nicht gelöscht werden.
MFG Andre

AW: Zusatz
30.01.2008 12:53:12
Peter
Hallo Andre,
so z. B.:

Public Sub Test()
Dim sSpalte  As String
Dim iSpalte  As Integer
sSpalte = Application.InputBox("  Bitte die gewünschte Spalte eingeben", _
"   Spalten Eingabe", Type:=1)
If sSpalte = "Falsch" Then
MsgBox "Es wurde Abbrechen angeklickt.", _
, "   Hinweis für " & Application.UserName
Exit Sub
ElseIf sSpalte = "" Then
MsgBox "Es wurde keine Spalte eingegeben.", _
, "   Hinweis für " & Application.UserName
Exit Sub
End If
iSpalte = CInt(sSpalte)
If iSpalte > 0 And iSpalte 


Gruß Peter

Anzeige
AW: Zusatz
30.01.2008 13:19:00
Andre´
Hallo Peter,
vielen DANK, es funktioniert.
Aber wie kann man erreichen, dass die eingegebene Zahl in der Inputbox bleibt und nicht erneut eingegeben werden muss.
Beim ersten Aufruf wird z.B eine 6 in die Inputbox getippt, beim nächsten Durchlauf soll die 6 noch enthalten sein und man sollte entscheiden können ob lassen oder auf eine andere Zahl ändern.
Ich hoffe Du kannst mir auch dabei behilflich sein!
MFG Andre

AW: Zusatz
30.01.2008 14:27:00
Peter
Hallo Andre,
ich meine, das geht nur mit einem UserForm(ular) - siehe Beispiel-Mappe
https://www.herber.de/bbs/user/49523.xls
Gruß Peter

Anzeige
AW: Zusatz :-) Danke
30.01.2008 15:07:00
Andre´
Hallo Peter,
Vielen DANK das passt!
MFG Andre

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige