Extract data from one sheet

**kryt0n** · 01-04-2011, 07:58 AM

Hi all.

I have a workbook with 2 sheets. I have a userform which pulls data from Sheet1 into a listbox (does some editing) and then places the data into Sheet2.

This is all working fine, however I need the data to be deleted from Sheet1 when it has been moved. How do I go about doing this?

Please see attached .xls

**kryt0n** · 01-04-2011, 10:24 AM

Anyone know how I should be approaching this?

I really just want to move data from one sheet to another via a userform.

I've done my best to google this but just can't find what I need.

**Mordred** · 01-04-2011, 10:51 AM

Something like this:

Sub delData()
Application.Worksheets("Sheet1").Range("A2:E100").Clear
End Sub

**Mordred** · 01-04-2011, 10:52 AM

The last post clear all except the headings. If you want it all to clear just change the range.

**kryt0n** · 01-04-2011, 11:17 AM

Thanks for that

Problem is I don't want to clear all the data, I want it so that when you select a row in the list box and move it to Sheet2, it deletes only that selected row.

Now, the list box could list 20 rows, and I select row 18 and copy that to Sheet2, I want it to only then delete row 18 (the selected row) from sheet1, leaving 19 rows in Sheet1 and 1 in Sheet2.

Does that make anymore sense?

**kryt0n** · 01-04-2011, 12:56 PM

Anyone? I'm sure there's a simple solution to this that I'm just not getting...

**mohanvijay** · 01-05-2011, 03:01 AM

Try this

Set fin = Sheets(1).Cells.Find(What:=issuesdesc_text.Value, After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
        xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
        , SearchFormat:=False)
        
        fin.EntireRow.Delete

**eaglepoint_marketing** · 01-05-2011, 06:37 AM

I have email master database file and I have another email database file which I called bad email addresses.
I need to delete all email address from the bad email address file in my email master database file. Anyone who knows a tool from MS EXCEL 2007 that could automate this deletion process please post.