Truques e dicas Excel
Endereço da última célula (mais abaixo) não vazia de uma coluna numa folha excel (neste caso a coluna A):
ActiveSheet.Cells(ActiveSheet.Rows.Count, "A").End(xlUp).Address
ou
ActiveSheet.Cells(ActiveSheet.Rows.Count, 1).End(xlUp).Address
Endereço da última célula (mais à direita) não vazia de uma linha numa folha excel (neste caso a linha 1):
Endereço da última célula (mais à direita e mais abaixo) com valores numa folha de excel:
ActiveSheet.Cells(ActiveSheet.Rows.Count, ActiveSheet.Cells(1, ActiveSheet.Columns.Count).End(xlToLeft).Column).End(xlUp).Address
ActiveSheet.Cells(ActiveSheet.Rows.Count, "A").End(xlUp).Address
ou
ActiveSheet.Cells(ActiveSheet.Rows.Count, 1).End(xlUp).Address
Endereço da última célula (mais à direita) não vazia de uma linha numa folha excel (neste caso a linha 1):
ActiveSheet.Cells(1, ActiveSheet.Columns.Count).End(xlToLeft).Address
Endereço da última célula (mais à direita e mais abaixo) com valores numa folha de excel:
ActiveSheet.Cells(ActiveSheet.Rows.Count, ActiveSheet.Cells(1, ActiveSheet.Columns.Count).End(xlToLeft).Column).End(xlUp).Address
Comments
Post a Comment