Prova così, contemporaneamente determini anche le dimensioni della From:
codice:
    With FrmProva
        If .WindowState <> vbNormal Then
            .WindowState = vbNormal
            .Top = 0
            .Left = 0
            .Height = 18300
            .Width = 15360
        End If
    End With
Scusa forse non ho capito la tua domanda. Se devi Riattivare la form, allora usa Call Form_Activate da inserire al termine della routine di cui fai cenno:
codice:
Private Sub Form_Activate()
     If Me.WindowState <> vbNormal Then
        Me.WindowState = vbNormal
        Me.Top = 0
        Me. Left = 0
        Me.Height = 18300
        Me.Width = 15360
    End If
End Sub