VBA help non breaking spaces for array of words not working correctly

Shelley Lou · #1 03-07-2023, 11:00 AM

I would be really grateful for some pointers on where I'm going wrong with the below code. I have an array of words I want to change the space to a non breaking space between the word and digit(s) and their plural e.g looks for clause and clauses etc.

At the moment it is putting the non breaking space before the word e.g. clause. I've tried \1^s but that puts it at the end of the digit. I've tried \1^s\2 and other variations but they all just give me an error - I'm just not sure where I'm going wrong for something that should be quite straightforward.

Code:

ArrFndB = Array("[Aa]ppendix", "[Cc]lause", "[Pp]aragraph", "[Pp]art", "[Ss]chedule")

Code:

For i = 0 To UBound(ArrFndB)
   .text = "(" & ArrFndB(i) & "[s ]@[0-9.]{1,})"
   .Replacement.text = "^s\1"
   .Execute Replace:=wdReplaceAll
   Next

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
How to Globally Remove Non-breaking Spaces	PSSMargaret	PowerPoint	3	11-15-2021 01:06 PM
Adding non-breaking spaces to cross references	seanspotatobusiness	Word	3	07-22-2018 07:48 AM
Spaces between words, help!	cheffie	Word	2	10-02-2013 01:59 PM
An array of words from a document knowing the font style	Kreol2013	Word VBA	0	07-08-2013 01:29 AM
Non-breaking spaces in random emails	Tri	Outlook	3	02-04-2013 06:35 AM