Hallo,
irgendwie funktionieren heute Morgen meine grauen Gehirnzellen noch nicht. Ich möchte, wenn ich in eine Zelle (Zelle: W7) klicke ein Makro (Makro: Haus1) ausführen lassen. Das Makro funktioniert auch, nur mit dem Aktivieren der Zelle habe ich so meine Mühe. Über eine kleine Hilfestellung wäre ich dankbar.
VG
Peter
Hi,
Du kannst mit einem Aktivier-Event für die Zellen ein Makro starten, mußt dazu dann aber die Zellen einschränken.
Mir fällt leider gerade der Name des Events nicht ein und ich habe hier kein Excel.
Gehe im VBA-Editor im Worksheet auf die Auswahl oben rechts und suche Dir den richtigen Event.
Hallo,
diese Ereignisprozedur schreibst du in das Modul des Tabellenblattes, in dem sie wirken soll. Soll es nur in bestimmten Zellen wirken, muss das mit Intersect definiert werden.
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Haus1
End Sub
Dein Makro gehört in ein Standardmodul.
Hallo,
ich bin schon jenseits der 60zig und in der VBA-Sprache nicht so bewandert. Events und Intersect sind für mich böhmische Dörfer. Das Makro soll auch nur funktionieren, wenn ich auf Zelle W7 klicke.
Peter
Hallo Peter,
dann versuche es so:
Zitat:Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Set isect = Application.Intersect(Target, Range("W7"))
If Not isect Is Nothing Then Haus1
End Sub
Zitat:ich bin schon jenseits der 60zig und in der VBA-Sprache nicht so bewandert.
Die Ausrede gilt übrigens nicht, ich bin über 70.
Hallo Klaus-Dieter,
vielen Dank für die schnelle und auch hilfreiche Unterstützung. Jetzt funktioniert es so, wie ich es mir vorstelle.
PS: Und zum Alter sei gesagt. Man ist so alt, wie man sich fühlt. Und ich fühle mich sehr alt, denn, wenn man all das nicht mehr machen kann, was einem vorher viel Freude bereitet hat. Zur EDV bin ich erst vor 3 Jahren gestoßen. Nach mehreren OPs. Vorher kannte ich nur meinen Job (Handwerksmeister) und die Liebe zum Fußball (Über 40 Jahre Jugendtrainer).
Viele Grüße
Peter