Home Excel - Dicas Microsoft Excel VBA Excel VBA - Relatorios vba Excel planilha vba relatorio e uso de variavel video vba excel

Excel planilha vba relatorio e uso de variavel video vba excel

E-mail Imprimir PDF

'//====================='
VÍDEO YOUTUBE - COMO EXTRAIR UM RELATORIO PERSONALIZADO.
Abrirá a pagina do youtbube com o vídeo Saberexcel sobre como Extrair um Relatório usando a instrução for next e condição if com variaveis
http://www.youtube.com/watch?v=m9Crh7zzUxw
'//====================='
 comentarios   ====== baixe o exemplo de intrução for next e variavel (Abacate) no final da planihlha
CASO INTERESSE , OS ASSUNTOS QUE DEVERÁ ESTUDAR SÃO SOBRE
'VARIAVEIS DO VBA OU VB
'//====================='
Prezado Daniel, boa Tarde,
Daniel as letras  “j” e a letra “i” - -- são variáveis atribuídas por mim,
ou pelo usuario desenvolvedor qualquer para referenciar as linhas encontras pela intrução Loop (For next)  que,  a cada volta incrementa um número a variável “i”.
E atribui também a variável “j” para diferenciar da  variável “i” porque são as linhas em outra folha de planilha. isto é Planilha DIFERENTES


Escola Saberexcel VBA Estudos® - Treinamentos com Macros, Fórmulas e Funções

DUVIDA ENVIADA PELO AMIGO DANIEL ( vídeo youtube - sobre como extrair relatorios personalizados - variaveis)
Boa noite Expedito Macondes,
Gostaria  que fizesse uma breve explicação sobre os valores que você indica no vídeo abaixo, o que é o “J” e o “i”?
caso usar a variavel  "i" no lugar da J, encontrará outros números de linhas" observe que a variável “i” esta referenciando ao conteúdo da primeira Planilha.
E a variável “j” as linhas que serão inseridas pelo relatório na segunda Planilha.
observe também que após a cada loop há um incremento  de  j = j + 1,   se for  j= 1   então j = 2  e assim sucessivamente,
As variáveis não precisam ser  impreterivelmente “i”  ou “j”  você poder dar qualquer nome
vLinha, wLinha, wLin, pode até chamá-las de “Abacate fiz exemplo” “Abobora”, “Manga”, “Abacaxi”, “Batata”, “carro”, “bicicleta”, “pimenta”...etc...
mas é mais prático por exemplo  usar “i”  de incremento ,  “vLin” linhas, “vCol de coluna” “vPlan”  Planilhas qualquer coisa, desde que não faça
parte do escopo do Excel, como “if” “then” “else” e outros ,  nomes que são usados pelo Excel para programar. ..

Temos um trabalho como Curso Completo Microsoft Excel VBA, 141 Planilhas com as Intruções Loops  que poderá ajudá-no no entendimento sobre atribuições de variávies, são ótimos exemplos didáticos para essa finalidade.
(*)  - Curso Completo Microsoft Excel VBA
(*) - Excel VBA - Instrucoes Loops Treinamentos

(*) -- para você entender estou lhe enviando uma planilha execute-a para compreender.
há um temporizador no loop, para voce visualizar melhor (espaços de 05.segundos) veja a função abaixo (temporizador)
Fique com Deus,
Expedito Marcondes.

 '//===================' MACROS USADAS NO EXEMPLO ============================'

Sub selecionando_dados_linhas()
Dim Abacate As Long 
'//==========Abacate" poderia ser "i","j", "k", "vCol","vLin", "wLinha,", "vColuna", etc...
'//========== como disse cima poderá se qualquer nome que nao faça parte do escopo do Excel VBA

Plan1.Range("e1:g1000").ClearFormats
Plan1.Range("g1:g1000").ClearContents
'//========== todas linhas usadas na coluna(e)
For Abacate = 1 To Range("e65000").End(xlUp).Row 
    Plan1.[j11].Value = "Um momento estou trabalhando..... Faltam [ " & Abacate & " de [" & Range("e65000").End(xlUp).Row & " ]"
    Tempo 0.5  ''//==========  insere um temporizador somente para voce visualizar, senao é muito rápido
    Range("e" & CStr(Abacate)).Interior.ColorIndex = 4
    Range("e" & CStr(Abacate)).Offset(1, 0).Resize(4, 10).Font.Size = 8   'mude os números para fazer os testes e verificar resultados.
    Range("e" & CStr(Abacate)).Offset(, 2).Interior.ColorIndex = 36
    Range("e" & CStr(Abacate)).Offset(, 2).Value = "Variavel Abacate vale [ " & Abacate & " ]"
Next Abacate
Plan1.[j11].Value = "{<< F I M >>}"
End Sub

'//========== aqui é uma função que usei para o macro pausar o loop de 0.5 em 0.5 segundos para voces visualizarem os resultados mais devagar Ok

Sub Tempo(SbTempo)
Dim VelhoTempo As Variant
If SbTempo < 0.01 Or SbTempo > 300 Then SbTempo = 1
   VelhoTempo = Timer
Do
DoEvents
Loop Until Timer - VelhoTempo >= SbTempo
End Sub

 
Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Escola Saberexcel VBA Estudos® - Treinamentos com Macros, Fórmulas e Funções.

  Baixe o exemplo de planilha contendo os macros acima:
Excel vba variaveis uso extracao relatorio instrucao for next (32.9 KB)

Última atualização em Sáb, 10 de Novembro de 2012 13:23  

Pesquisa Google SaberExcel

Publicidade Google

Publicidade

Rastreamento Correios

Digite o número do SEDEX conforme o exemplo:
Correios do Brasil

Assinatura SaberExcel

Google Associados

Depoimentos

Visitantes SaberExcel

Excel VBA Estudos®
mod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_counter
mod_vvisit_counterHoje4893
mod_vvisit_counterOntem5059
mod_vvisit_counterEsta Semana19940
mod_vvisit_counterSemana passada30982
mod_vvisit_counterEsse mês38128
mod_vvisit_counterMês passado153723
mod_vvisit_counterTodos10460957
Aprenda MS Excel VBA

Adicione Saberexcel Favoritos

 
 

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel,


   Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA