Este fórum está sendo desativado

[marcusVMO]

Boa tarde pessoal,

É possível obter o número de tabelas numa aba?

Obrigado pela atenção

[osvaldomp]

Experimente:

Código: Selecionar todos

Sub ContaTabelas()
 MsgBox ActiveSheet.ListObjects.Count
End Sub