This site uses cookies. Some of these cookies are essential to the operation of the site, while others help to improve your experience by providing insights into how the site is being used. For more information, please see the ProZ.com privacy policy.
Cookie settings

Technical forums » Office applications »
Word macro: how to apply highlight to *all* selected text
Thread poster: Samuel Murray

Samuel Murray  Identity Verified
Netherlands
Local time: 23:56
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  Identity Verified
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
Germany
Local time: 23:56
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

Advanced search






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 »
SDL MultiTerm 2021
One central location to store and manage multilingual terminology.

By providing access to all those involved in applying terminology (such as engineers, marketers, translators, and terminologists), our terminology management solution ensures consistent and high-quality content from source through to translation.

More info »

Recent posts | FAQ | Rules | Moderators | Article knowledgebase

Your current localization setting

English

Select a language

More languages...
Close search
Forums
  • All of ProZ.com
  • Term search
  • Jobs
  • Forums
  • Multiple search