Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
448to452
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
448to452
448to452
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Selection Change

Selection Change
03.07.2004 10:50:38
Herbert
Hallo Forum Mitglieder
Ich habe ein Problem bei Worksheet Selection_Change. Bei wechseln einer Zelle soll ein Makro ausgeführt werden. Wenn ich mit der Maus den Range wechsle ist alles I.O., wechsle ich die Zelle jedoch mit der Tab oder Pfeiltaste dann wird die Funktion nicht angesprochen es passiert nichts.
herzlichen Dank für Eure Hilfe
Herbert

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Selection Change
Knut
Dein Problem ist leider nicht nachvollziehbar.
Knut
AW: Selection Change
04.07.2004 09:30:11
Herbert
Salü Knut & HerbertH
Herzlichen Dank für Eure Hilfe. Mein Problem ist wenn ich mit der Pfeiltaste eine Zelle wechsle passiert nichts. Mit der Maus ist alles OK. Das Blatt ist geschützt die Zelleingabe jedoch erlaubt sofern ein Zelle > als die dritte Zelle in der Spalte J angwählt wurde.
Ciao Herbert

Private Sub Worksheet_SelectionChange _
(ByVal Target As Excel.Range)
Dim bln As Boolean
Dim rng As Range
If Target.Column <> 10 Then Exit Sub
Set rng = Range("J1:J2")
If Target.Address = rng.Address Then bln = True
If bln = True And Target.Address <> rng.Address Then
vOld = Target.Value
' Hier werde ich eine Function ausführen
bln = False
End If
End Sub

Anzeige
AW: Selection Change
HerbertH
halllo Herbert,
könntest du die Mappe hochladen,wo das Problem auftritt...
Gruß Herbert

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige