title image


Smiley Re: Makro: Click auf Feld, und in einem Anderen Feld wird eine Zahl um 1 erhöht
Moin,



geht wohl nur per VBA.

Folgendes Makro in das entsprechende Tabellenblattmodul (Rechtsklick auf Tabellenblattnamen und "Code einfügen")kopieren:



Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Application.EnableEvents = False

If Not Intersect(Target, Range("A1:A10")) Is Nothing Then

Target.Offset(0, 1) = Target.Offset(0, 1) + 1

End If

Application.EnableEvents = True

End Sub



Bei anklicken einer der Zellen A1:A10 wird in der entsprechenden Zelle rechts daneben um 1 hochgezählt.
Gruß aus Köln! Marc

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: