Propósito

✔ Programação GLOBAL® - Quaisquer soluções e/ou desenvolvimento de aplicações pessoais, ou da empresa, que não constem neste Blog devem ser tratados como consultoria freelance. Queiram contatar-nos: brazilsalesforceeffectiveness@gmail.com | ESTE BLOG NÃO SE RESPONSABILIZA POR QUAISQUER DANOS PROVENIENTES DO USO DOS CÓDIGOS AQUI POSTADOS EM APLICAÇÕES PESSOAIS OU DE TERCEIROS.

VBA Access - Fechando TODOS os Relatórios Abertos - Close All Forms


Se você tem já criou um formulário através do qual evoca todos os seus relatórios, sabe bem que de vez em quando ficam inúmeros deles sobrepondo-se uns aos outros. Como resolver isso?

Function CloseAllReportss()

    Dim lngLoop As Long

    For lngLoop = (Forms.Count - 1) To 1 Step -1
        DoCmd.Close acForm, Forms(lngLoop).Name
    Next lngLoop

End Function

Tags: Access, VBA, Report, Reports, close, fechar


Tags: , , , , ,

Nenhum comentário:

Postar um comentário

Assinar: Postar comentários (Atom)
diHITT - Notícias