Specifying an email address and folder name(Not default) if i have more than 1 email addre

I need all your Excel VBA expert to help.

The following code is working but I have a few following questions
1) If I have more than 1 email address in Outlook and would like to specific email address in Excel . Let say in tab, cell (A1 ) in Sheets("Main") is for me to type email address(group email address). How can I specific it in the following code

2) If I have to specific a folder (not default folder--inbox,sent,draft, delete) and would like to specific in folder name in Excel Let say in , cell (B1) in Sheets ("Main") is for me to type folder name. How can I specific it in the following code
=====================================================

Please Login or Register  to view this content.

Administrative Note:

Welcome to the forum.

We would very much like to help you with your query, however you need to include code tags around your code.

Please take a moment to add the tags. Posting code between tags makes your code much easier to read and copy for testing, and it also maintains VBA formatting.

Please see Forum Rule #2 about code tags and adjust accordingly. Click on Edit to open your post, then 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

I did it for you this time. Please read forum rules. Thanks