Delete cell

Flex13CMP · Apr 25th, 2002, 02:41 PM

hello mr excel,
I have a problem for anybody to work out
I want to delete everything in a cell, I have tried this macro but it does not seem to work, could somebody out there fix it for me please thank you.

Private Sub CommandButton1_Click()
Range("A1").Select
Dim n As Integer
n = 11
Do Until Range("c" & CStr(n)).Value = TextBox1
n = n + 1
Loop
Range("C" & CStr(n)).Select
Range("F" & CStr(n)).Select
Range("H" & CStr(n)).Select

End Sub

bergy · Apr 25th, 2002, 02:50 PM

I don't see any 'delete' command in your code. What do you want to delete?

Flex13CMP · Apr 25th, 2002, 02:54 PM

I want to search say apple using a userform and then just click on a button and it is deleted from the sheet.

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Apr 25th, 2002, 02:41 PM	#1
Flex13CMP New Member Join Date: Apr 2002 Location: Isle of Man Posts: 7	hello mr excel, I have a problem for anybody to work out I want to delete everything in a cell, I have tried this macro but it does not seem to work, could somebody out there fix it for me please thank you. Private Sub CommandButton1_Click() Range("A1").Select Dim n As Integer n = 11 Do Until Range("c" & CStr(n)).Value = TextBox1 n = n + 1 Loop Range("C" & CStr(n)).Select Range("F" & CStr(n)).Select Range("H" & CStr(n)).Select End Sub

Apr 25th, 2002, 02:50 PM	#2
bergy Board Regular Join Date: Apr 2002 Posts: 112	I don't see any 'delete' command in your code. What do you want to delete?

Apr 25th, 2002, 02:54 PM	#3
Flex13CMP New Member Join Date: Apr 2002 Location: Isle of Man Posts: 7	I want to search say apple using a userform and then just click on a button and it is deleted from the sheet.