vb script to find specific names in columns and delete the other columns

[mac7988]

I want to keep "item id" and "total count"

and delete the rest of the columns


please see the example file





SalesOrderEntryBothDetail315-11_10_2015(1).xls

[jindon]

Try

Please Login or Register  to view this content.

[mac7988]

How can I use it as a module

[jindon]

See.....................

[mac7988]

I would like to add the sub to the a script that runs other macros after this.

Sub EveryThing()


Call delcol // This is the script I want to call which you made

Call Blankcleanup

Call revsign

Call DeleteByFindDoLoop1

Call DeleteByFindDoLoop2

Call DeleteByFindDoLoop3

Call DeleteByFindDoLoop4

Call DeleteByFindDoLoop5

Call DeleteByFindDoLoop6

Call DeleteByFindDoLoop7

Call DeleteByFindDoLoop8

Call DeleteByFindDoLoop9

Call DeleteByFindDoLoop10

Call DeleteByFindDoLoop11

Call test


' will run all modules in above order Don't change them.


End Sub

[jindon]

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here

Add one line just before end sub.

Please Login or Register  to view this content.

[mac7988]

I got it to work thank you so much