Thread: Find Method
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
LiSa LiSa is offline
external usenet poster
 
Posts: 17
Default Find Method

Hello

I have two workbooks called Alpha and Beta, which both
have one worksheet (Sheet1).
Alpha has a string in range A1 and a command button on it.
When the user clicks the button on Alpha, I want Excel to
open Beta and do a 'Find' in the Column A of Beta, for the
string that is in range A1 of Alpha.

If the string is found on Beta, then I want to
activate/select the cell two columns along on the same
row, offset(0,2), else if it doesn't find it then do
nothing.

This is my code so far which doesn't work.

Private Sub Commandbutton1_Click()
Workbooks.Open "path to Beta"
With ActiveWorkBook.Sheet1.Columns(1)
Set C = .Find(What:=ThisWorkBook.Sheet1.Range("A1"))
If Not c is Nothing