Xin hỏi về lỗi mặc định trong word 2007 bạn nào biết cách khắc phục xin chỉ bảo

[tienbcqn]

mình ko biết bấm vào đâu mà bây giờ nó bị mặc định như trong hình ảnh gửi kèm
bạn nào biết cách tắt nó xin chỉ bảo
xin cảm ơn nhiều

 

[tienbcqn]

mình ko biết bấm vào đâu mà bây giờ nó bị mặc định như trong hình ảnh gửi kèm
bạn nào biết cách tắt nó xin chỉ bảo
xin cảm ơn nhiều

các bạn giúp làm cách nào để có được ứng dụng như trong file

 

[nvson]

Đây là các hiệu ứng của chữ (Text Effects).
Tuy nhiên trong Word 2007, 2010 thì bạn không thể làm theo cách như trong Word 2003, thay vào đó bạn phải tạo 1 marco rồi chạy nó.
Đây là đoạn code mình sưu tầm trên mạng:

Sub AnimateFont()
Dim sAnimation As String
If Len(Selection.Range) = 0 Then
    MsgBox "Select text first!", vbCritical, "No Text Selected"
    Exit Sub
End If
sAnimation = InputBox("Which animation? Enter the number: " & 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" & vbCr & _
    " 0. None", "Font animation")
Select Case sAnimation
    Case 1: Selection.Font.Animation = wdAnimationBlinkingBackground
    Case 2: Selection.Font.Animation = wdAnimationLasVegasLights
    Case 3: Selection.Font.Animation = wdAnimationMarchingBlackAnts
    Case 4: Selection.Font.Animation = wdAnimationMarchingRedAnts
    Case 5: Selection.Font.Animation = wdAnimationShimmer
    Case 6: Selection.Font.Animation = wdAnimationSparkleText
    Case 0: Selection.Font.Animation = wdAnimationNone
Case Else:
    End Select
End Sub