Janela de redimensionamento no Word 2010 no Windows XP

2

Duas macros que tenho, uma para dimensionar uma janela do Word até 20% do lado direito da tela, e outra para 80% do lado esquerdo, pararam de funcionar. (Eles são para arquivos de referência enquanto eu trabalho na outra tela).

Estas são minhas macros:

Sub RestoreDown()
    Dim myWindow1 As Window, myWindow2 As Window
    Set myWindow1 = ActiveWindow
    With myWindow1
        .WindowState = xlNormal
        .Top = 0
        .Left = (Application.UsableWidth * 0.92) + 1
        .Height = Application.UsableHeight
        .Width = Application.UsableWidth * 0.2
    End With
End Sub
Sub RestoreDown2()
    Dim myWindow1 As Window, myWindow2 As Window
    Set myWindow1 = ActiveWindow
    With myWindow1
        .WindowState = xlNormal
        .Top = 0
        .Left = (Application.UsableWidth * 0.12) + 1
        .Height = Application.UsableHeight
        .Width = Application.UsableWidth * 0.8
    End With
End Sub

Eles pararam de funcionar. Recebo a mensagem de erro 'Variável de objeto ou Com variável de bloco não definida'. Não estou ciente de ter mudado nada.

Devo salientar que não sou um geek técnico. Eu uso muito as macros para o meu trabalho (cópia de edição de textos), mas eu só estou no estágio de 'desejo' de saber muito sobre o VBA. Por favor, tenha isso em mente ao responder!

    
por sarah woodton 07.03.2013 / 13:45

0 respostas