Bei klick in Zelle in andere zelle springen

Forumthread: Bei klick in Zelle in andere zelle springen

26.01.2015 22:57:52

Guesa

Hallo Leute
Ich brech mir seit Tagen die Finger an folgendem Problem
Ich habe eine Tabelle die "Vorlage" heißt, nun möchte ich, dass nur in dieser Tabelle, wenn ich in Zelle F3 klicke automatisch in Zelle G3 gesprungen wird. Wenn ich nun diese Tabelle kopiere soll die Zelle F3 wieder anwählbar sein.
Kann mir da jemand helfen
Gruß
Guesa

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Code in Diese Arbeitsmape ...

26.01.2015 23:20:50

Matthias
AW: Code in Diese Arbeitsmape ...

27.01.2015 16:30:24

Guesa

Code in Diese Arbeitsmape ...

26.01.2015 23:20:50

Matthias

Hallo
Code in gehört in DieseArbeitsmappe ...

Option Explicit
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
If ActiveSheet.Name = "Vorlage" Then
If Target.Address = Range("F3").Address Then Range("G3").Select
End If
End Sub

Gruß Matthias

AW: Code in Diese Arbeitsmape ...

27.01.2015 16:30:24

Guesa

Hallo Matthias
Danke für Deine Hilfe, läuft wunderbar.
Ich habe immer versucht im Tabellenblatt einen Befehl dafür zu schreiben bzw. umzuschreiben, auf die Arbeitsmappe wäre ich nie gekommen.
Naja, man lernt immer wieder dazu
Gruß
Guesa

Infobox / Tutorial

Schritt-für-Schritt-Anleitung

Um in Excel bei einem Klick auf eine Zelle in eine andere Zelle zu springen, kannst Du folgenden VBA-Code verwenden. Dieser Code muss in das Modul „DieseArbeitsmappe“ Deiner Excel-Datei eingefügt werden. So funktioniert es:

Öffne Deine Excel-Datei und drücke ALT + F11, um den VBA-Editor zu öffnen.
Suche im Projekt-Explorer auf der linken Seite nach „DieseArbeitsmappe“.
Doppelklicke auf „DieseArbeitsmappe“.

Füge den folgenden Code ein:

Option Explicit
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
    If ActiveSheet.Name = "Vorlage" Then
        If Target.Address = Range("F3").Address Then Range("G3").Select
    End If
End Sub

Schließe den VBA-Editor und gehe zurück zu Excel.
Teste den Code, indem Du auf Zelle F3 in der Tabelle „Vorlage“ klickst. Excel springt automatisch zu Zelle G3.

Häufige Fehler und Lösungen

Fehler: Der Code funktioniert nicht.
- Lösung: Stelle sicher, dass Du den Code im richtigen Modul „DieseArbeitsmappe“ eingefügt hast. Der Code muss in der Arbeitsmappe und nicht im Tabellenblatt-Modul sein.
Fehler: Excel springt nicht zu G3, obwohl auf F3 geklickt wurde.
- Lösung: Überprüfe, ob der Name des Tabellenblatts genau „Vorlage“ ist und ob kein anderes Makro den Auswahlvorgang stört.

Alternative Methoden

Wenn Du keine VBA-Programmierung verwenden möchtest, kannst Du auch Hyperlinks einsetzen, um zu einer anderen Zelle oder einem anderen Tabellenblatt zu springen. So geht's:

Wähle die Zelle aus, die den Hyperlink enthalten soll (z.B. F3).
Klicke mit der rechten Maustaste und wähle „Hyperlink“.
Wähle „Ort in diesem Dokument“ und gib die Zielzelle an (z.B. G3).
Bestätige mit OK.

Diese Methode funktioniert jedoch nicht automatisch, sondern nur, wenn Du auf den Hyperlink klickst.

Praktische Beispiele

Springen innerhalb des gleichen Blattes:
- Wenn Du in Zelle A1 klickst und zu Zelle B2 springen möchtest, ändere die Adressen im VBA-Code entsprechend.
Springen zu einem anderen Tabellenblatt:
- Um zu einem anderen Tabellenblatt zu springen (z.B. „Daten“), kannst Du den Befehl Sheets("Daten").Select verwenden. Der Code könnte so aussehen:
```
If Target.Address = Range("F3").Address Then
    Sheets("Daten").Select
    Range("A1").Select
End If
```

Tipps für Profis

Verwende Application.Goto: Mit dieser Methode kannst Du direkt in die gewünschte Zelle springen. Das ist besonders nützlich, wenn Du in große Tabellen springst.
Kombiniere mit anderen Ereignissen: Du kannst den Code erweitern, um auch auf andere Ereignisse wie das Ändern von Zellen zu reagieren.
Teste in einer Kopie: Bevor Du den Code in Deiner Hauptarbeitsmappe verwendest, teste ihn in einer Kopie, um Fehler zu vermeiden.

FAQ: Häufige Fragen

1. Wie kann ich den Code anpassen, um in andere Zellen zu springen?
Du musst die Adressen im Code entsprechend ändern. Ersetze Range("F3") und Range("G3") durch die gewünschten Zellen.

2. Funktioniert dies auch in Excel für Mac?
Ja, der VBA-Code funktioniert sowohl in Excel für Windows als auch in Excel für Mac, solange die VBA-Funktionalität aktiviert ist.

Beliebteste Forumthreads (12 Monate)

Bei klick in Zelle in andere zelle springen

Forumthread: Bei klick in Zelle in andere zelle springen

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

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Infobox / Tutorial

Zelle in Excel bei Klick wechseln

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread