Macro to make a LINE BOLD under cursor

Retko · #1 01-27-2022, 02:45 PM

Hi guys,

can you help me with this macro - I want to make a line bold under my cursor (so I can map it to key and to a mouse key - will be doing lots of bolding)

Thank you.

gmayor · #2 01-27-2022, 09:57 PM

What do you mean by a 'line' in this context?

Retko · #3 01-28-2022, 12:52 AM

Quote:

Originally Posted by gmayor

What do you mean by a 'line' in this context?

Image

gmayor · #4 01-28-2022, 02:35 AM

Unfortunately that doesn't help. There are no 'lines' as such in a Word document. Word formats text by flowing it between the current margins.

Your illustration shows text that terminates with a comma, which suggests that it may not be a complete paragraph.

If it is a complete paragraph, the task is simple

Code:

Sub Macro1()
Selection.Paragraphs(1).Range.Font.Bold = True
End Sub

If the text is only the displayed line within a paragraph, then you should bear in mind that if you change the font attributes, you potentially change the flow between the margins, so the bold 'line' could spill to the next 'line'. However

Code:

Sub Macro2()
Selection.HomeKey Unit:=wdLine
Selection.EndKey Unit:=wdLine, Extend:=wdExtend
Selection.Font.Bold = True
End Sub

could work for you.
In both cases put the cursor in the 'line' and run the macro.

Retko · #5 01-28-2022, 03:38 AM

The second one works like a charm. Thank you

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Autotext entry is taking the cursor to next line/new line	skhan	Word	10	01-31-2019 06:37 PM
Table: make the bottom line not bold or less thick	village	Word Tables	2	08-22-2017 06:04 AM
Using IF to make bold	bigukfan	Mail Merge	2	03-07-2014 01:54 AM
Format Bold in one line makes all lines bold	Nitte	Word	2	02-07-2013 12:34 AM
Autocorrect to make words Bold?	GB89	Word	1	04-15-2010 09:04 PM