Área Nomeada Dinâmica.

[Videal]

Tenho uma área nomeada que vai de A12:A25 ela se chama "DADOS", preciso saber se, ao adicionar algum dado na célula A26, a minha área nomeada automaticamente passe de A12:A25 para A12:A26, e assim por diante, a medida que eu adiciono dados, ela vá aumentando.

Videal

[RenatoMejias]

Videal, isso pode ser feito sem VBA, basta você criar uma lista, assim você pode adicionar dados e sua área DADOS aumentará.

Obs: Para criar lista vá em Dados>>Lista>>Criar Lista.

[Videal]

Essa é uma boa, mas não era bem isso que eu precisava, de tanto eu fuçar, eu acabei conseguindo fazer, tá aí:

Sub AreaNomeadaDinamica()

Dim UltLinDados As Long

'Variável que descobre a ultima linha de dados da planilha (Nome_da_Planilha) da coluna A

UltLinDados = Sheets("Plan1").Range("A65536").End(xlUp).Row

'A esse intervalo "A1:A & UltLinDados" daremos o nome de "DinDados"

Sheets("Plan1").Range("A1:A" & UltLinDados).Name = "DinDados"

End Sub

Logo, toda vez que adicionar dados na planilha, automaticamente tem que executar esta rotina, para que nomeie a area que tiver dados.