Microsoft Excel

Herbers Excel/VBA-Archiv

Zelle anklickbar machen und Inhalt ändern

Betrifft: Zelle anklickbar machen und Inhalt ändern von: Tobias
Geschrieben am: 13.09.2004 19:02:11

Hallo Leute,

ich möchte eine einzelne Zelle anklickbar machen. Wenn sie angeklickt wird, soll ein Makro aufgerufen werden, dass den Inhalt von dieser Zelle verändert.

Ist wahrscheinlich ganz einfach, aber ich bin zu blöd.

Danke für die Hilfe,
DerTobi

  


Betrifft: AW: Zelle anklickbar machen und Inhalt ändern von: Hani
Geschrieben am: 13.09.2004 20:10:37

Option Explicit

Sub Anklickbar() 
       Dim nName As Name 
   Set wbBok = ThisWorkbook 
 Each nName In wbBok.Names 

          On Error Resume Next 
      Set rnName = Nothing 
                 Next nName  
End 
Sub 



  


Betrifft: AW: Zelle anklickbar machen und Inhalt ändern von: chris b
Geschrieben am: 13.09.2004 20:14:45

Evtl. habe ich es nicht ganz verstanden aber ich glaube du suchst sowas....

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
c = Target.Column
r = Target.Row

If c = 1 And r = 1 Then
Cells(c, r) = "jetzt bin ich verändert"


End If

End Sub



grüße Chris


  


Betrifft: AW: Zelle anklickbar machen und Inhalt ändern von: PeterW
Geschrieben am: 13.09.2004 20:16:03

Hallo Tobias,

dieser Code im Modul der Tabelle dürfte die Aufgabe lösen, wenn - wie im Code - A5 die angeklickte Zelle ist:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   If ActiveCell.Address = "$A$5" Then
      'dein Makro
   End If
End Sub

Gruß
Peter


  


Betrifft: AW: Zelle anklickbar machen und Inhalt ändern von: Tobias
Geschrieben am: 14.09.2004 00:43:25

genau, dankeschön


 

Beiträge aus den Excel-Beispielen zum Thema "Zelle anklickbar machen und Inhalt ändern"