Abaixo decidi colocar algumas dicas importantes sobre manipulação de planilhas, dicas que podem otimizar e muito o seu trabalho do dia-a-dia.
Não esqueça de sempre visitar nosso endereço.
Selecionando planilhas com valores determinados
Vamos supor que você queira selecionar planilhas na qual suas respectivas células "A1" tenham valor igual a 50.
Sub selecionarplanval()
dim procv() as variant
nbplan=0
for i=0 to sheets.count-1
if sheets (i+1).range("a1").value=50 then
redim preserve procv(nbplan)
procv(nbplan)=sheets(i+1).name
nbplan=nbplan+1
end if
next
sheets(procv).select
end sub
Criando uma planilha
sheets.add
Criando uma planilha com nome
sheets.add.name="Teste"
Excluindo planilha
sheets("plan1").delete ou activesheet.delete ou sheets (1).delete
Inserir uma planilha e renomear automaticamente
Sub InserirPlanilhaComNome()
Dim nome Sheets.Add ' inseri uma nova planilha
nome = InputBox("Informar nome da nova planilha") 'solicita o nome da nova planilha
ActiveSheet.Name = nome ' renomeia a planilha
End Sub
Dentro do editor de VBA (alt + F11) existe uma propriedade que no meu ponto de vista é de essencial conhecimento, a propriedade ScrollArea, nela podemos determinar quais células deixaremos visível ou não em uma determinada planilha.
Exemplo
Worksheets(1).scrollarea="a1:f100"
ou preencher na própria propriedade
$a$1:$f$100
**Lembrando que tudo isso dever ser feito dentro de um modulo,sendo assim, você poderá criar botões para utilizalos sempre que precisar.**
3 comentários:
Tudo que eu queria saber...Vcs tem alguma apostila de VBA interagindo com planilhas, ou seja sem forms apenas metodos que modificam planilhas e celulas.
Muito bom! Me ajudou. Obrigada
Achei seu blog no google e tenho que dizer que suas dicas me ajudaram muito! O mais legal é que são várias dicas úteis e rápidas que vão direto ao ponto.
Muito Obrigado!
Postar um comentário