Esta semana estava pensando sobre o que escrever e por coincidência ou não houve uma dúvida no meu trabalho sobre campos nomeados e logo relacionei ao que escrever.
Confesso que eu uso com pouca frequência, mas colegas meus usam com mais constantemente e eu acho bem interessante!
Nós vimos no post Usando CurrentRegion como selecionar uma tabela apenas com um comando e com campos nomeados também podemos fazer isso.
A diferença é que usamos campos nomeados quando a tabela de dados são de valores fixos, ou seja não serão adicionados linhas ou colunas.
A vantagem? Agiliza e simplifica seu código.
Imagine que eu tenha uma tabela de carros e sempre uso essa tabela copiando e colando em outra pasta de trabalho (guia).
Ao invés de usar o range, ou saber a ultima linha e ultima coluna, eu posso usar uma referencia ao nome que foi dado a tabela de carros.
Também podemos pintar sempre uma tabela nomeada independente dos dados e ainda usar campos nomeados em fórmulas.
Exemplos:
________________________________________________________
Usar em fórmulas
Produto = dados1 * qtde '(imaginando que "dados1" é nome de G1 e "qtde" é o nome de K1)
________________________________________________________
Selecionar uma tabela
Sheets(1).[tb_carros].Select
________________________________________________________
Para inserir nome à uma tabela via código
ActiveWorkbook.Names.Add Name:="Qlqr_Nome", RefersTo:=Worksheets("Plan1").Range("A1:A10")
Para inserir nome via código no modo invisível
ThisWorkbook.Names.Add Name:="Qlqr_Nome", _
RefersTo:=Worksheets("Plan1").Range("C1:C10"), Visible:=False
________________________________________________________
Para excluir um nome de referencia via código:
ActiveWorkbook.Names("carros").Delete
________________________________________________________
Segue Demonstração Abaixo:
Obs.: Ao copiar os códigos do site e colar direto no excel substitua “ e ” por ” (aspas duplas)