How to send a range of cells in a sms text message by using VB -Applications in Excel

How to send a range of cells in a sms text message by using Visual Basic for Applications in Excel?

BTW: I really need this to work for my job! So any feedback would be greatly welcomed. Please read below to understand what I'm trying to do. I need to be able to send my guys their daily goals via sms text message:

The following works great for sending a range of cells in a email message:
-----------------------------------------------------------------------
In Microsoft Excel, you can send a section of a workbook as an e-mail message. This article contains sample Microsoft Visual Basic for Applications (VBA) code that demonstrates how to automate sending a range of cells in an e-mail message.

The following VBA code sample sends a range of seven cells, B11 through H11, from the currently active workbook to the e-mail address specified in the code:

Please Login or Register  to view this content.

----------------------------------------------------

You can also use this same VBA Code for sending a range of cells in a sms text message by replacing "E-Mail_Address_Here" with one of the following:

Sprint SMS Text Message:

Please Login or Register  to view this content.

T-Mobile SMS Text Message:

Please Login or Register  to view this content.

------------------------------------------------------------
Outlook will send the message. Everything is good, NOT!

Ok, this is where my problem begins so please read carefully:

1) It will seem as the message was sent then I get a Message from: Mail Delivery Subsystem

2) Mail Delivery Subsystem lets me know that the message has failed to be sent because it was rejected by the Cell phone carrier because the message size exceeds the size limit.

3) The size of the sent mail message for a range of SEVEN CELLS is 367 KB. This is mainly where my problem begins. The SMS TEXT Message max size limit is 7 KB.

4) There is no reason why this message: "Eric 1 New 4 HS $126 Accys" should exceed 7 KB. This message is 26 characters long and the max character limit for a message 160 characters.

5) After viewing the source code of the automated message [inside the body of the sent email message] of the script, I found out why it is 367 KB long: [.txt file attached inside .zip]


Which brings me to my GRAND QUESTION: Is there a piece of code/line that I can put in the original VBA Code to shorten the output of the body message/source code?

DOES THIS MAKE ANY SENCE?

This may help reduce the size of the message: Is there a way I can insert a line in ActiveSheet.MailEnvelope to send it as Plain Text & Not as HTML?

Leith Ross,

I am saying you can send your self a SMS Text Message via Email regardless of your Email Client.

Try it. Who is Your Cell Phone Provider?

Leth Ross,

I am not trying to prove anybody wrong. I was hoping you would be able to help me.

All I need to be able to do is send my guys their daily goals via sms text message. We have a spreadsheet that is updated daily.

I want to be able to click a command button on the excel spreadsheet then our guys will be to receive that information on their phone so they know what their goals are for that day.

I was getting frustrated because I have fell I am so close to getting it right and so far away at the same time. I have been researching on a solution for so long and can't find my answer. I was hoping one of you guys would be able to assist me in providing the missing piece of code that I need to fix this issue.

I forgot to mention our work computers do not allow us to download any .exe so I won't be able to use that add on feature,

So I'm saying it has to all be done by code via VBA.