Validation List (reposted)

[cwv1949]

I had posted earlier today a question which is causing me confustion regarding Target.address. Here is my code maybe someone could help with this problem


Dim xl As Double
<?xml:namespace prefix = o ns = "urn:schemas-microsoft-comfficeffice" /><o> </o>
If target.Address = "$A$1" Then
xl = WorksheetFunction.Match(target.Value, Sheets("sheet1").Range("a:a"), 0)
Sheets("sheet1").Rows(1).Offset(xl - 1, 0).Copy
ActiveSheet.Paste Destination:=Worksheets("sheet3").Range(iRow, "E")
End If

 

[baitmaster]

not sure what your problem is, but Im guessing its testing whether Target / A1 overlap in some way

try

If not intersect(target, range("A1")) is nothing then