Shorten a lengthy code

[Pyro Form]

Hi,
Is there anybody out there that can help solve this???? I need advice if there is a quicker way to complete this sub.

Please Login or Register  to view this content.

[Al Chara]

You can find some good advice here on how to speed up your code. Pay special attention to the section on avoiding the use of copy and paste.

[JapanDave]

Try this, make a back up copy your workbook and paste this in place of your code.

Please Login or Register  to view this content.

[Pyro Form]

Thanks Dave, Can you add a bit of running commentary on what each command represents? I just need to understand what the code is requesting.

[JapanDave]

Did it work ok? That was completely untested code.

Here is a little explanation.

Please Login or Register  to view this content.

[Pyro Form]

No, it didn't work. Your code just copies all names in Range A from the Today sheet.

[Pyro Form]

This cannot be to hard to solve?

[JapanDave]

Time to post a sample workbook with the out come you want.

[Cutter]

Actually, it's time to give your thread an acceptable title.

@ Pyro Form

Your post does not comply with Rule 1 of our Forum RULES. Your post title should accurately and concisely describe your problem, not your anticipated solution. Use terms appropriate to a Google search. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will be addressed according to the OP's experience in the forum: If you have less than 10 posts, expect (and respond to) a request to change your thread title. If you have 10 or more posts, expect your post to be locked, so you can start a new thread with an appropriate title.
To change a Title on your post, click EDIT then Go Advanced and change your title, if 2 days have passed ask a moderator to do it for you.

[Pyro Form]

Hi,

I will be more precise (sorry but I thought everyone can read my mind ) . I am not sure if it is possible to shorten the lengthy code as shown in my first post in this thread. My objective is to select names in listbox1 and the value (job number) in combobox2 relates the names to the corresponding worksheet (with the same job number). The code I have written above works but instead of writing a lengthy code I am sure there must be a shorter version?

[Pyro Form]

Hi Dave,
Thanks for your contribution thus far. I do not wish to attach a workbook at this stage due to my progress of this program.

I will persevere and see if others can solve my predicament.

Regards
TR

[JapanDave]

why not set up a dummy book with just a few sheets, say "380" until "382" with the today sheet, then throw in some bogus data, then explain how you wanted it parsed. It would not be very hard and you may get a better solution, as I am just going off your macro, which BTW seems to always copy the cell from row A on the today sheet.