Gruppen

Top Gruppen: Windows 7; Windows Vista; Windows XP; Textverarbeitung; Excel; DSL; Internet Browser; E-Mail/Outlook
Betriebsysteme: Windows classik; Linux; BS-Sonstige
Software: Datenbanken; Bildbearbeitung; Audio/mp3/Video; Security/Viren; SW-Sonstige
Hardware: Mainboard/CPU; Grafikkarten; Peripherie; Laptop/Notebook; HW-Sonstiges
Netzwerk: Telefon,ISDN,Modem; W-Lan; NW-Sonstiges
Programmierung: PHP,ASP,Perl...; Java,C++...; Webseiten/HTML
Sonstiges: PC-Sonstiges; Plauderecke; SN Intern; Test

/ Forum / Skripte(PHP,ASP,Perl...)

Skripte(PHP,ASP,Perl...)

Fragevon Sebbl vom 27.03.2020, 09:05 Options

X in Zelle bei Einfach-Klick

Hi,

ich möchte gern, dass Excel mir (nach einem Einfach-Klick) ein x die in die angeklickte Zelle schreibt.

Bisher hab ich das nur bei Doppelklick hinbekommen:

Der Code dafür sieht so aus :


Option Explicit

Private Sub Worksheet_BeforeDoubleclick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("A1:A10")) Is Nothing Then
  Target = IIf(Target = "x", "", "x")
  Cancel = True
End If
End Sub

Kann mir vielleicht jemand auf die Sprünge helfen ?

Gruss
Sebastian

Antwort schreiben

Antwort 1 von gast122 vom 28.03.2020, 18:17 Options

hi sebastian

gruss gast122

nutze das ereignis

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End Sub

einzufuegen

alt+f11/projektexplorer/DeineTabelle

Antwort 2 von Sebbl vom 30.03.2020, 22:42 Options

Hi Gast122,

danke für die Antwort.
Das ganze hatte ich jedoch auch schon probiert und leider funktioniert es so nicht.
Kann es vielleicht, daran liegen, dass ich noch Excel 2000 nutze ?

Gruss
Sebastian

Antwort 3 von gast122 vom 31.03.2020, 13:37 Options

hi sebastian

hab auch excel 2000

eigentlich laesstsich da nix falsch machen

gruss gast122

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Tipp einschicken

News einschicken