Microsoft Office Forums

Go Back   Microsoft Office Forums > >

 
 
Thread Tools Display Modes
Prev Previous Post   Next Post Next
  #1  
Old 02-24-2016, 01:21 PM
brent chadwick brent chadwick is offline Reverse Bold macro Windows 8 Reverse Bold macro Office 2013
Advanced Beginner
Reverse Bold macro
 
Join Date: Mar 2015
Posts: 86
brent chadwick is on a distinguished road
Default Reverse Bold macro


Hey guys, I have a lot text that needs to have bold reversed. I found this macro somewhere, it works but is real slow. Any suggestions to rewrite and make faster, or is this the best it gets? Thanks
Code:
Sub ReverseBold()
    Dim c
    For Each c In Selection.Characters
        c.Font.Bold = Not c.Font.Bold
    Next c
End Sub
Reply With Quote
 



Similar Threads
Thread Thread Starter Forum Replies Last Post
Reverse Bold macro Macro to find and replace headings in bold and underline redzan Word VBA 4 02-13-2016 12:24 PM
Creating macro in 2007 to bold within quotes on the fly marymaryt Word VBA 5 06-01-2015 06:55 AM
Macro Needed to bold specific lines and Macro to turn into CSV anewteacher Word VBA 1 05-28-2014 03:59 PM
Macro to reverse a test string Jennifer Murphy Word VBA 5 01-16-2014 03:19 PM
Format Bold in one line makes all lines bold Nitte Word 2 02-07-2013 12:34 AM

Other Forums: Access Forums

All times are GMT -7. The time now is 09:40 PM.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions Inc.
Search Engine Optimisation provided by DragonByte SEO (Lite) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.
MSOfficeForums.com is not affiliated with Microsoft