dagerr
01-25-2018, 12:35 PM
Hi Everyone, I need a following macro with conditions below:
1. Add a sign (ChrW(9658)) after word from a group of words array ("ROPCZYCE", "IWIERZYCE" ,etc...) important thing is that it should be only taking words in uppercase If there will be no one of word from array do not add a sign.
2. A word from upper array and i sign should be bold and changed color to
3. first and second paragraph should be bold. Not in every document two paragraphs should bold. Notice that in example file two paragraphs are title and paragraph below title. I don't know how to see a reguality of this case so maybe could be left it as two paragraphs bold in every time.
3. "so", "mf" and "jas" should bold and before this words add tab but "so" or "mf" or "jas" will be not in every document.
4. At the end of last part of document it could be array ("FOTO: M", "FOTO: S", etc.) - change a size of it to 5, and timesnewroman font.
5. After a text from array ("FOTO: M", "FOTO: S", e.t.c..). to the end of document text should be timesnewroman font and .LineSpacing = LinesToPoints(0.9).
Note that not in every document will be points 4 and 5
I hope that is clear.
I've attached word file with example wich clarify what i mean: 21454
Thanks for helpnig me.
1. Add a sign (ChrW(9658)) after word from a group of words array ("ROPCZYCE", "IWIERZYCE" ,etc...) important thing is that it should be only taking words in uppercase If there will be no one of word from array do not add a sign.
2. A word from upper array and i sign should be bold and changed color to
3. first and second paragraph should be bold. Not in every document two paragraphs should bold. Notice that in example file two paragraphs are title and paragraph below title. I don't know how to see a reguality of this case so maybe could be left it as two paragraphs bold in every time.
3. "so", "mf" and "jas" should bold and before this words add tab but "so" or "mf" or "jas" will be not in every document.
4. At the end of last part of document it could be array ("FOTO: M", "FOTO: S", etc.) - change a size of it to 5, and timesnewroman font.
5. After a text from array ("FOTO: M", "FOTO: S", e.t.c..). to the end of document text should be timesnewroman font and .LineSpacing = LinesToPoints(0.9).
Note that not in every document will be points 4 and 5
I hope that is clear.
I've attached word file with example wich clarify what i mean: 21454
Thanks for helpnig me.