Editing styles with macros/VBA: a simple question

c1905 · #1 08-31-2016, 09:42 AM

Greetings,

I'm using Office Professional Plus 2010 on Win 7 64 bit. I'm trying to create a style that (among other things) automatically wraps parentheses around text once the style is applied. I found no simple way to do it, but someone somewhere suggested using the following code:

Code:

Sub AddParens()
    Selection.InsertBefore "("
    Selection.InsertAfter ")"
End Sub

I understand that this is some sort of macro or VBA, but I cannot figure out how to modify my style (let's call it "paren") using that code. I've made many searches and all I could found was many examples of codes without any explanation of where exactly they are to be added. I have the developer ribbon visible and I played around with the "macros" and "visual basic" tabs, but could find nothing there to help me.

Your help is appreciated.

macropod · #2 09-01-2016, 03:21 AM

You cannot modify a Style in the way you propose. Styles only affect the formatting of the content in the range to which it is applied; they cannot change the content.

c1905 · #3 09-01-2016, 04:17 AM

Thank you for the response. So, is there a way to force parentheses around a piece of selected text? I assume the code quoted above does work, somehow.

gmayor · #4 09-01-2016, 04:42 AM

See http://www.gmayor.com/installing_macro.htm. It will help to associate the macro with a keyboard shortcut or add a button to the QAT (Quick Access Toolbar) or Ribbon. Both are covered in the linked page.

Select the text and run the macro.

c1905 · #5 09-01-2016, 04:45 AM

Thank you. I'll do that.

macropod · #6 09-01-2016, 06:23 AM

Quote:

Originally Posted by c1905

So, is there a way to force parentheses around a piece of selected text? I assume the code quoted above does work, somehow.

Yes, you can select the text, then run your macro - which you could assign to a keyboard shortcut (for which Graham has provided a link).

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
A simple math question	markg2	Excel	6	03-01-2014 11:10 AM
Simple Mail Merge Question	Ethanflux	Mail Merge	1	09-29-2013 07:21 PM
Simple question about line space	danezcou3	Word	1	04-21-2013 05:38 AM
Simple Question, difficult task...	Jshopping	Word	4	01-19-2011 03:04 PM
Simple Envelope Question....	cmcneill	Word	0	08-17-2009 05:12 PM