Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Westi on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

text delete

Status
Not open for further replies.

motorsito

Programmer
May 2, 2009
1
US
Hello there, I have a slight problem that is breaking me up, I am an amateur VBA writer, and I am trying to solve this: in excell sheet 1 I have something like this, this is for a report with at least 50 pages and this is just an example.

Sold SUPERVALU - CHAMPAIGN (CD) Ship COUNTY MARKET #83
To: C/O SUPERVALU CENTRAL DISTRIBU To: 3001 VETERANS PARKWAY
P.O. BOX 125 SPRINGFIELD IL 62704
MINNEAPOLIS MN 55440
Customer Purchase order Spec instructions Terms / Slsp
521467 61859055 SUPERVALU WAREHOUSE CHAMPAIGN NET 14 DAYS
- 83 SZYDLO, PAUL
Quantity Units
on order Item Description U/M shipped
2.00 541050 CALIFORNIA ROLLS CS __________ FRESH13
2.00 542050 CALIFORNIA ROLLS, ASSORTED, SAMPLER CS __________ FRESH13
2 ORIG, 2 SPICY, 2 CAL.W/VEG
2.00 542450 CALIFORNIA ROLLS, SPICY CS __________ FRESH13
2.00 542850 CALIFORNIA ROLLS CS __________ FRESH13
WITH, VEGETABLES
2.00 543450 HALIBUT ROLLS CS __________ FRESH13
2.00 545050 SHRIMP WASABI ROLLS CS __________ FRESH13
2.00 546050 VEGETABLE ROLLS CS __________ FRESH13
1.00 547050 VARIETY PLATTER CS __________ FRESH13
MINI PARTY, 15 PCS
Total estimated ship weight: 58.65
Fresh cases: __________ Frozen cases: __________ Pallets: __________
Like you see there is a bunch of data, but I just need the cells in column 2 with numbers in them I need to delete all rows with text in column 2, column 2 is where 547050 number is, any help will be appreciated, thanks
 



Is this a one-shot task or recurring?

I'm guessing it's recurring. The approch would be similar.

On your sheet, first number all the rows. This will help putting it back in original sequence.

I assume that each row of data is ALL IN ONE COLUMN.

Turn on the Auto Filter to help you analyse your data/

Sort the column of report data.

Find the HEADINGS and delete all but what is necessary.
Find 547050 AND DELETE
Find any other extraneous rows and delete.

Sort back into sequence if necessary.

Once the process works to your satisfaction, turn on your macro recorder and record.

Post back with your recorded code for help with customizing.

Skip,
[glasses]Don't let the Diatribe...
talk you to death![tongue]

[glasses]Just traded in my old subtlety...
for a NUANCE![tongue]
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top