Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Can I add text effect(blinking lights) in word 2007?
I could add special text effects in Word 2003. I cannot find it in Word
2007. Is it gone? |
#2
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Can I add text effect(blinking lights) in word 2007?
The text effects feature is no longer supported in the user interface, yes.
It still works if you open older documents, though. I suspect that you could create text effects in Word 2007 if you use a macro, but I'm not sure. Ask in a programming newsgroup such as microsoft.public.word.vba.general. -- Stefan Blom Microsoft Word MVP "vavs" wrote in message ... I could add special text effects in Word 2003. I cannot find it in Word 2007. Is it gone? |
#3
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Can I add text effect(blinking lights) in word 2007?
I just made a test in Word 2007. It is correct that you can use a macro to
apply the text effects and they seem to work. The following macro will apply the effect €śBlinking Background€ť to the selected text: Sub ApplyTextEffect() Selection.Font.Animation = wdAnimationBlinkingBackground End Sub You can replace wdAnimationBlinkingBackground with one of the following constants to apply another effect (the part of the name after €śwdAnimation€ť corresponds to the names shown in Font Text Effects tab in Word 2003): wdAnimationLasVegasLights wdAnimationMarchingBlackAnts wdAnimationMarchingRedAnts wdAnimationShimmer wdAnimationSparkleText The following macro will remove the text effect from the selection: Sub ApplyTextEffect() Selection.Font.Animation = wdAnimationNone End Sub For help on installing a macro, see: http://word.mvps.org/faqs/macrosvba/CreateAMacro.htm -- Regards Lene Fredborg - Microsoft MVP (Word) DocTools - Denmark www.thedoctools.com Document automation - add-ins, macros and templates for Microsoft Word "Stefan Blom" wrote: The text effects feature is no longer supported in the user interface, yes. It still works if you open older documents, though. I suspect that you could create text effects in Word 2007 if you use a macro, but I'm not sure. Ask in a programming newsgroup such as microsoft.public.word.vba.general. -- Stefan Blom Microsoft Word MVP "vavs" wrote in message ... I could add special text effects in Word 2003. I cannot find it in Word 2007. Is it gone? |
#4
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Can I add text effect(blinking lights) in word 2007?
For anyone who (shudder) actually wanted to use those effects, is it
possible to have a QAT button that would give you the six options in a dropdown, or would it have to be six separate macros/buttons (or editing the macro each time)? On May 28, 10:55*am, Lene Fredborg wrote: I just made a test in Word 2007. It is correct that you can use a macro to apply the text effects and they seem to work. The following macro will apply the effect “Blinking Background” to the selected text: Sub ApplyTextEffect() * * Selection.Font.Animation = wdAnimationBlinkingBackground End Sub You can replace wdAnimationBlinkingBackground with one of the following constants to apply another effect (the part of the name after “wdAnimation” corresponds to the names shown in Font Text Effects tab in Word 2003): wdAnimationLasVegasLights wdAnimationMarchingBlackAnts wdAnimationMarchingRedAnts wdAnimationShimmer wdAnimationSparkleText The following macro will remove the text effect from the selection: Sub ApplyTextEffect() * * Selection.Font.Animation = wdAnimationNone End Sub For help on installing a macro, see:http://word.mvps.org/faqs/macrosvba/CreateAMacro.htm -- Regards Lene Fredborg - Microsoft MVP (Word) DocTools - Denmarkwww.thedoctools.com Document automation - add-ins, macros and templates for Microsoft Word "Stefan Blom" wrote: The text effects feature is no longer supported in the user interface, yes. It still works if you open older documents, though. I suspect that you could create text effects in Word 2007 if you use a macro, but I'm not sure. Ask in a programming newsgroup such as microsoft.public.word.vba.general. -- Stefan Blom Microsoft Word MVP "vavs" wrote in message ... I could add special text effects in Word 2003. *I cannot find it in Word 2007. *Is it gone?- |
#5
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Can I add text effect(blinking lights) in word 2007?
The following macro displays a dialog box that lets the user enter a number
in order to indicate which text effect to apply. It could be made a bit more elegant by creating a UserForm but this version works (more checks for inappropriate selection could be included). The macro could be added to the QAT: Sub ApplyTextEffect() Dim strInput As String Dim Msg As String Dim Title As String Title = "Apply Text Effect to Selected Text" 'Stop if no selection or only paragraph mark selected If Selection.Type = wdSelectionIP Or Selection.Text = Chr(13) Then Msg = "You must first select the text to which you want to apply a text effect." MsgBox Msg, vbInformation, Title Exit Sub End If Retry: Msg = "Enter the number of the text effect you want to apply:" & vbCr & vbCr & _ "0: None (remove text effect)" & vbCr & _ "1: Blinking Background" & vbCr & _ "2: Las Vegas Lights" & vbCr & _ "3: Marching Black Ants" & vbCr & _ "4: Marching Red Ants" & vbCr & _ "5: Shimmer" & vbCr & _ "6: Sparkle Text" strInput = InputBox(Msg, Title) If Len(strInput) = 0 Then If StrPtr(strInput) = 0 Then 'Cancel clicked Exit Sub Else 'OK clicked, empty field ShowMsg: Msg = "You must enter a number between 0 and 6. Please retry." MsgBox Msg, vbInformation, Title GoTo Retry End If Else 'Input 'If not an integer between 0 and 6 If Len(strInput) 1 Or InStr(1, "0123456", strInput) = 0 Then GoTo ShowMsg Else With Selection.Font Select Case strInput Case 0 .Animation = wdAnimationNone Case 1 .Animation = wdAnimationBlinkingBackground Case 2 .Animation = wdAnimationLasVegasLights Case 3 .Animation = wdAnimationMarchingBlackAnts Case 4 .Animation = wdAnimationMarchingRedAnts Case 5 .Animation = wdAnimationShimmer Case 6 .Animation = wdAnimationSparkleText End Select End With End If End If End Sub -- Regards Lene Fredborg - Microsoft MVP (Word) DocTools - Denmark www.thedoctools.com Document automation - add-ins, macros and templates for Microsoft Word "grammatim" wrote: For anyone who (shudder) actually wanted to use those effects, is it possible to have a QAT button that would give you the six options in a dropdown, or would it have to be six separate macros/buttons (or editing the macro each time)? On May 28, 10:55 am, Lene Fredborg wrote: I just made a test in Word 2007. It is correct that you can use a macro to apply the text effects and they seem to work. The following macro will apply the effect €śBlinking Background€ť to the selected text: Sub ApplyTextEffect() Selection.Font.Animation = wdAnimationBlinkingBackground End Sub You can replace wdAnimationBlinkingBackground with one of the following constants to apply another effect (the part of the name after €śwdAnimation€ť corresponds to the names shown in Font Text Effects tab in Word 2003): wdAnimationLasVegasLights wdAnimationMarchingBlackAnts wdAnimationMarchingRedAnts wdAnimationShimmer wdAnimationSparkleText The following macro will remove the text effect from the selection: Sub ApplyTextEffect() Selection.Font.Animation = wdAnimationNone End Sub For help on installing a macro, see:http://word.mvps.org/faqs/macrosvba/CreateAMacro.htm -- Regards Lene Fredborg - Microsoft MVP (Word) DocTools - Denmarkwww.thedoctools.com Document automation - add-ins, macros and templates for Microsoft Word "Stefan Blom" wrote: The text effects feature is no longer supported in the user interface, yes. It still works if you open older documents, though. I suspect that you could create text effects in Word 2007 if you use a macro, but I'm not sure. Ask in a programming newsgroup such as microsoft.public.word.vba.general. -- Stefan Blom Microsoft Word MVP "vavs" wrote in message ... I could add special text effects in Word 2003. I cannot find it in Word 2007. Is it gone?- |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How do you disable a blinking text box in Word 2007? | Microsoft Word Help | |||
Why do changes in highlighted text effect the entire Word doc? | Microsoft Word Help | |||
my typing is not black text its all sparkle like christmas lights. | Microsoft Word Help | |||
Can you change the background color of the blinking text effect? | Microsoft Word Help | |||
How to apply "Screen Effect" to Word text ?? | Microsoft Word Help |