Technical forums » Office applications »
Word macro: how to apply highlight to *all* selected text
Thread poster: Samuel Murray
Samuel Murray
Samuel Murray  Identity Verified
Netherlands
Local time: 00:01
Member (2006)
English to Afrikaans
+ ...
Dec 24, 2019

Hello everyone

I have a table in which I want to highlight certain cells. I'm using Ctrl+select to select the cells that I want to be highlighted. If I select cells and then use the normal "Highlight" button or function, it highlights all selected cells. But if I use the following macro, it highlights only the cells that I have selected last:

Sub highlight_with_shortcut()
Selection.Range.HighlightColorIndex = wdPink
End Sub

Just to be clear, ... See more
Hello everyone

I have a table in which I want to highlight certain cells. I'm using Ctrl+select to select the cells that I want to be highlighted. If I select cells and then use the normal "Highlight" button or function, it highlights all selected cells. But if I use the following macro, it highlights only the cells that I have selected last:

Sub highlight_with_shortcut()
Selection.Range.HighlightColorIndex = wdPink
End Sub

Just to be clear, the cells that I want to highlight are not next to each other, so I'm holding in Ctrl while selecting additional cells. The macro above then applies to only the cell(s) that I selected last, but I want the macro to apply to all selected cells.

How do I do that?
Thanks
Samuel ▲ Collapse
 
Hans Lenting
Hans Lenting
Netherlands
Member (2006)
German to Dutch
Neem er een loopje mee? Dec 24, 2019

Perhaps you have to insert a loop: for each cell in the range?
 
Rolf Keller
Rolf Keller
Germany
Local time: 00:01
English to German
Just a simple Loop Dec 24, 2019

Option Explicit

Sub highlight_with_shortcut()

Dim singleCell As Cell
Dim allSelectedCells As Cells

Set allSelectedCells = Selection.Cells

For Each singleCell In allSelectedCells
singleCell.Range.HighlightColorIndex = wdPink
Next singleCell

End Sub
 


To report site rules violations or get help, contact a site moderator:

Moderator(s) of this forum
Maya Gorgoshidze[Call to this topic]
Prachya Mruetusatorn[Call to this topic]

You can also contact site staff by submitting a support request »

Word macro: how to apply highlight to *all* selected text






Protemos translation business management system
Create your account in minutes, and start working! 3-month trial for agencies, and free for freelancers!

The system lets you keep client/vendor database, with contacts and rates, manage projects and assign jobs to vendors, issue invoices, track payments, store and manage project files, generate business reports on turnover profit per client/manager etc.

More info »
Anycount & Translation Office 3000
Translation Office 3000

Translation Office 3000 is an advanced accounting tool for freelance translators and small agencies. TO3000 easily and seamlessly integrates with the business life of professional freelance translators.

More info »