SelectionChange Problem

Forumthread: SelectionChange Problem

03.06.2003 12:49:28

Lukas

Hallo Leute,

Was mache ich falsche, es kommt dauern ein fehler in der dritten zeile bei Range("A1").Value

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = Range("A1") Then
Range("D1").Value = Range("A1").Value
End If
End Sub

Ich möchte dass er mir bei Klick auf A1 diesen Wert in D1 schreibt. Wie kann ich das machen?? oder was mache ich falsch?

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

Re: SelectionChange Problem

03.06.2003 13:11:21

L.Vira

Re: SelectionChange Problem

03.06.2003 13:11:21

L.Vira

Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" Then [d1] = [a1]
End Sub

Forumthread: SelectionChange Problem

1 Beitrag zum Forumthread Beitrag zu diesem Forumthread

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread