Im Wesentlichen muss ich ein einfaches Tallying-System in Excel entwickeln, um mein Hauptprojekt einfacher zu machen.Wert in Zelle um 1 erhöhen, wenn geklickt wird
Alles, was ich tun können, ist auf eine Zelle klicken (eine beliebige Zelle in der Spalte B) und wenn ich das tue, sollte der Wert innerhalb von eins um eins erhöht werden.
Ich habe versucht, diesen Code als POC zu verwenden, aber es scheint nicht zu funktionieren.
Ich habe eine vernünftige Menge an Programmierung gemacht, aber habe nie versucht, es in Excel zu integrieren, bevor so jede Hilfe geschätzt würde!
Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If IsNumeric(Target.Value) Then
Target.Value = Target.Value + 1
Application.EnableEvents = False
Target.Resize(1, 2).Select
Application.EnableEvents = True
Cancel = True
End If
End Sub
Wie isn Funktioniert es? Es scheint für mich zu funktionieren (Anmerkung: Ich denke nicht, dass Sie [.Select' Statement] brauchen/wollen. Http://stackoverflow.com/questions/10714251/how-to-avoid-using-select-in -excel-vba-Makros)). Hast du es in das * Arbeitsblatt * Modul des Blattes gelegt, auf dem es laufen soll? – BruceWayne
Wenn ich auf die Zelle doppelklicke, scheint nichts zu passieren, wenn diese Zelle ausgewählt wird. Ich habe die Anweisung 'select' losgeworden und nichts scheint sich zu ändern. Es befindet sich in 'Module1' im Ordner' Modules', es muss mit 'Sheet1' arbeiten, das sich im Ordner' Microsoft Excel Objects' befindet. Sorry, wenn das eine unglaublich einfache Frage ist –