Target Adresse

Forumthread: Target Adresse
7 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Target Adresse

Target Adresse

11.12.2007 12:06:37

serge

Hallo leute
wie kann ich definieren das meine Zielzelle(n) im Bereich "monat1" sein soll!
If Target.Address = monat1 Then klappt nicht
Danke Serge

7
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Target Adresse

11.12.2007 12:09:00

Hajo_Zi
AW: Target Adresse

11.12.2007 12:24:52

serge
AW: Target Adresse

11.12.2007 12:26:00

Hajo_Zi
AW: Target Adresse

11.12.2007 12:29:00

serge
AW: Target Adresse

11.12.2007 12:32:20

Hajo_Zi
AW: Target Adresse

11.12.2007 12:37:32

serge
AW: Target Adresse

14.12.2007 20:35:20

serge

AW: Target Adresse

11.12.2007 12:09:00

Hajo_Zi

Hallo Serge,
Set RaBereich = Intersect(Range("monat1"), Range(Target.Address))
damit hast Du alle Zellen die in dem Bereich sind auf der Variablen.
Gruß Hajo

AW: Target Adresse

11.12.2007 12:24:52

serge

Hallo Hajo
ich habe es so eingebaut aber es kneifft noch : "die Methode Range ist für das Object_Global fehlgeschlagen"


Sub commandbutton()
Set RaBereich = Intersect(Range("monat1"), Range(Target.Address))
If Target = RaBereich Then
Übersicht.Show
Else
Exit Sub
End If
End Sub

(wenn eine Zelle im Bereich "monat 1 angewählt wird soll die Funktion ausgeführt werden, ansonsten stopppen)
Gruss
Serge