Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1488to1492
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
Inhaltsverzeichnis

VBA gehe zu

VBA gehe zu
20.04.2016 10:16:00
Christian
Hi ich habe eine Frage zu einer VBA Programierung:
In der Tabelle Eingabe im Feld "N6" gebe ich einen Text via Formel aus
Ich möchte das er bei Button Klick in Tabelle 2 gesucht wird und mein Course dahin springt.
nochmal anders geschrieben:
on Button Klick nimm "n6" goto Tabelle 2 suche dort in der Spalte E nach "n6" und bring meinen Course dahin.

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

Betreff
Datum
Anwender
Anzeige
AW: VBA gehe zu
20.04.2016 10:23:42
ChrisL
Hi Christian
On Forums-Click Copy and Paste To Excel Module ;)
Private Sub CommandButton1_Click()
Dim WS1 As Worksheet, WS2 As Worksheet
Set WS1 = Worksheets("Tabelle1")
Set WS2 = Worksheets("Tabelle2")
If WorksheetFunction.CountIf(WS2.Columns(5), WS1.Range("N6")) = 0 Then
MsgBox "nicht vorhanden"
Else
WS2.Activate
WS2.Cells(Application.Match(WS1.Range("N6"), WS2.Columns(5), 0), 5).Select
End If
End Sub

cu
Chris

AW: VBA gehe zu
20.04.2016 11:36:52
Rudi
Hallo,
alternativ:
Private Sub CommandButton1_Click()
Dim r As Range
Set r = Sheets("Tabelle2").Columns(5).Find(what:=Range("N6"), lookat:=xlWhole)
If Not r Is Nothing Then
Application.Goto r, True
Else
MsgBox "Nicht vorhanden"
End If
End Sub
Gruß
Rudi
Anzeige

311 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige