J
jlclyde
I am trying to return the address of the top left cell in a merged
range. thsi is what I have so far and it is not even close to right.
Set Rng = Range("A52:BS52").Find(what:=ComboBox1.Text,
lookat:=xlWhole, _
Searchdirection:=xlPrevious, MatchCase:=False)
MsgBox Rng.MergeArea.Resize(1, 1).Address
Thanks,
Jay
range. thsi is what I have so far and it is not even close to right.
Set Rng = Range("A52:BS52").Find(what:=ComboBox1.Text,
lookat:=xlWhole, _
Searchdirection:=xlPrevious, MatchCase:=False)
MsgBox Rng.MergeArea.Resize(1, 1).Address
Thanks,
Jay