Hoje trago uma questão que foi-me colocada na semana passada.
A questão é:
Há alguma função em Excel 97/2003 ou Excel 2007 que permita incrementar o valor de uma celula sempre que abra um determinado livro? Suponhamos que na celula C2 eu tenho o nº da nota de encomenda e quero que crie a sequência numerica dos Numeros Naturais (1,2,3, … ,n), sempre que abrir esse livro.
Cada vez que é aberto é guardado com um novo numero.
A resposta é não! Não existe nenhuma função em Excel que faça isso.
Agora isso é simples de resolver! Basta utilizar a macro abaixo, no livro onde se pretende que isso seja realizado.
Antes de avançar para a solução abaixo, não se esqueça de fazer a experiência numa Cópia do Livro onde deseja aplicar esta acção!
E já agora leia até ao final antes de começar a fazer o que quer que seja.
Ok. Vamos a isto.
1. Abra a cópia.
2. Clique em ALT+F11, para abrir o Editor de Visual Basic (VBE).
3. Expanda o VBAProject(seu livro)
4. Insira um novo módulo (Insert à Module)
5. Copie e Cole o seguinte código nesse Módulo:
Sub auto_open()
With Sheets("Folha1").Range("C2")
.Value = .Value + 1
End With
End Sub
6. Altere Folha1 para o nome da sua folha e C2 para as coordenadas da sua célula.
7. Feche o Editor de Visual Basic (não precisa guardar)
8. Guarde o livro.
Experimente!
Abra, Guarde e Reabra quantas vezes quiser. Veja o valor de celula C2.
Qualquer dúvida, não hesite em contactar.
Fico à espera do seu desafio.
Hasta la vista!
Por: Paulo Costa
pcosta71@gmail.com