Você precisa da macro "UsedRange" para marcar ou contar todas as células usadas em uma tabela usando uma macro. Usando dois exemplos, mostraremos como usar isso corretamente.
Se você deseja processar células em suas tabelas usando macros, deve limitar-se às células que realmente contêm conteúdo. Isso é mais fácil e mais rápido do que pesquisar todas as células em todas as colunas e linhas. O Excel oferece a você a propriedade para este fim UsedRange no. Refere-se a todas as células usadas de uma mesa e fornece um Faixa-Objeto.
Use UsedRange para marcar as células do Excel usadas
A macro a seguir mostra como usar a propriedade na prática:
Sub MarkAllUsedCells ()
ActiveSheet.UsedRange.Select
End Sub
A figura a seguir mostra como pode ser quando a macro é usada em uma tabela. Todas as células usadas são marcadas:
A macro sempre marca as células na tabela ativa. Se você quiser usar uma mesa diferente, substitua o objeto ActiveSheet referindo-se à tabela relevante.
Como contar os intervalos de células usados no Excel
Para contar o número de células em uma tabela que contém uma fórmula, use a seguinte macro:
Sub FormulasCounting ()
Dim Cell As Range Dim Count As Double Count = 0 para cada célula em ActiveSheet.UsedRange. Células Se célula. HasFormula Then Counter = Counter + 1 Next cell MsgBox ("Existem" & Str $ (Counter) & "células com fórmulas na tabela ativa.")
End Sub
A macro define a propriedade UsedRange.Cells isso torna possível referir-se a todas as células que estão em uso na tabela. Se uma célula contém uma fórmula, a variável "Contador" é incrementada em 1. O resultado é então exibido em uma janela de mensagem:
