Pessoal estou iniciando no vba excel e tenho que rever o script abaixo , precisode ajuda para entender o que cada linha de comando faz, algumas já identifiquei mas esta dando erro na parte Set win = selectwindow poderia por favor informar que seguinfica . cada linha desde já agradeço
Sub NOMEARQFCLASS()
Dim Win As Window
Dim Sheet As Worksheet
Set Win = SelectWindow
If Win Is Nothing Then
Exit Sub
End If
Win.Activate
Set Sheet = SelectSheet(Workbooks(Win.Caption))
If Not Sheet Is Nothing Then
Sheet.Activate
DoEvents
Win.DisplayGridlines = False
Application.ScreenUpdating = False
FormClass
Application.ScreenUpdating = True
Win.Activate
End If
End Sub
Pergunta
Alexandre41
Pessoal estou iniciando no vba excel e tenho que rever o script abaixo , precisode ajuda para entender o que cada linha de comando faz, algumas já identifiquei mas esta dando erro na parte Set win = selectwindow poderia por favor informar que seguinfica . cada linha desde já agradeço
Sub NOMEARQFCLASS()
Dim Win As Window
Dim Sheet As Worksheet
Set Win = SelectWindow
If Win Is Nothing Then
Exit Sub
End If
Win.Activate
Set Sheet = SelectSheet(Workbooks(Win.Caption))
If Not Sheet Is Nothing Then
Sheet.Activate
DoEvents
Win.DisplayGridlines = False
Application.ScreenUpdating = False
FormClass
Application.ScreenUpdating = True
Win.Activate
End If
End Sub
Link para o comentário
Compartilhar em outros sites
0 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.