Send email based on address in a cell

My code basicly sends a copy of the excel file to a specified email, thw code works but i wish to make one change.

Please Login or Register  to view this content.

The line above states the email the file should be sent to. How can i change this so it sends it to the value written in cell x1. for example if in cell x1 the value is [email protected], this should be equivelent to

Please Login or Register  to view this content.

use this one

Please Login or Register  to view this content.

Your post did 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.

==============
I have made the correction in your post for you this time, as a courtesy. Please remember in your future posts. This merely underlines the importance that you read and follow the Forum Rules we are all expected to abide.

Thank you for your understanding and compliance. Happy Excel-ling.

then use:

In cell A1 use only mail address without ""

Sheet Name to be changed with "" like "Summary" not Summary

Please Login or Register  to view this content.

Did you change Range("A1") in the suggestion to Range("X1") based on your question?