Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 10:38:52
Bedingte Formatierung per VBA / MaxPoint
25.04.2024 10:30:04
Suche mit MINWENNS und Rückgabe mehrerer Werte
25.04.2024 09:47:49
Daten aus mehreren Dateien untereinander importieren
25.04.2024 09:31:31
Bild "In Zelle platzieren"
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
880to884
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
880to884
880to884
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Ereignis, bei Doppelklick bestimmtes Feld anspring

Ereignis, bei Doppelklick bestimmtes Feld anspring
22.06.2007 16:26:05
Peter
Hallo
Ich brauche etwas Nachhilfeunterricht für eine Ereignisprozedur.
In einer Tabelle stehen in Spalte A verschiedene Zahlen, z.B. in
Zeile 1: 5
Zeile 2:13
Zeile 3: 55
Zeile 4: 111
Zeile 5: 202
Nun möchte ich, dass bei Doppelklick auf das Feld A2 die Zelle D13 in der Tabelle "Journal" angeesprungen wird. Bei einem Doppelklick auf Feld A5 soll in der Tabelle "Journal" die Zelle D202 angewählt werden.
In der Spalte A können Einträge bis Zeile 500 enthalten sein; immer soll die entsprechende Zelle in der Tabelle "Journal" angewählt werden.
Bin gespannt auf Feedback.
Danke, Peter

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

Betreff
Datum
Anwender
Anzeige
AW: Ereignis, bei Doppelklick bestimmtes Feld ansp
22.06.2007 16:43:27
Renee
Mazwara Peter,
Kopier diesen Code in Dein Tabellenblatt:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Target, ActiveSheet.Range("A1:A500")) Is Nothing Then Exit Sub
If Int(Val(Target.Value)) = Target.Value _
And Target.Value


Greetz Renee

AW: Ereignis, bei Doppelklick bestimmtes Feld ansp
22.06.2007 16:58:00
Peter
Hallo Renee
Das ist aber super, genau wie gewünscht. Nur "Mazwara" habe ich nicht verstanden ...
Danke vielmals und Gruss, Peter

AW: Ereignis, bei Doppelklick bestimmtes Feld anspring
22.06.2007 16:47:05
Andi
Hi,
zB so:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 1 Then
Sheets("Journal").Activate
Sheets("Journal").Range("D" & CStr(Target.Value)).Select
Cancel = True
End If
End Sub


Schönen Gruß,
Andi

Anzeige
AW: Ereignis, bei Doppelklick bestimmtes Feld ansp
22.06.2007 16:54:17
Renee
Mein Code hat noch den Fehler "leere Zelle"
So sollte es besser sein:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Target, ActiveSheet.Range("A1:A500")) Is Nothing Then Exit Sub
If Int(Val(Target.Value)) = Target.Value _
And Target.Value  0 Then
ThisWorkbook.Sheets("Journal").Select
ActiveSheet.Range("D" & Target.Value).Select
End If
End Sub


Greetz Renee

AW: Ereignis, bei Doppelklick bestimmtes Feld ansp
22.06.2007 17:18:28
Peter
Vielen Dank Renée für diese Verbesserung
und auch den anderen, die so schnell reagiert haben!
Peter
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige