Tabellencode

Forumthread: Tabellencode

Tabellencode

14.11.2024 20:44:32

Hatti

Ich habe eine Tabelle für Ausgaben erstellt und mit einem Rechtsclick auf die die Tabelle "Code anzeigen" gewählt. Dort eingetragen, was beim erreichen einer bestimmten Zelle passieren soll. Hat bisher funktionoiert (2024). Habe die Datei unter 2025 gespeichert und alle relevanten "Ausgaben" gelöscht. Also eine leere Tabellenstruktur. Alles da, nur der Seitencode funktioniert nicht. Warum? Muß ich da noch was aktivieren?

Was soll passieren? Wenn ich eine bestimmte Zelle erreiche, soll das aktuelle Datum eingetragen werden und in die nächste Zeile auf "A" gesprungen werden.

Kurzer Codeschnipsel:

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Target.Address = "$Q$5" Then
Selection = Date
Range("A6").Select
ElseIf Target.Address = "$Q$6" Then
Selection = Date
Range("A7").Select
ElseIf Target.Address = "$Q$7" Then
Selection = Date
Range("A8").Select

Usw.

Wenn Spalte "Q" erreicht ist, soll das Datum gesetzt werden und nächste Zeile. Hat bisher funktioniert. Leider in der Kopie für 2015 passiert nichts mehr... Warum?

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Tabellencode

14.11.2024 20:51:17

ralf_b
AW: Tabellencode

14.11.2024 20:58:41

Onur
AW: Tabellencode

14.11.2024 21:36:27

Hatti
AW: Tabellencode

14.11.2024 21:38:34

Onur
AW: Tabellencode

14.11.2024 22:08:12

Hatti
Gerne !

14.11.2024 22:13:39

Onur

AW: Tabellencode

14.11.2024 20:51:17

ralf_b

geht denn irgend ein Code? An diesem Code liegts scheinbar nicht.
Events vielleicht ausgeschaltet.

AW: Tabellencode

14.11.2024 20:58:41

Onur

DAS genügt vollkommen:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    Dim z, s

    z = Target.Row: s = Target.Column

    If s = 17 And z >= 5 Then

        Target = Date

        Cells(z + 1, s).Select

    End If

End Sub

Einfach in das Code-Modul des Blattes kopieren.

AW: Tabellencode

14.11.2024 21:36:27

Hatti

Klar, einfach geht immer... Leider das selbe Problem! Es passiert nichts. Muß ich noch irgenwas in der Mappe/Tabelle aktivieren?

Ich teste sowas lieber und wenn es funzt ist das gut. Klar kann man alles in eine Schleife packen. Aber bei mir ist das so (leider), wenn was funzt dann ist gut - keine Experimente...

Dein Code ist absolut logisch und einfach... Aber warum passiert nischt?

LG Hatti

AW: Tabellencode

14.11.2024 21:38:34

Onur

Es passiert nix? Nur, wenn du den Code FALSCH eingefügt hast.
Poste doch endlich mal die Datei, damit ich ihn einfügen kann.

AW: Tabellencode

14.11.2024 22:08:12

Hatti

Juti, ein klitzekleiner Fehler ist drinne: Als Zeile muß 1 stehen, sonst rattert der die Datums runter...

Mein Fehler war, daß ich die Makros in der Mappe nicht aktiviert hatte - muß einem senilen, alten Mann doch gesegt werden...

Egal! Es läuft und wesentlich einfacher, als meine "Abfragen"...

Vielen Dank!!

LG Hatti

Gerne !

14.11.2024 22:13:39

Onur

Du meinst: "als Spalte muss 1 stehen" ?
Hast Recht. Deswegen ist es immer besser, eine Beispielsdatei zu posten. :)

Forumthread: Tabellencode

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

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread