Microsoft Excel

Herbers Excel/VBA-Archiv

Bei Klick. | Herbers Excel-Forum


Betrifft: Bei Klick. von: Urs-Hans
Geschrieben am: 01.02.2010 18:08:50

Hallo Excel-Freunde.

Habe folgende Anforderung.
Wenn ich in Tabelle1 die Zelle D8 anklicke soll der Text in Tabelle2 Zellen D10+D11 erscheinen.
Wenn ich wieder wegklicke sollte der Text wider weg gehen...
Geht soo etwas mit VBA, bitte um Hilfe.

https://www.herber.de/bbs/user/67676.xls

Danke.
Liebe Grüsse
Urs

  

Betrifft: AW: Bei Klick. von: Chris
Geschrieben am: 01.02.2010 18:16:01

kopiere das in ein Modul in Tabelle 1:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target = Range("D8") Then
Sheets(2).Range("D10") = "Fehlendes Personal."
Sheets(2).Range("D11") = "2 MA fehlen"
Else
Sheets(2).Range("D10") = ""
Sheets(2).Range("D11") = ""
End If
End Sub


VBA Editor öffnen --> In deiner Datei Tabelle 1 auswählen --> reinkopieren --> fertig


  

Betrifft: AW: Bei Klick. von: Urs-Hans
Geschrieben am: 01.02.2010 20:22:43

Vielen Dank.

Grüsse
Urs