Thread: VBA Question
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Scottmk Scottmk is offline
external usenet poster
 
Posts: 1
Default VBA Question

Hello everyone,
I have the following Code in Excel:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address < "$G$4" Then Exit Sub
Application.Goto Cells.Find(Target, after:=Target)
End Sub

I'm sure you are familiar with this??? Someone gave it to me her
awhile ago. It just lets me type something in a cell and then it goe
and finds whatever I typed on the worksheet.

Okay, here is what I would like my code to do. Instead of going to th
cell that contains that data, I would like it to return the value o
the cell to the right of that cell in the cell underneath the one yo
enter stuff in. Got it?? I know. Also, there is going to be more tha
just one, so how can I get it to return all values to the right of al
values I entered? Whoa, here is an example:

I have a list that is sorted:

DDD John
DDD Mike

EEE AL
EEE Joe
EEE John

GGG Joe

HHH Joe

Okay, So I type into Cell G4 (going back to the code) "DDD". I wan
Cells G6 and G7 to display John and Mike, respectively. Thank you s
much

--
Message posted from http://www.ExcelForum.com