View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Patrick Molloy[_2_] Patrick Molloy[_2_] is offline
external usenet poster
 
Posts: 1,298
Default Listbox to change value in cell

try this

Private Sub CommandButton1_Click()

If ListBox1.ListIndex < 0 Then Exit Sub

With Worksheets("Sheet2").Range("A6")
.Offset(ListBox1.ListIndex, 1) = "yes"
End With

End Sub


"Jeremy" wrote:

I have a listbox with 3 columns going (1, 2, 3). Feeding this listbox is a
sheet with three columns (A,B,C).

What I am trying to do is when the user clicks on a button, the value that
is currently selected in listbox column 3 is looked up on the sheet in Column
C and the value next to it, Column B is changed to "yes"...which would then
change the listbox column 2 to "yes"

I know I need to do an offset, but having a hard time getting started, I
appreciate anyone's help.