Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Delete Entire Row
Need 1 fine adjustment I left out, that I had working before, but cannot now.
To ADD a Delete ROW in code below where value Combobox2 came from, to delete the row that the values came from to prevent them being used again. Code: Private Sub CommandButton1_Click() Dim FindIT As Range Application.ScreenUpdating = False With Sheets("Sheet2") Set FindIT = ..Range("a:a").Find(What:=DateValue(ComboBox1.Valu e)) FindIT.Offset(0, 1).Value = ComboBox3.Value FindIT.Offset(0, 2).Value = Val(ComboBox2.Value) FindIT.Offset(0, 3).Value = ComboBox2.Column(0) End With Sheets("Sheet2").Select ' <==== Delete Combobox2.value Entire Row ??? Range("A1").Select Sheets("Sheet1").Select Application.ScreenUpdating = True End Sub Regards Corey.... |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Delete entire row if | Excel Discussion (Misc queries) | |||
Need to delete last value in column but not delete entire row | Excel Programming | |||
Delete Entire Row | Excel Programming | |||
Delete Entire Row If Q | Excel Programming | |||
Delete Entire Row. | Excel Programming |