Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 12:58:59
Daten einfügen aus anderem Sheet
19.04.2024 12:23:24
Wenn-Formel anpassen
19.04.2024 12:09:19
Unique (Application.WorksheetFunction.Unique)
19.04.2024 11:51:37
Nächsten identischen Treffer suchen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1360to1364
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
1360to1364
1360to1364
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

klick in zelle blatte aktivieren

klick in zelle blatte aktivieren
24.05.2014 22:08:30
Frank
Hallo und Guten Abend!
In meiner Tabelle "Namensliste" Spalte D3bis vielleicht D200 stehen die Namem der Tabellenblätter. Nun möchte ich per Klick in die Zelle zum gewählten Blatt gelangen. Wie stelle ich das an?
Danke im Voraus!
L. G. Frank H.

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: klick in zelle blatte aktivieren
24.05.2014 22:19:14
Beverly
Hi Frank,
- Möglichkeit: erstelle ein Hyperlink zur entsprechenden Tabelle
- Möglichkeit: benutzte das Selection_Change Ereignis des Tabellenblattes

AW: klick in zelle blatte aktivieren
24.05.2014 22:44:35
Frank
Hallo Karin!
Schon vorab herzlichst Danke.
Mein Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Dim Zelle As Range
Dim RaBereich As Range
If ActiveCell = "" Then
Exit Sub
Else
Set RaBereich = Range("D3:D200")
If Not Intersect(Range(Target.Address), RaBereich) Is Nothing Then
Set RaBereich = Nothing
End If
End Sub
Ich weis nicht weiter!!! Bitte hilf mir! Danke!
Gruß Frank H.

Anzeige
AW: klick in zelle blatte aktivieren
24.05.2014 23:23:11
UweD
Hallo Frank
so...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim RaBereich As Range
If Target.Count  1 Then Exit Sub
Set RaBereich = Range("D3:D200")
If Not Intersect(Target, RaBereich) Is Nothing Then
If Target.Value = "" Then Exit Sub
On Error GoTo Fehler
ThisWorkbook.Sheets(Target.Value).Activate
End If
Set RaBereich = Nothing
Exit Sub
Fehler:
MsgBox "Blatt existiert nicht"
End Sub
Gruß UweD

AW: klick in zelle blatte aktivieren
24.05.2014 23:54:15
Frank
Hall0 Uwe!
Funzt bestens. Vielen herzlichen Dank und 'ne gute Nacht!
Gruß Frank H.

AW: klick in zelle blatte aktivieren
25.05.2014 09:31:23
Beverly
Hi Frank,
es geht auch einfacher und ohne On Error:
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Not Intersect(Target, Range("D3:D200")) Is Nothing Then
If Not IsError(Evaluate(Target.Cells(1) & "!A1")) Then
Application.Goto reference:=Worksheets(Target.Value).Range("A1")
Else
MsgBox "Tabelle nicht vorhanden"
End If
End If
End Sub

Anzeige
AW: klick in zelle blatte aktivieren
25.05.2014 13:06:26
Frank
Hallo Karin!
Na wunderbar funzt auch bestens!
Danke und 'nen schönen Sonntag!
L. G. frank H.

301 Forumthreads zu ähnlichen Themen

makro markierung von Zeilen nach oben und unten
Zeilen

Hallo liebe Excel-Gemeinde,
ich weiss dass es schon viele Beiträge zum Thema "Löschen von Zeilen nach einer Bedingung" gibt, aber ich habe nach langer Suche keine Lösung bzw. Ansatzpunkt gefunden.
Problembeschreibung:
Ich brauche ein Makro, dass in der Spalte 2 nach 2 verschiedenen...
12.09.2008 08:37:02
Thread-ID: 1009273
3 Beiträge
Anzeige
makro Zeile nach unten verschieben
donald

Hallo,
ich hätte gern ein Makro für folgendes Problem: Ich habe eine tabelle, und wenn ich in eine Spalte, hier H, "Absage" eintrage, soll mir Excel die ganze Zeile nach unten verschieben, z.B. in Zeile 50. Bei einem anderen Wort, "Auftrag", soll mir die ganze Zeile auch verschoben werden,...
02.12.2008 16:08:24
Thread-ID: 1029545
5 Beiträge
Zeile automatisch nach unten verschieben
donald

Hallo,
ich hätte gern ein Makro für folgendes Problem: Ich habe eine tabelle, und wenn ich in eine Spalte, hier H, "Absage" eintrage, soll mir Excel die ganze Zeile nach unten verschieben, z.B. in Zeile 50. Bei einem anderen Wort, "Auftrag", soll mir die ganze Zeile auch verschoben werden,...
03.12.2008 08:43:00
Thread-ID: 1029673
5 Beiträge
Anzeige
SVERWEIS springt ungewollt Zeile nach unten
Christoph

Hallo Zusammen,
ich hänge an einem ganz seltsamen Problem und komme nicht dahinter woran es liegen könnte.
Benutze folgenden S-Verweis:
=WENN(SVERWEIS(E22;'Gebühren-Stammdaten_Berech.'!$D$11:$AH$47;31;FALSCH)=0;"";SVERWEIS(E22; 'Gebühren-Stammdaten_Berech.'!$D$11:$AH$47;31;FALSCH))...
07.02.2009 18:17:24
Thread-ID: 1048114
3 Beiträge
Durchsuchen und in Zelle daneben ersetzen
Holger

Hallo,
irgendwie komme ich nicht weiter. Ich möchte mit einem Makro die Spalte "A1:A5000" nach der
Zeichenfolge "SV" durchsuchen und überall wo "SV" gefunden wird in der Zelle rechts daneben
(also in der gleiche Zeile in Spalte "B") das Datum "01.01.2008" eintragen.
Ein Ansat...
26.02.2009 12:25:07
Thread-ID: 1054317
4 Beiträge
cursor am anfang eines textfeldes einer UF setzen
Holger

Hallo liebe Excelgemeinde,
ich versuche verzweifelt den cursor beim öffnen einer UF an den anfang einer Textbox zu plazieren und bekomme es nicht hin.
zu erklärung
in die textbox werden über userform_initialized daten geladen
textbox ist mit scrollbars versehen um daten ansehen...
10.03.2009 23:42:17
Thread-ID: 1058894
9 Beiträge
Leerzeile zählen-nach unten
robert

hi,
kann man-siehe datei- leere zeilen nach unten zählen?
z.B. A6 bis A10 ist leer-sind 5 leerzeilen
in B5 soll 5 stehen
gruß
robert
https://www.herber.de/bbs/user/60378.xls
17.03.2009 09:26:21
Thread-ID: 1061001
3 Beiträge
Zahl in Spalte finden und dann Zelle Aktivieren
Hans

Hallo Leute ich habe ein Problem das ich nicht gelöst bekommen.
Ich möchte in Spalte A:A einen Wert suchen der in der Variable "Zahl" steht.
Ist der Wert gefunden soll die gefundene Zelle mit "ActiveCell.Select" aktiviert werden
Wird der Wert nicht gefunden soll die erste leere Stel...
08.04.2009 10:45:33
Thread-ID: 1067641
4 Beiträge
Anzeige

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
2
13
4
4
8
2
3
8
2
3
4
18
1
4
2
2
10
17
11
2
4
5
4
11
2