Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.04.2024 19:22:16
Von exceltabelle in word per steuerelement temarker
16.04.2024 18:50:53
Fehlermeldung bei Code - Excel speichern mit Bez. aus Zelle
16.04.2024 17:18:01
Projektplan-Tabelle oder Gantt ohne Balken
16.04.2024 17:05:25
formatierten Text direkt in Zelle einfügen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1704to1708
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1704to1708
1704to1708
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA (Textfeld + CommandButton) zur Zeile springen

VBA (Textfeld + CommandButton) zur Zeile springen
13.08.2019 19:43:19
Frank
Hallo VBA Gemeinde,
ich benötige noch mal eure VBA Kenntnisse.
Hab eine UserForm erstellt.
Ich möchte anhand eines Textfeld und ein CommandButton zu einer bestimmten Zeile im Tabellenblatt springen (Die bestimmte Zeile wird über das Textfeld bestimmt).
Wer kann mir beim dem VBA-Code helfen ?
LG
Frank

19
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA (Textfeld + CommandButton) zur Zeile springen
13.08.2019 19:45:17
onur
"Die bestimmte Zeile wird über das Textfeld bestimmt" - geht es vielleicht etwas genauer?
AW: VBA (Textfeld + CommandButton) zur Zeile springen
13.08.2019 20:01:22
Frank
Sorry, hab gedacht das meine Beschreibung reichen würde.
Also,
ich möchte gern zu 115 verschiedene Zeilen im aktiven Tabellenblatt geführt werden.
Hierzu hab eine Userform mit einem Textfeld und CommandButton erstellt.
Das Textfeld ist für die Zeileneingabe (Zu dieser Zeile soll dann hin gesprungen werden).
Der CommandButton soll als "Start" dienen.
Ich hoffe ich hab es verständlich genug beschrieben.
LG
Frank
AW: VBA (Textfeld + CommandButton) zur Zeile springen
13.08.2019 20:03:09
onur
Und wie genau gibst du die Zelle ein? z.B. "A1" ?
AW: VBA (Textfeld + CommandButton) zur Zeile springen
13.08.2019 20:21:38
Frank
Hallo Onur,
Die Zeilen/Zellen die ich ansprechen möchte, sind wie folgt in den Zellen beschrieben.
z.B.
"Materialliste zu Pos.1 (CAD)" Zelle B20
"Materialliste zu Pos.2 (Konstruktion)" Zelle B74
"Materialliste zu Pos.3 (Grundplatte)" Zelle B128
"Materialliste zu Pos.4 (Steckbolzen)" Zelle B182
…..
Am liebsten würde ich gern die Positionen 1-115 ansprechen.
Somit würde ich gern im Textfeld die Position "1" für die Position1 (Zelle B20) eingeben.
Ist das so überhaupt möglich ?
LG
Frank
Anzeige
AW: VBA (Textfeld + CommandButton) zur Zeile springen
13.08.2019 20:27:57
onur
Kanst du mal die Datei posten, damit ich nicht dauernd fragen stellen muss?
AW: VBA (Textfeld + CommandButton) zur Zeile springen
13.08.2019 20:35:40
Frank
Hallo onur,
hab folgende Datei hoch geladen:https://www.herber.de/bbs/user/131418.xlsm
AW: VBA (Textfeld + CommandButton) zur Zeile springen
13.08.2019 20:37:41
onur
Aber eine leere Datei ohne irgend welche Daten ist nutzlos.
AW: VBA (Textfeld + CommandButton) zur Zeile springen
13.08.2019 21:16:02
onur
Die Datei enthält weder Makros noch eine Userform oder Textboxen!
AW: VBA (Textfeld + CommandButton) zur Zeile springen
13.08.2019 21:25:37
Frank
Also,
die Datei die ich hoch geladen habe ist in Ordnung.
Die UserForm lautet: UserForm_Materialliste
Das Makro um die Userform aufzurufen lautet: Materialliste_cmd_Position
LG
Frank
Anzeige
AW: VBA (Textfeld + CommandButton) zur Zeile springen
13.08.2019 21:33:44
Mullit
Hallo,
mal kurz zur Klärung, die erste Datei (ohne akt. Link) enthält die Form, die zweite Datei nicht....;-)
Gruß, Mullit
AW: VBA (Textfeld + CommandButton) zur Zeile springen
13.08.2019 21:53:54
Frank
Hallo onur,
ich weiß nicht warum du/ihr die Userform und TextBox nicht erkennt.
ich nochmal eine Datei hochgeladen (Dieses mal nur mit einer Bilddatei meiner Userform)
https://www.herber.de/bbs/user/131422.xlsx
Sorry der unannehlichkeiten.
LG
Frank
AW: VBA (Textfeld + CommandButton) zur Zeile springen
13.08.2019 22:02:52
onur
Siehst du hier irgend eine Userform, ein Modul oder einen Code?
Userbild
Anzeige
AW: VBA (Textfeld + CommandButton) zur Zeile springen
13.08.2019 22:14:16
Frank
Hallo onur,
sorrryyyyyyyyyyy, ich bin der Dumme.
Jetzt der richtige Datensatz:
https://www.herber.de/bbs/user/131424.xlsm
Wie kann ich das wieder gut machen.
Würd Dir gern ein Bier ausgeben.
LG
Frank
AW: VBA (Textfeld + CommandButton) zur Zeile springen
13.08.2019 23:07:08
Frank
Hallo onur,
erst einmal vielen Dank für deine Hilfe.
Es ist noch nicht richtig.
Falsch:
Die Eingabe in der Userform führt zu den Positionen im Tabellenblatt "01_Eingabe....."
Richtig wäre:
Die Eingabe soll zu den Positionen im Tabellenblatt "05_Materiallisten.....) führen.
Gruß
Frank
Anzeige
AW: VBA (Textfeld + CommandButton) zur Zeile springen
13.08.2019 23:20:27
onur
Dann musst die am besten die Adressen in irgend eine Spalte (ich habe für die ersten beiden Pos Spalte C genommen) eintragen.
https://www.herber.de/bbs/user/131428.xlsm
AW: VBA (Textfeld + CommandButton) zur Zeile springen
13.08.2019 23:35:58
Frank
Hallo onur,
ein ganz großes Lob.
Ich hab dein Makro aus dem letzten Thread etwas umgebaut.
Es funktioniert genauso wie es mir vorgestellt habe.
Perfekt...….
Ich möchte mich noch einmal bei Dir, für deine Mühe und dein Verständnis recht Herzlich bedanken.
P.S.
Man erlebt immer wieder nette und hilfsbereite Menschen, du bist einer davon.
LG
Frank
Anzeige
AW: VBA (Textfeld + CommandButton) zur Zeile springen
14.08.2019 09:20:39
Werner
Hallo Frank,
hat mich auch interessiert. Hier meine Version mit Find. Dabei brauchst du die Zieladressen nicht im zweiten Blatt zu erfassen. 
Private Sub Materillisten_cmd_Position_start_Click()
Dim raFund As Range
With Worksheets("05 Materiallisten")
Set raFund = .Range("B20:C" & .Cells(.Rows.Count, 2).End(xlUp).Row) _
.Find(what:=Me.TextBox1, LookIn:=xlValues, lookat:=xlPart)
If Not raFund Is Nothing Then
raFund.Select
Unload Me
End If
End With
Set raFund = Nothing
End Sub
Gruß Werner

338 Forumthreads zu ähnlichen Themen

Hintergrundfarbe in Zahl umwandeln
Timo

Hallo zusammen.
Gibt es über VBA eine Möglichkeit, die Hintergrundfarbe einer Zelle in eine Zahl umzuwandeln und das schneller als mit for- Schleifen?
Habe einen Bereich ("J16:AG39"), wo ich per Zellaktivierung mit der Maus Zellen oder auch Zellbereiche mit einer Hintergrundfarbe verseh...
07.08.2008 19:30:00
Thread-ID: 1000082
4 Beiträge
Anzeige
Zahl vorn/hinten vom Text trennen + Komma
StefanK

Hallo Excel-Freunde
ich möchte gern per Formel folgendes lösen:
in zelle a3 steht
1 haley, bill rock around the clock 1956
jetzt soll in b3 die "1" stehen --- löse ich per Formel mit =LINKS(A3;SUCHEN(" ";A3)-1)
in e3 soll "1956" stehen --- löse ich mit Array-Formel {=...
25.09.2008 19:00:21
Thread-ID: 1012407
12 Beiträge
Textbox Ausgabe als Zahl bzw. Zeit formatieren
Steffan

Hallo ihr lieben,
ich schreib jetzt schon den ganzen Tag an folgender Routine:
Private Sub CommandButton1_Click() Dim z As Integer z = Range("I101").End(xlUp).Row + 1 TextBox1 = Format(CDate(TextBox1.Value), "dd.mm.yyyy") Cells(z, 9) = TextBox1 'Datum des Tauchgangs Cells(z, 12) = Tex...
28.09.2008 20:12:56
Thread-ID: 1012988
6 Beiträge
Anzeige
Zahlen rechtsbündig in einer Textbox
Helmut

Hallo,
ich habe einen Textstring mit Zahlen die ich rechstbündig anordnnen will.
Text= "Beisiel: " & Format (Zahl,"#,###")
Wie wird die Zahl im Formatbefehl z.B rechtsbündig bei max 6 Stellen ausgegeben?
Gruß
Helmut
04.11.2008 11:57:00
Thread-ID: 1021556
2 Beiträge
Zahl eingeben und per VBA formatieren
Herbert

Hallo Gemeinde
Ich habe eine Zelle in einem .xlt, dort soll der User eine Zahl eingeben und mit dem Changeereignis
soll die Zahl in der Form JJ/###A umgewandelt werden.
Beispiel: 201 soll 08/201A werden. Das, was ich hier verbrochen habe, funst nicht, kann mir jemand helfen?
P...
05.11.2008 16:08:10
Thread-ID: 1021969
12 Beiträge
Textzahl umwandeln
Stephan

Hallo zusammen,
ich habe folgendes Problem:
Mit dem u. a. Code werden Zeilen aus einer Datei in eine andere kopiert. Die Spalte B (B2:B65535) der Zieldatei ("Auswertung.xls)" soll nun aber zusätzlich noch mit 1 multipliziert werden, da diese ein Datum als Textzahl enthält und dieses in...
10.11.2008 11:12:00
Thread-ID: 1023147
22 Beiträge
Nur Zahlen in sehr vielen Textboxen
uli

Hallo,
habe ein im Internet gefunden, der allerdings noch ein bisschen angepasst werden muss. Vielleicht könnt ihr mir helfen, da ich an dieser Stelle nicht mehr weiterkomme.
Ich möchte die Eingabe von Buchstaben in mehreren Textboxen verbieten. Dies mache ich mit folgendem Code in eine...
13.11.2008 10:24:00
Thread-ID: 1024091
3 Beiträge
TextBox Inhalte sollen Zahlen sein
Frank

Hallo Zusammen!!!
Mit folgendem Code:
Private Sub CommandButton2_Click() If Me.TextBox1.Value = "" Then MsgBox "Sie müssen ein Datum eingeben" Exit Sub End If If Me.TextBox2.Value = "" Then MsgBox "Sie müssen eine Anfangszeit eingeben " Exit Sub End If If Me.TextBox3.Value = "" Then M...
17.11.2008 21:37:00
Thread-ID: 1025414
8 Beiträge
Anzeige

Links zu Excel-Dialogen

CommandButton TextBox

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
5
11
5
3
1
11
21
2
7
4
3
3
2
1
8
5
4
21
3
5
2
2
6
4