By using vba.booksticle.com you agree to our cookie policy, We and our partners operate globally and use cookies, for multiple purposes

948 Steps to 6 Figures by Learning Excel-VBA and Other Skills



Step 877 - Ctrl+Shift+T - Tweet a cell


Twitter is one of the most popular social media platforms. You can send tweets which are messages of 280 characters to your followers. If you're not familiar with Twitter you can learn what is twitter.

To tweet a cell we will use the same process as we did in but will use the following:

https://twitter.com/intent/tweet?text=text to tweet

The code to use is
RunProgram "https://twitter.com/intent/tweet?text=" & Activecell

You also need the RunProgram code

See the Video that steps you through the process

The video to Google a cell is here

Prerequisites:
  • Have a twitter account and be signed in

Steps:
  1. Tweet via browser https://twitter.com/intent/tweet?text=text to tweet
  2. Tweet via a formula
  3. Start new spreadsheet
  4. Add Developer Tab if missing
  5. Go to the Developer tab
  6. Record a macro
    • Macro name: TweetAcell
    • Shortcut key: Ctrl+Shift+T (press Shift+T) and Enter
    • Stop Recording
  7. Click Macros
  8. You don't have to know what this means right now
  9. Go to Broswer
  10. Open TweetAcell code
  11. Edit TweetAcell
  12. Copy Top part to Clipboard
  13. Go back to Macro Window
  14. Paste in code
  15. Go Back to Browser
  16. Copy declaration
  17. in TweetaCell
  18. Enter runprogram "http://twitter.com/intent/tweet?text=" & Activecell
  19. Save the file
    • name: tweet-a-cell.xlsm
  20. type hello into any cell
  21. Press Ctrl+Shift+T
  22. Twitter will pop-up with Tweet
  23. Press the Tweet button
Problem for next lesson
  • Enter This will be a great #Election to any cell
  • the word #Election won't show in the tweet dialog.

Solution:
  • Search with Google for VBA to urlencode
  • Copy the code to the Excel file below the End Sub
  • Go to TweetAcell and change code to runprogram "http://twitter.com/intent/tweet?text=" & urlencode(Activecell)

    For more information:

    •    Table of Contents | Send us your feedback | © 2025 All Rights Reserved | Edit