delete combo box entry

[techie131]

I have a data input program in excel that uses a combo box to select the entries. What I would like to do is add some coding so that once they select the combobox entry and hit the button to enter the data to excel it will delete that entry which is located in a another sheet within the workbook. Can someone tell me how I would code that

 

[Loomah]

hi
you could adapt something like the code below where cboData is my combo and the range "combodata" is an xl range used for the combo's rowsource

Private Sub cmdOK_Click()
Dim lRow As Long
Dim c As Range

If IsEmpty([Sheet1].Cells(1, 2)) Then
    lRow = 1
Else
    lRow = [Sheet1].[b65536].End(xlUp).Row + 1
End If
[Sheet1].Cells(lRow, 2) = cboData.Value

Set c = Range("combodata").Cells.Find(cboData.Value)
c.Delete (xlUp)
End Sub

;-)

If a man says something and there are no women there to hear him, is he still wrong?
How do I get the best answers?​