Menu
News
All News
Dungeons & Dragons
Level Up: Advanced 5th Edition
Pathfinder
Starfinder
Warhammer
2d20 System
Year Zero Engine
Industry News
Reviews
Dragon Reflections
Columns
Weekly Digests
Weekly News Digest
Freebies, Sales & Bundles
RPG Print News
RPG Crowdfunding News
Game Content
ENterplanetary DimENsions
Mythological Figures
Opinion
Worlds of Design
Peregrine's Next
RPG Evolution
Other Columns
From the Freelancing Frontline
Monster ENcyclopedia
WotC/TSR Alumni Look Back
4 Hours w/RSD (Ryan Dancey)
The Road to 3E (Jonathan Tweet)
Greenwood's Realms (Ed Greenwood)
Drawmij's TSR (Jim Ward)
Community
Forums & Topics
Forum List
Latest Posts
Forum list
*Dungeons & Dragons
Level Up: Advanced 5th Edition
D&D Older Editions
*TTRPGs General
*Pathfinder & Starfinder
EN Publishing
*Geek Talk & Media
Search forums
Chat/Discord
Resources
Wiki
Pages
Latest activity
Media
New media
New comments
Search media
Downloads
Latest reviews
Search resources
EN Publishing
Store
EN5ider
Adventures in ZEITGEIST
Awfully Cheerful Engine
What's OLD is NEW
Judge Dredd & The Worlds Of 2000AD
War of the Burning Sky
Level Up: Advanced 5E
Events & Releases
Upcoming Events
Private Events
Featured Events
Socials!
Twitch
YouTube
Facebook (EN Publishing)
Facebook (EN World)
Twitter
Instagram
TikTok
Podcast
Features
Top 5 RPGs Compiled Charts 2004-Present
Adventure Game Industry Market Research Summary (RPGs) V1.0
Ryan Dancey: Acquiring TSR
Q&A With Gary Gygax
D&D Rules FAQs
TSR, WotC, & Paizo: A Comparative History
D&D Pronunciation Guide
Million Dollar TTRPG Kickstarters
Tabletop RPG Podcast Hall of Fame
Eric Noah's Unofficial D&D 3rd Edition News
D&D in the Mainstream
D&D & RPG History
About Morrus
Log in
Register
What's new
Search
Search
Search titles only
By:
Forums & Topics
Forum List
Latest Posts
Forum list
*Dungeons & Dragons
Level Up: Advanced 5th Edition
D&D Older Editions
*TTRPGs General
*Pathfinder & Starfinder
EN Publishing
*Geek Talk & Media
Search forums
Chat/Discord
Menu
Log in
Register
Install the app
Install
The
VOIDRUNNER'S CODEX
is coming! Explore new worlds, fight oppressive empires, fend off fearsome aliens, and wield deadly psionics with this comprehensive boxed set expansion for 5E and A5E!
Community
General Tabletop Discussion
*Dungeons & Dragons
WotC Forums Migration Tool
JavaScript is disabled. For a better experience, please enable JavaScript in your browser before proceeding.
You are using an out of date browser. It may not display this or other websites correctly.
You should upgrade or use an
alternative browser
.
Reply to thread
Message
<blockquote data-quote="TheBigHouse" data-source="post: 7681579" data-attributes="member: 6801320"><p>I had some problems getting my google docs formatting to appear on correctly on the forums. I would either have to lose all my bold and italics or lose all my colors, depending on how i pasted it. I found the following workaround that might be helpful for some people.</p><p></p><p>1. Download the google doc as a DOCX.</p><p>2. Paste the following code into a new word doc and save it as a .bas file (example wtbb.bas)</p><p></p><p>[sblock]</p><p></p><p> 'Word2BBCode-Converter v0.1</p><p> </p><p> Sub Word2BBCode()</p><p> </p><p> Application.ScreenUpdating = False</p><p> </p><p> ConvertItalic</p><p> ConvertBold</p><p> </p><p> ActiveDocument.Content.Copy</p><p> </p><p> Application.ScreenUpdating = True</p><p> End Sub</p><p> Private Sub ConvertBold()</p><p> ActiveDocument.Select</p><p> </p><p> With Selection.Find</p><p> </p><p> .ClearFormatting</p><p> .Font.Bold = True</p><p> .Text = ""</p><p> </p><p> .Format = True</p><p> .MatchCase = False</p><p> .MatchWholeWord = False</p><p> .MatchWildcards = False</p><p> .MatchSoundsLike = False</p><p> .MatchAllWordForms = False</p><p> </p><p> .Forward = True</p><p> .Wrap = wdFindContinue</p><p> </p><p> Do While .Execute</p><p> With Selection</p><p> If InStr(1, .Text, vbCr) Then</p><p> ' Just process the chunk before any newline characters</p><p> ' We'll pick–up the rest with the next search</p><p> .Font.Bold = False</p><p> .Collapse</p><p> .MoveEndUntil vbCr</p><p> End If</p><p> </p><p> ' Don't bother to markup newline characters (prevents a loop, as well)</p><p> If Not .Text = vbCr Then</p><p> .InsertBefore "<strong>"</strong></p><p><strong> .InsertAfter "</strong>"</p><p> End If</p><p> </p><p> .Font.Bold = False</p><p> End With</p><p> Loop</p><p> End With</p><p> End Sub</p><p> Private Sub ConvertItalic()</p><p> ActiveDocument.Select</p><p> </p><p> With Selection.Find</p><p> </p><p> .ClearFormatting</p><p> .Font.Italic = True</p><p> .Text = ""</p><p> </p><p> .Format = True</p><p> .MatchCase = False</p><p> .MatchWholeWord = False</p><p> .MatchWildcards = False</p><p> .MatchSoundsLike = False</p><p> .MatchAllWordForms = False</p><p> </p><p> .Forward = True</p><p> .Wrap = wdFindContinue</p><p> </p><p> Do While .Execute</p><p> With Selection</p><p> If InStr(1, .Text, vbCr) Then</p><p> ' Just process the chunk before any newline characters</p><p> ' We'll pick-up the rest with the next search</p><p> .Font.Italic = False</p><p> .Collapse</p><p> .MoveEndUntil vbCr</p><p> End If</p><p> </p><p> ' Don't bother to markup newline characters (prevents a loop, as well)</p><p> If Not .Text = vbCr Then</p><p> .InsertBefore "<em>"</em></p><p><em> .InsertAfter "</em>"</p><p> End If</p><p> </p><p> .Font.Italic = False</p><p> End With</p><p> Loop</p><p> End With</p><p> End Sub</p><p></p><p>[/sblock]</p><p></p><p></p><p></p><p>3. open your DOCX in word. </p><p>4. Press Alt+F11 to open the VBA editor.</p><p>5. click import file and import your .bas file.</p><p> 6. Click run macro</p><p>7. copy and paste your new marked up document back into google docs. (for some reason copying straight from word causes the colors to disappear)</p><p>8. copy your new google doc on to the board.</p><p></p><p>this only converts bold and italics not underlines, images, or hyperlinks, fyi.</p></blockquote><p></p>
[QUOTE="TheBigHouse, post: 7681579, member: 6801320"] I had some problems getting my google docs formatting to appear on correctly on the forums. I would either have to lose all my bold and italics or lose all my colors, depending on how i pasted it. I found the following workaround that might be helpful for some people. 1. Download the google doc as a DOCX. 2. Paste the following code into a new word doc and save it as a .bas file (example wtbb.bas) [sblock] 'Word2BBCode-Converter v0.1 Sub Word2BBCode() Application.ScreenUpdating = False ConvertItalic ConvertBold ActiveDocument.Content.Copy Application.ScreenUpdating = True End Sub Private Sub ConvertBold() ActiveDocument.Select With Selection.Find .ClearFormatting .Font.Bold = True .Text = "" .Format = True .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False .Forward = True .Wrap = wdFindContinue Do While .Execute With Selection If InStr(1, .Text, vbCr) Then ' Just process the chunk before any newline characters ' We'll pick–up the rest with the next search .Font.Bold = False .Collapse .MoveEndUntil vbCr End If ' Don't bother to markup newline characters (prevents a loop, as well) If Not .Text = vbCr Then .InsertBefore "[B]" .InsertAfter "[/B]" End If .Font.Bold = False End With Loop End With End Sub Private Sub ConvertItalic() ActiveDocument.Select With Selection.Find .ClearFormatting .Font.Italic = True .Text = "" .Format = True .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False .Forward = True .Wrap = wdFindContinue Do While .Execute With Selection If InStr(1, .Text, vbCr) Then ' Just process the chunk before any newline characters ' We'll pick-up the rest with the next search .Font.Italic = False .Collapse .MoveEndUntil vbCr End If ' Don't bother to markup newline characters (prevents a loop, as well) If Not .Text = vbCr Then .InsertBefore "[I]" .InsertAfter "[/I]" End If .Font.Italic = False End With Loop End With End Sub [/sblock] 3. open your DOCX in word. 4. Press Alt+F11 to open the VBA editor. 5. click import file and import your .bas file. 6. Click run macro 7. copy and paste your new marked up document back into google docs. (for some reason copying straight from word causes the colors to disappear) 8. copy your new google doc on to the board. this only converts bold and italics not underlines, images, or hyperlinks, fyi. [/QUOTE]
Insert quotes…
Verification
Post reply
Community
General Tabletop Discussion
*Dungeons & Dragons
WotC Forums Migration Tool
Top