View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Greg B[_8_] Greg B[_8_] is offline
external usenet poster
 
Posts: 10
Default Repost Of ealier Question

Hi all I had asked this before but I dont think I was very clear so I will
try to explain this better.

I have a userform where I have a combobox1 which it rowsource is ranges
a1:c:1000
I also have 2 textbox's

textbox1 and textbox2

I want to have a macro look up the value of combobox1 and then compare it
with sheet "reg". Once it has found the item I want the value of textbox1
to automatically add on to the value in that cell which is in column "e" and
the same with textbox2 with column"f".

Bob tried to help with this code below but it does not seem to work.
Set rng = Worksheets("Sheet1").Range("A1:A10")
On Error Resume Next
iPos = Application.Vlookup(Listbox1.Value)
On Error GoTo 0
If iPos 0 Then
Worksheets("Sheet1").Cells(iPos, "E").Value = _
Worksheets("Sheet1").Cells(iPos, "E").Value TextBox1.Text
Worksheets("Sheet1").Cells(iPos, "F").Value = _
Worksheets("Sheet1").Cells(iPos, "F").Value Textbox2.Text
End If

Thanks

Greg