Worksheet_Change: kriege Target nicht hin :-((

Bild

Betrifft: Worksheet_Change: kriege Target nicht hin :-((
von: Franz W.
Geschrieben am: 26.11.2003 12:33:39

Hallo Forum,

ich schäme mich ja ganz mächtig, aber ich steh grade total auf dem Schlauch und spiel mich jetzt schon ne Weile mit:

ich möchte, dass "Testbereich" ausgewählt wird NUR nach einer Änderung in Zelle "A9". Aber entweder macht er es immer, oder gar nicht (auch nicht nach Änderung in A9. Einer meiner Versuche:


Private Sub Worksheet_Change(ByVal Target As Range)
Dim myStart As String
myStart = [A9]
    If Not Target.Address = myStart Then Exit Sub
    Range("TestBereich").Select
End Sub



Ich bitte Euch um Eure Hilfe und sage schon mal Danke im Voraus

Grüße
Franz
Bild


Betrifft: AW: Worksheet_Change: kriege Target nicht hin :-((
von: Mac4
Geschrieben am: 26.11.2003 12:38:50

Hallo Franz,

so gehts:


Private Sub Worksheet_Change(ByVal Target As Range)
Dim myStart As String
myStart = [A9].Address
    If Not Target.Address = myStart Then Exit Sub
    Range("TestBereich").Select
End Sub


Marc


Bild


Betrifft: AW: Worksheet_Change: kriege Target nicht hin :-((
von: Franz W.
Geschrieben am: 26.11.2003 12:44:19

Hallo Marc,

ganz vielen Dank!! So eine Kleinigkeit :-((

Vielen Dank und Grüße
Franz


Bild


Betrifft: AW: Worksheet_Change: kriege Target nicht hin :-((
von: xXx
Geschrieben am: 26.11.2003 12:41:39

Hallo,
mit Intersect abfragen:
If Application.Intersect(Target,Range("a9")) is Nothing then Exit Sub.

Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S. Das Forum lebt auch von den Rückmeldungen der Frager an die Antworter!


Bild


Betrifft: AW: Worksheet_Change: kriege Target nicht hin :-((
von: PeterW
Geschrieben am: 26.11.2003 12:42:51

Hallo Franz,

ohne zusätzliche Variable:

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Address = "$A$9" Then 
    Range("TestBereich").Select
  End If
End Sub

Gruß
Peter


Bild


Betrifft: Vielen Dank Euch allen !!
von: Franz W.
Geschrieben am: 26.11.2003 12:45:49

Da lern ich ja mehrere Möglichkeiten, wie man das machen kann!

Vielen Dank Euch und Grüße
Franz


Bild

Beiträge aus den Excel-Beispielen zum Thema " Mitarbeiterliste"