O recurso mais poderoso de um computador é a sua capacidade de automatizar, e que é baseado em um conceito de programação simples, chamado de "loop ". Se a linguagem é o Visual Basic, Assembler , Fortran, C ou Java , a conveniência da computação vem do loop. Essencialmente , você pode instruir o computador a repetir um determinado centenas de tarefas, milhares ou mesmo milhões de vezes. É fácil de programar um circuito simples em Visual Basic para alterar várias células no Excel. Coisas que você precisa
MS Excel com VB
Show Mais instruções
tipo em um programa simples com um laço
1
Segure a tecla " Alt " e pressione a tecla " F11 " em uma nova planilha no Excel. Olhe para o Editor do Visual Basic, e se você ver a planilha na tela em vez disso, selecione " Ferramentas ", selecione " Macro ", selecione "Editor do Visual Basic ".
2
Clique em "Inserir " e selecione " Module ". Digite o código a seguir , quando você vê o cursor piscando sob a palavra " (General) " :
Sub SimpleLoop ()
Dim I Como IntegerWorksheets ( " Sheet1" ) ActivateRange ("A1 . . " ) Selecione
' Comentário: Aqui está o laço vem
For I = 1 To 100ActiveCell.Value = IActiveCell.Offset (1 , 0) ActivateNext eu
.
comentário: loop termina na declaração acima
End Sub
3
Revise seu código cuidadosamente para erros - os dois personagens após a palavra " SimpleLoop " são parênteses . Verifique se o seu código é exatamente como o código acima
4
Execute o programa : ". . Run Sub /UserForm " Selecione "Executar", em seguida, selecione
5
Confirmar os resultados do programa clicando no "X" verde no canto superior esquerdo da tela . Note que o programa tem escrito os números de 1 a 100 nos primeiros 100 células na tela.
Modificar o Programa
6
Segure a tecla " Alt " e pressione " F11 ". Mude o seu programa para fazer 100 cálculos rápidos e armazenar o resultado : Mova o cursor para a linha que lê ", ActiveCell.Value = I". Mudá-lo com a seguinte redacção :
ActiveCell.Value = 1,05 ^ (I)
7
Execute o programa . Clique no "X" verde novamente e confirmar que o programa fez 100 cálculos e armazenado -los na planilha. Calcular manualmente 1,05 elevado à potência 2 para entender o cálculo.
8
Limpar a tela segurando a tecla "Ctrl" e pressionando " A. " Solte as duas teclas e clique em " Del. "
9
Altere seu programa para escrever uma mensagem de 200 vezes : " . F11 " Segure a tecla " Alt " e pressione Mova o cursor para o número "100" e substituí-lo por "200 ". Mover o cursor uma linha para baixo e substituir " I" com "Eu adoro computação ! " A linha de código deve ficar assim :
ActiveCell.Value = " Eu amo computação ! "
10
Execute o programa novamente. Clique no "X" verde novamente e confirmar que o programa tem escrito "Eu amo computação ! " 200 vezes .
