Mrrrr's Forum (VIEW ONLY)
Un forum care ofera solutii pentru unele probleme legate in general de PC. Pe langa solutii, aici puteti gasi si alte lucruri interesante // A forum that offers solutions to some PC related issues. Besides these, here you can find more interesting stuff.
Lista Forumurilor Pe Tematici
Mrrrr's Forum (VIEW ONLY) | Reguli | Inregistrare | Login

POZE MRRRR'S FORUM (VIEW ONLY)

Nu sunteti logat.
Nou pe simpatie:
crazygirl
Femeie
22 ani
Buzau
cauta Barbat
26 - 80 ani
Mrrrr's Forum (VIEW ONLY) / Tutoriale si Ghiduri Utile // Tutorials and useful guides / [WORD] Macros to create predefined font colors in QAT [VBA] Moderat de TRaP, TonyTzu
Autor
Mesaj Pagini: 1
Mrrrr
AdMiN

Inregistrat: acum 17 ani
Postari: 2186
1. Open a new word document, while in it press ALT+F11 to open the Visual Basic editor.

2. On the left hand side make sure you are in the Normal project file, right click on Normal and select Insert - Module:


3. Copy and paste each of the following sets of codes (between quotes) to new modules:

Sub Red()
Selection.Font.ColorIndex = wdRed
End Sub


Sub Green()
Selection.Font.ColorIndex = wdGreen
End Sub


Sub Blue()
Selection.Font.ColorIndex = wdBlue
End Sub


Sub Black()
Selection.Font.ColorIndex = wdBlack
End Sub


Sub White()
Selection.Font.ColorIndex = wdWhite
End Sub


Sub Yellow()
Selection.Font.ColorIndex = wdYellow
End Sub


Sub Violet()
Selection.Font.ColorIndex = wdViolet
End Sub


4. You can rename your modules from Module1, Module2 etc. to the color names:

If you don't see the bottom Properties frame, go to View - Properties Window (or press F4).

5. To add these macros to the QAT (Quick Access Toolbar), you can close VBasic after you save Normal.dotm file, and go back to Word, to More Commands:


6. Add all your colors to the QAT, modify their names and icons accordingly.


7. Just select some text and click the newly created buttons:

Note: The DOS window flashing in the end of the gif has nothing to do with this tutorial (it's some scheduled task I use to remind me of important dates).


_______________________________________


pus acum 6 ani
   
Pagini: 1  

Mergi la