#102

  Рет қаралды 23,159

Alessandro Trovato

Alessandro Trovato

Күн бұрын

#102 - VBA Excel - Distribuição de parcelas pagas
Através de uma dúvida recebida (do amigo Fernando Lima) por email resolvi gravar essa aula demonstrando como fazer a explosão ou separação dos valores recebidos (por exemplo em cartão de crédito) em várias células.
Conteúdo da aula:
- Do while (loop principal)
- For Next (loop secundário)
- IF (teste de condição)
- Cells (gravando dados em duas planilhas diferentes)
Bons estudos!
************
ERRATA: Agradecendo ao José Antonio Morato informo que a cópia dos títulos das colunas (no final da aula) apresenta a data e o número da parcela invertidas.
************
Cursos com CERTIFICADOS: cursos.alessan...
Portal com aulas dos cursos completos: www.alessandro...
#Excel #VBA #MVP #MVPBR #MVPBuzz #ExcelVBA #MicrosoftExcel
Me acompanhe nas redes sociais:
LinkedIn: bit.ly/2Kyy2qv
Blog: blog.alessandr...
Download de material: www.alessandro...

Пікірлер: 94
@gersondearaujobezerra4208
@gersondearaujobezerra4208 7 жыл бұрын
Olá professor. Como sempre as suas aulas são excelentes. Ao notar tanto entusiasmo e a vontade de repassar o seu saber lembro com saudade da época - e já faz muito tempo -, quando ainda jovem e cheio de sonhos tive a oportunidade de conviver com mestres excelentes. Que outros mestres sigam o seu exemplo aqui no KZbin. Parabéns.
@excelcomoleo1107
@excelcomoleo1107 3 жыл бұрын
Um monstro do EXCEL/VBA. Obrigado mestre Trovato, tem me ajudado muito
@AlessandroTrovato
@AlessandroTrovato 3 жыл бұрын
Fico muito grato e feliz com sua mensagem Excel Professional! Compartilhamos da mesma paixão pela ferramenta! Grande abraço.
@excelcomoleo1107
@excelcomoleo1107 3 жыл бұрын
@@AlessandroTrovato eu que sou grato por ter acesso a este conteúdo valioso. Usei o conteúdo desse vídeo para implementar o parcelamento em um sistema que estou desenvolvendo para um Eng. Agrônomo; quero tirar uma dúvida: como fazer para incluir um formato de pagamentos à vista no mesmo sistema? Obrigado
@wessleybarbosa4201
@wessleybarbosa4201 7 жыл бұрын
"acho que fiz uma caquinha" kkkk falo isso direto nas minhas planilhas, por isso que gosto do seus videos arrumando os erros nos próprios videos. abraços professor
@veronicaleite9629
@veronicaleite9629 7 жыл бұрын
Muito bacana, ainda chego lá. vou assistir suas aulas de vba, assim que terminar as aulas de funções. Obrigada por compartilhar conosco.
@CelsonFC
@CelsonFC 6 жыл бұрын
Só passei para parabenizar mais uma vez!!! Excelente!!!
@AlessandroTrovato
@AlessandroTrovato 6 жыл бұрын
Muito obrigado mais uma vez pela mensagem Celson! Fico muito feliz que esteja gostando dos trabalhos! Se você ainda não é um inscrito(a), convido a se inscrever em meu canal de vídeos! Espero que os mais de 530 vídeos tutorias que possuo atualmente (só de Excel são mais de 300!) possam lhe ajudar. Bons estudos e sucesso!
@LeonardoOliveira-wx2vs
@LeonardoOliveira-wx2vs 5 жыл бұрын
Parabéns Professor Alessandro!.. Aula TOP. Estava precisando muito desta aula. Para atender uma necessidade da minha empresa, eu preciso que a cada venda no cartão este parcelamento com respectivos valores e datas de vencimento, seja transferido para uma Planilha ao lado intitulada como Fluxo de Caixa e que esta transferência seja distribuída na Linha correspondente à Linha de Vendas à Prazo - organizar estas informações na horizontal... Desde já, agradeço. Obrigado!
@aapcabanas
@aapcabanas 7 жыл бұрын
Bom dia, Mestre Trovato!!! Ótima aula, adoro demais sua didática. Espero um dia chegar ao seu nível e do Laennder! Abraços e sucesso!
@AlessandroTrovato
@AlessandroTrovato 7 жыл бұрын
Olá Cabanas! Meu amigo, você tem grandes chances de nos ultrapassar e superar! O fator idade conta muito a seu favor e com seu esforço você vai longe! Sucesso!
@MikelSFraga
@MikelSFraga 7 жыл бұрын
Mestre Trovato, boa noite. Simples e produtivo. Excelente vídeo e tema extremamente relevante. Forte abraço!
@joaocarlosjanuario9188
@joaocarlosjanuario9188 5 жыл бұрын
Alessandro Parabéns! Obrigado por Compartilhar! Vou relatar alguns fatos, que talvez possam ajudar pessoas que tiveram ou terão os mesmos problemas: 1) O problema das DATAS, quanto aos dias 01 a 12, o sistema inverter trocando o dia pelo mês. Exemplo data da emissão: 02/08/2017 + 30 dias = 01/09/2017 e o sistema gravar 09/01/2017, para corrigir, ao invés de usar o formato "dd/mm/yyyy", usar CDate(datavenda +30). 2) Para fixar o mesmo dia use a função EDate em (VBA), que é a mesma DATAM (em Português).
5 жыл бұрын
Olá Joao Carlos. Com relação a essa alteração, em que parte do codigo ela deve ser feita? Quando rodo o código, aparece a mensagem "Erro em tempo de execução 13". E quando eu peço para depurar vai direto para "vDataVenda = w.Cells(Ln, Col + 1).Value (dentro de Do While). Seria nesta parte do código que devo proceder à alteração? E como deve ser feito? Pode me ajudar?
@joaocarlosjanuario9188
@joaocarlosjanuario9188 5 жыл бұрын
@, Então, na verdade esse script: vDataVenda = "w.Cells(Ln, Col + 1).Value", quer dizer que a variável vDataVenda está assumindo o valor de: "w.Cells(Ln, Col + 1).Value", captado do documento vCartão, na Coluna +1. O ponto a que me refiro, está na gravação da informação (dessa variável) para a planilha, onde se especifica o local: "w.Cells(TransfLn, transfCol + 1).Value = CDate(vDataVenda + (A * 30) )", onde CDate já em formato "dd/mm/yyyy", caso usa-se a soma da multiplicação (A * 30), onde "A" é o número da parcela, advinda do loop For A To. Caso queira colocar 1 mês após no mesmo dia USE EDate(DataVenda, 1), ou o próprio "A" que vai ser o número da parcela, sendo que o "incremento" do prazo, se dá por número de meses e não dias. Então se for colocar para 2 meses, fica EDate(DataVenda, 2), para o mesmo dia, 2 meses após. Antes de descobrir essas formatações, eu havia criado um Select Case para as parcelas: Case Is A = 1, EDate(DataVenda, 1), Case Is A = 2, EDate(DataVenda, 2) e na verdade nem precisaria criar essa rotina de Case. João, se tiver dando erro pode ser incompatibilidade da formatação da variável com o dado que se está pegando para essa variável. Como a variável é uma data, na declaração deve estar "Dim vDataVenda as Date". Mas, caso o script da variável seja: "vDataVenda = w.Cells(Ln, Col + 1).Value", onde a coluna é a do "Cartão" + 1, ou seja na coluna 2 e lá NÃO É UMA DATA, DÁ ERRO. Confira se a coluna que está pegando seja mesmo uma data.
5 жыл бұрын
@@joaocarlosjanuario9188 No caso da busca dos dados para a variável Data, de fato ela está buscando as informações numa variavel no formato Date. Inclusive a variável data foi declarada como Date também. Então não entendo o porquê desse erro. Quanto ao primeiro passo, entendi perfeitamente. Muito obrigado pelo esclarecimento.
@joaocarlosjanuario9188
@joaocarlosjanuario9188 5 жыл бұрын
Uma OBSERVAÇÃO: na função CDate, o argumento é numérico em número de DIAS APÓS CDate(variável, 30 ou (A*30)) e a função EDate, o argumento é numérico também em número de MESES APÓS CDate(variável, 1, 2 ... ou A).
@joaocarlosjanuario9188
@joaocarlosjanuario9188 5 жыл бұрын
@ Então, esse código "vDataVenda = w.Cells(Ln, Col + 1).Value (dentro de Do While)", como mencionei acima, está buscando um valor para a variável vDataVenda, ok?! Para depois, lançá-lo na relação de vencimentos e valor das parcelas. Tá, precisa ser verificado também a formatação da sua origem na célula e coluna da planilha, ou seja, na linha (Ln) e na coluna (Col + 1), se é a linha e coluna correta e se o dado lá é data, além, claro do tipo data da declaração da variável vDataVenda. Por incrível que pareça essa parte de data me deu um pouco de trabalho também. Eu havia feito no lançamento original dessa forma, exemplo: 08/02/2019-15:35:16 (como string), ou seja, "floreei" um pouco acrescentando: hora:minuto:segundo, na geração do lançamento. Só que dava erro quando eu tentava buscar o valor como data. Por quê?! Porque não era data, POR CAUSA DO "-". Eu deveria ter gravado sem o "hífen": 08/02/2019 15:35:16. Daí, fiz uma função para truncar somente a data, usando left(w.Cells(Ln, Col + 1).Value, 10), que pega como data. Reveja a origem da informação como ela está gravada e se refere à célula correta e se não há algum caractere que despersonifica a data.
@Almirjorge1
@Almirjorge1 6 жыл бұрын
Parabéns!!!! Como sempre, ótima aula.
@AlessandroTrovato
@AlessandroTrovato 6 жыл бұрын
Muito obrigado Almir pelo feedback! Se você ainda não é um inscrito(a), convido a se inscrever em meu canal de vídeos! Espero que os mais de 540 vídeos tutorias que possuo atualmente (só de Excel são mais de 260!) possam lhe ajudar. Bons estudos e sucesso!
@josesilvand9244
@josesilvand9244 5 жыл бұрын
Alessandro Trovato: Uma observação ao Copiar para a célula G, observe que abaixo de DATA VENDA apareceu Parcelas 1.... e em PARCELAS as datas.
@joaquimcarlosmendonca2336
@joaquimcarlosmendonca2336 3 жыл бұрын
Alessandro, Muito Legal esta Aula... Gostaria de usar este código no formulário....
@AlessandroTrovato
@AlessandroTrovato 3 жыл бұрын
Muito obrigado pela mensagem Joaquim. Você pode adaptar a vontade o seu código e adaptar a estrutura a um formulário e seus controles.
@thiagomarcondes9502
@thiagomarcondes9502 7 жыл бұрын
Boa noite Alessandro Trovato, Excelente trabalho que você vem realizando, tenho ampliado meu conhecimento gradualmente desde que comecei a acompanhar suas aulas. Nesta em especifico, foi esclarecido uma duvida que eu tinha já ha alguns anos, pois tenho um controle de cartões de crédito em minha empresa que utiliza VBA, e só faltava este sistema de distribuição de parcelas. Muito obrigado por compartilhar este conhecimento. Você comentou no vídeo sobre seu curso de Excel avançado, gostaria de saber se você disponibiliza certificado após conclusão do curso? Abraço.
@AlessandroTrovato
@AlessandroTrovato 7 жыл бұрын
Olá Thiago! Grato pela sua mensagem e pelo seu feedback. Quanto a sua pergunta, sim, o Curso de Excel Avançado fornece certificado. Segue o link do curso> curseduca.com/c/microsoft-excel-2013-avancado/BFED29ED Bons estudos e sucesso! Se ainda não é um inscrito(a), convido você a se inscrever em meu canal de vídeos! Espero que os mais de 420 vídeos tutorias que possuo atualmente (só de Excel são mais de 170!) possam lhe ajudar. Bons estudos e sucesso!
@janiosba
@janiosba 5 жыл бұрын
Consegui. Usei DateAdd("m".......
@AlessandroTrovato
@AlessandroTrovato 5 жыл бұрын
Que bom!!! Parabéns!
@renatosouza8649
@renatosouza8649 7 жыл бұрын
Olá Alessandro, parabéns pelo seu trabalho, só duas perguntas, qual autor do livro de Macros e VBA na sua estante e qual livro você e qual universidade você nos recomendaria para Analise e desenvolvimento de sistemas, obrigado e me desculpe por bisbilhotar sua estante.
@Mishlei-3
@Mishlei-3 19 күн бұрын
Professor, boa tarde! Sou recém chegado no canal... No Excel Desktop consegui chegar exatamente no mesmo resultado dessa aula, porém estou desenvolvendo algo similar para usar no Excel Online, até olhei uma outra aula sua falando sobre a transpilação do código VBA utilizando o copilot, porém qdo migro os códigos para o OfficeScript não funciona. Estou entrando no mundo da linguagem de programação agora, por isso tenho uma certa dificuldade, consegue dar um auxílio?
@marciomelo8447
@marciomelo8447 7 жыл бұрын
Cara, tomei um suador, mas entendi e adaptei ao meu problema! Sou principiante no VBA,e ainda não consigo escrever os códigos de fato. Gostaria de realizar o curso do início para ir me acostumando. Obrigado de qualquer forma!
@AlessandroTrovato
@AlessandroTrovato 7 жыл бұрын
Olá Marcio! Para que você consiga um bom domínio o ideia é realmente começar esse curso do principio. São 67 aulas essenciais para o bom entendimento da programação VBA. Na metade do curso garanto que já terá evoluído em pelo menos 60% suas habilidades. Se você ainda não é um inscrito(a), convido a se inscrever em meu canal de vídeos! Espero que os mais de 500 vídeos tutoriais que possuo atualmente (só de Excel são mais de 250!) possam lhe ajudar. Venha conhecer meu próprio portal de cursos também: trovato.curseduca.pro/home/ Bons estudos e sucesso!
@marciomelo8447
@marciomelo8447 7 жыл бұрын
Obrigado, já me agilizei! Estou dentro! Abraço.
@romuloamorim3176
@romuloamorim3176 5 ай бұрын
Olá Trovato, gostei da sua didática, gostaria de saber se existe a possibilidade de obter os mesmos resultados porém sem código VBA, somente com fórmulas?
@AlessandroTrovato
@AlessandroTrovato 5 ай бұрын
Dá para fazer sim Romulo, mas é bem trabalhoso, principalmente se as parcelas forem de número ímpar. Faça o teste. Escreva os seguintes valores: A1: Valor B1: Parcelas C1: Total A2: 155,00 B2: 7 C2: =SOMA(D2:XFD2) D2: =SEQUÊNCIA(1;B2;A2/B2;0) Com a matriz dinâmica, o resultado será despejado, considerando várias dízimas. Quando os valores envolvidos são pares, o valor é calculado corretamente. Se tiver um tempinho para pensar em uma solução que some a diferença entre os resultads em alguma parcela, te aviso. Ou, se conseguir, coloque o resultado por aqui...
@leopresentte
@leopresentte 3 жыл бұрын
Fantastico suas explicações. Me tira uma dúvida. Tenho uma tabela onde nas colunas partindo da coluna "b3" tenho os meses, na coluna 1 tenho as quantidade de parcelas e na coluna 2 tenho os valores da parcelas. Preciso repetir o valores das parcelas pela quantidade de vezes que for a parcela nos meses. Como eu faço isso?
@cmarques2658
@cmarques2658 6 жыл бұрын
Ola Professor Trovato...a ndo a procura de um vídeo seu e não encontro.Tem haver com parcelamento de um empréstimo usando apenas funções do excel mas não encontro...Se não me falha a memoria esse vídeo fala sobre referencias a outras células e a sua devida proteção...Esse vídeo estava no grupo funções do excel mas não o acho...
@fazecompany3224
@fazecompany3224 4 жыл бұрын
a linha Do While ActiveCell.Row
@HidroMundoprojetos
@HidroMundoprojetos 7 жыл бұрын
Opa...Aula nova! KKKK Valeu.
@janiosba
@janiosba 5 жыл бұрын
Este código me auxilia em muito. Agora tenho um problema a resolver e não estou conseguindo. Se puder ajudar. Preciso que os vencimentos das parcelas ocorram sempre no mesmo dia em todos os mesmos
@AlessandroTrovato
@AlessandroTrovato 5 жыл бұрын
Olá Janio.! Você pode utilizar a função Dateadd no VBA passando como argumento "M" para month, depois a quantidade de meses (positivo para frente, negativo para traz) e por fim a data base. Se você ainda não é um inscrito(a), convido a se inscrever em meu canal de vídeos! Espero que os mais de 710 vídeos tutorias que possuo atualmente (só de Excel são mais de 400!) possam lhe ajudar. Site com todos os vídeos dos cursos completos organizados: sigaonerd.esy.es/index.html Site com meus cursos com certificados: cursos.alessandrotrovato.com.br Bons estudos e sucesso!
@mescobar2755
@mescobar2755 3 жыл бұрын
Boa tarde, Alessandro! Feliz ano novo para vc e sua família. Excelente aula, só uma perguntinha: Como faço para colocar as parcelas uma ao lado da outra ao invés de na mesma coluna? Ex. 3 parcelas = 3 colunas. Obs. Sem copiar o número do cartão
5 жыл бұрын
Prezado Trovato e demais, boa tarde. Gostaria de esclarecer duas dúvidas para adaptação deste código. Se eu quiser colocar as parcelas ao longo das colunas, ao invés da linhas, como devo fazer? A outra dúvida é se eu tiver uma venda que foi feita À vista, como devo colocar estar instrução para que se registre a venda e o recebimento equivalente ao mesmo dia (não jogue para meses subsequentes)
@joaocarlosjanuario9188
@joaocarlosjanuario9188 5 жыл бұрын
João Paulo, eu tive o mesmo problema e adaptei. No Userform onde se imputa os dados, crie um campo ao final tipo text, com a label "parcelas", onde se possa digitar as parcelas tipo 0/15/30/45/60/75 (separados por / ou outro caractere, sempre o mesmo caracter), percebe-se que podes colocar qualquer prazo. A pergunta, como "quebrar" essa informação? Quando for executar as parcelas, crie uma rotina com "Array" (Menu Dados, texto para colunas). Faça um exemplo numa outra planilha, crie uma coluna com uma relação de prazos assim, use o gravador de macros e quebre os dados, utilizando a opção "Delimitado", tabulação, outros e coloque a barra, e extraia a partir da coluna seguinte, exemplo: 0/15/30/45/60/75 vai ficar assim 0 15 30 45 60 75 0/15/30/45/60/75 vai ficar assim 0 15 30 45 60 75 0/15/30/45/60/75 vai ficar assim 0 15 30 45 60 75 Pare a macro e pegue o código. Coloquei os mesmo prazos como exemplo. Na sua rotina onde "carrega" as variáveis crie variáveis para cada parcela, tipo vP1, vP2 .... vPn. Depois, assim como se carrega cada variável, carregue essas dos prazos das parcelas "w.Cells(Ln, Col + 10).Value", se a parcela estiver na coluna "11" (porque a 1a. é do cartão), depois +12, +13 ...+n. Depois, programe a colocação do valor dessas variáveis para o local das parcelas e dos vencimentos: "w.Cells(TransfLn, transfCol + 10).Value". Após completado a execução, programe para "limpar" esse Array colocado em novas colunas à direita do banco de cartões ou documentos. Esse exemplo serve apenas, quando os prazos das parcelas são diferentes de 30 dias, caso seja de 30 em 30 dias ou para a mesma data, use o mesmo número da parcela: CDate(DataVenda, (A * 30)) ou EDate(DataVenda, A).
5 жыл бұрын
@@joaocarlosjanuario9188 , muito obrigado pelo retorno. Vou tentar proceder com as mudanças sugeridas
@michaelbatista48
@michaelbatista48 4 жыл бұрын
é possivel colocar cada parcela destribuida em cada aba expecifica? Por exemplo 4 parcelas aba 1 parcele 1 aba 2 parcela 1 aba 3 parcela 3 aba 4 parcela 4 aba 5 em branco
@paulosilva-cw9vb
@paulosilva-cw9vb 7 жыл бұрын
Excelente trabalho professor. Só uma dúvida. Pq a linha 18 ficou com o formato de moeda. Obrigado
@soumarciosales
@soumarciosales 6 жыл бұрын
parabéns por mais esse aula, Mestre Trovato... pode parecer bobo, mas eu queria fazer o inverso... tenho as diversão parcelas,e queria ver o resumo das vendas, so que nesse seu exemplo, os valores das parcelas estão juntos, digo, um embaixo do outro.. na minha tabla os valores estão na mesma coluna mas espalhados.. Pode me ajudar??
@welissonnery
@welissonnery 7 жыл бұрын
Olá amigo, muito boa sua aula! Eu fiz uma adaptação porem no access, estou com dificuldade de criar a lógica de diferença nas parcelas... Estou fazendo assim: For i = 1 To tParcelas rs.AddNew rs!NumeroVenda = Range("NumeroPedido").Text rs!NomeCliente = Range("Cliente").Text rs!DTcompra = Range("DtCompra").Text rs!DTvencimento = Range("DtVencimento").Text rs!NfDocumento = Range("NfDocumento").Text rs!QuantParcelas = Range("NumeroParcelas").Text rs!ParcelasDe = Application.WorksheetFunction.Round(vValorTotal / vParcelas, 2) rs!MeioPagamento = Range("MeioPagamento").Text rs!Vencimento = vVencimento vVencimento = DateAdd("M", 1, vVencimento) rs.Update Next Funcionou perfeitamente! Porem não consigo criar esse calculo de diferença entre as parcelas... só precisaria adaptar isso: 'Checar valor total da venda If VerDif < vValorTotal Then W.Cells(TransfLn - 1, TransfCol + 3).Value = _ W.Cells(TransfLn - 1, TransfCol + 3).Value _ + (vValorTotal - VerDif) ElseIf VerDif > vValorTotal Then W.Cells(TransfLn - 1, TransfCol + 3).Value = _ W.Cells(TransfLn - 1, TransfCol + 3).Value _ - (VerDif - vValorTotal) End If Nesse código, você tem uma luz meu amigo? kkkk
@luanarodrigues9782
@luanarodrigues9782 7 жыл бұрын
Olá, primeiro estou adorando as aulas você explica muito bem, parabéns! Bom, fiz udo conforme você ensinou, porem ao sair salvei minha planilha e ao retornar ela não executava os comando dos botões. Poderia me ajudar ? Desde já Grata
@AlessandroTrovato
@AlessandroTrovato 7 жыл бұрын
Olá Luana! Muito obrigado pelo seu feedback e por estar acompanhando as mensagens. Isso aconteceu pois durante o processo de salvamento sua planilha foi salva com a extensão XLSX (confira quando puder). Nesse formato a planilha perde as macros. Quando for salvar planilhas com macros escolha a opção Salvar Como e no campo tipo escolha Planilha habilitada para macros - com a extensão XLSM (que dá suporte nativo para macros do VBA). Assim você não perderá mais seus códigos. Se ainda não é um inscrito(a), convido você a se inscrever em meu canal de vídeos! Espero que os mais de 430 vídeos tutorias que possuo atualmente (só de Excel são mais de 180!) possam lhe ajudar. Bons estudos e sucesso!
@julmarferreiradesouza6708
@julmarferreiradesouza6708 4 жыл бұрын
Olá, continuei a ver o assunto no seu canal! Porém, o link não está indo para o download da planilha!
@AlessandroTrovato
@AlessandroTrovato 4 жыл бұрын
O site SigaONerd foi descontinuado Julmar. Agora você terá acesso aos arquivos em meu site: www.alessandrotrovato.com.br Bons estudos!
@julmarferreiradesouza6708
@julmarferreiradesouza6708 4 жыл бұрын
@@AlessandroTrovato muito obrigado Trovado! Já entrei e fiz o download! Estou na luta para conseguir que a data de vencimento mude apenas o mês e ano, mantendo o mesmo dia do vencimento. Mas chego lá!
@kalinkagodoy1797
@kalinkagodoy1797 Жыл бұрын
Olá, gostaria de uma ajuda, eu já chequei mil vezes e não sei aonde estou errando, qdo ele vai 'Checar valor total da venda' em "End If" ele esta somando o valor de mais uma parcela a esta ultima.
@AlessandroTrovato
@AlessandroTrovato Жыл бұрын
Kalinka, baixe a planilha de gabarito em meu site e compare os códigos. Ela está disponível justamente para ajudar nesses momentos de problema com o código... www.alessandrotrovato.com.br Bons estudos!
@patriciacandido8231
@patriciacandido8231 4 жыл бұрын
Excelente sua aula, porém fiz algo errado e não consegui concluir a planilha, você tem ela para download? Tbem não encontrei no seu site.
@evairsilva6106
@evairsilva6106 6 жыл бұрын
Como faço para fixar exatamente no mês seguinte a data, ex. Venda em 10/01/2018 1º parcela para 10/02/2018 e assim sucessivamente.?
@martonprestes6890
@martonprestes6890 5 жыл бұрын
Conseguiu Fixar o Mês Evair?
@joseroberto3022
@joseroberto3022 4 жыл бұрын
Parabéns! Excelente vídeo como de costume. Assisti à este vídeo e ao "#164 Distrib de Valores e Parcelas", e estou tentando adaptar este código em um projeto meu, para controlar compras parceladas com cartão de crédito, porém estou com dificuldades quanto às datas de vencimento de cada parcela, pois o cartão tem uma data de vencimento fixa, todo dia 10 por exemplo, e ao colocar na instrução For Next para calcular a data de cada parcela como sendo a data da venda + 30 ou + 60... os vencimentos acabam ficando um dia antes ou depois do dia do vencimento do cartão. Tem alguma dica que possa me ajudar a resolver isso? Abraço.
@victorlemosevangelistadosa6686
@victorlemosevangelistadosa6686 5 жыл бұрын
Boa tarde, professor! Obrigado pelo compartilhamento desse excelente conteúdo. Eu fiz os procedimentos exatamente conforme esse vídeo, mas na hora de executar a segunda parcela do c1, os valores não iam para as células de G3:J3, como acontece nesse vídeo, mas sim para a G1:J1 . E aí eu continuava apertando o F8, e as informações da terceira parcela da C1, nas células G1:J1, substituíam as informações da segunda parcela nessa mesma região. E esse processo continuava até que aparecia uma mensagem de erro. Você poderia me ajudar a verificar qual foi o erro? Desde já, obrigado pela atenção.
@nelisamichettiferreira
@nelisamichettiferreira 7 жыл бұрын
Como sempre muito bom, vou praticar. Mas fiquei com 2 dúvidas: 1- Data: se eu quiser fixar o dia, ao invés de contar 30 dias. Exemplo 01/02, 01/03, 01/04.... como eu faço? 2- Copiar os dados: com o comando para apagar todas as informações que estão no destino, se eu usar o código para um fluxo de caixa, que será alimentado constantemente, eu não vou apagar os dados registrados anteriormente? Muito obrigada, e sucesso!
@lanieldelis
@lanieldelis 7 жыл бұрын
Boa tarde Nelisa, para fixar a data no vba, basta tirar o (a*30) e deixar apenas vDataVenda. Se vc quiser depois fixar os dias, tem uma fórmula no excel que faz isso pra você. Basta criar uma outra coluna e usar a fórmula =DATA(Ano(célula referência);Mês(célula refêrencia, normalmente a mesma);Dia(01). Quanto a outra dúvida, acredito que não, mas não tenho certeza..
@nelisamichettiferreira
@nelisamichettiferreira 7 жыл бұрын
Muito obrigada Daniel! Vou testar e depois eu posto o resultado. Grande abraço e sucesso!
@nelisamichettiferreira
@nelisamichettiferreira 7 жыл бұрын
Boa noite Daniel, eu fiz como mencionou, mas aí todos os vencimentos ficaram com a mesma data. Para utilizar a fórmula data que você mencionou, vai ser extraído o dia, e eu preciso que conste o dia fixo e os meses subsequentes. Por exemplo: Compra realizada em 07/03/2017 em três vezes com vencimento sempre dia 07. Vencimentos devem constar: 07/04; 07/05; 07/06. Agradeço sua colaboração.
@emerson_roots
@emerson_roots 7 жыл бұрын
Estou tentando fazer a mesma adaptação Nelissa... Conseguiu fazer?
@AndersonSilva-ik8bv
@AndersonSilva-ik8bv 6 жыл бұрын
Nelisa Michetti Ferreira Consegui realizar \o/ deixando o dia fixo
@pilan.fernando95
@pilan.fernando95 6 жыл бұрын
Alessandro, Boa Noite! Li um livro de Excel 2010, não consigo decorar as funções, mas sempre tenho minha cola ou faço buscas dentro do mesmo para encontrar algo específico que eu quero. Isso me impediria de iniciar um curso avançado? Neste caso, tenho uma "noção" de Excel. Se me impedisse, tem a possibilidade de aprender o básico ou intermediário? Qual livro e de qual autor vc indicaria?
@bentolima8516
@bentolima8516 7 жыл бұрын
tem alguma forma de fazer uma escala de turno 6x2, onde trabalho 6 e folgo 2? pra isso disponho de que equipes e três horarios, de 8hs as 16hs, 16hs as 00hs e 00hs as 08hs.
@AlessandroTrovato
@AlessandroTrovato 7 жыл бұрын
Olá Bento! É possível de se fazer sim. O amigo Marcos Rieper tem um vídeo e um artigo que fala sobre o tema! Bons estudos ! loja.guiadoexcel.com.br/produto/planilha-de-escala-de-trabalho-excel-automatica/
@marcuspasquali4541
@marcuspasquali4541 3 жыл бұрын
Como faço se quisesse que as parcelas decrescessem, tipo, 10, 9, 8, e não 1, 2, 3?
@AlessandroTrovato
@AlessandroTrovato 3 жыл бұрын
Olá Marcus. Tenho uma aula específica do For... Next no meu canal de vídeos e mostro como fazer isso. Basicamente você tem que trocar os elementos do for e passar um step negativo. por exemplo: For a = vparcelas to 1 step -1 ... next a
@LeonardoOliveira-wx2vs
@LeonardoOliveira-wx2vs 4 жыл бұрын
Olá Professor e demais colaboradores, bom dia! Talvez alguém possa me ajudar: Como colocar um valor de Entrada neste código (ex.: 10%), calculando a Entrada e as demais parcelas? Desde já agradeço. Obrigado!
@julmarferreiradesouza6708
@julmarferreiradesouza6708 4 жыл бұрын
Boa tarde Trovato! Na parte que menciona que posso incrementar a linha de código: W.Cells(TransfLn, TransfCol + 3).Value = vDataVenda + (A * 30) para ao invés de ter a data somada, onde terei variação dos dias no vencimento, fazer com some apenas o mês e ano para não mudar a data de vencimento da parcela tentei: W.Cells(TransfLn, TransfCol + 3).Value = DateAdd("m", 1, vDataVenda) Mas não funcionou! Poderia me ajudar com essa linha de código, por favor. Desde já obrigado.
@danielpereira9141
@danielpereira9141 5 жыл бұрын
Boa noite Alessandro, estou precisando de uma planilha onde eu possa lançar vendas parceladas e quando pagas eu possa dar baixa nestas parcelas. Voce consegue me ajudar?
@martonprestes6890
@martonprestes6890 5 жыл бұрын
Ainda esta procurando essa Planilha ?
@tenfen1978
@tenfen1978 6 жыл бұрын
Boa tarde Professor como sempre ótima explicação, a minha pergunta tem como cada resulta ir para outra planilha mas somente uma parcela? ex: 3 parcelas cada parcela ira para cada planilha?
@MariaDutra1217
@MariaDutra1217 5 жыл бұрын
Quando aperto F8 e chega nessa parte Set UltCel = W.Cells(W.Rows.Count, 1).End(x1Up) aparece um erro de tempo de execução 1004 o que pode ser?
@AlessandroTrovato
@AlessandroTrovato 5 жыл бұрын
o Erro está está em End(x1Up). Não é o número 1 que você tem que utilizar e sim a letra L . End(xlup)
@thaisfelizardo9757
@thaisfelizardo9757 6 жыл бұрын
Olá , gostaria de saber se tem alguma função onde eu lanço os dados em uma planilha de fluxo de caixa em um determinado mês e de acordo com a quantidades de parcelas, as parcelas serão lançadas automaticamente e outros meses?
@AlessandroTrovato
@AlessandroTrovato 6 жыл бұрын
Olá Thais. Não existe uma função no Excel que faça isso. É necessário fazer a programação do recurso como da aula que assistiu, incluindo alguns recursos de validação para saber que a parcela já foi distribuida ou não, etc. Se você ainda não é um inscrito(a), convido a se inscrever em meu canal de vídeos! Espero que os mais de 620 vídeos tutorias que possuo atualmente (só de Excel são mais de 300!) possam lhe ajudar. Bons estudos e sucesso!
@henrysantiago5051
@henrysantiago5051 6 жыл бұрын
sempre quando aperto o botão para parcelar minhas datas ficam ano 1900
@AlessandroTrovato
@AlessandroTrovato 6 жыл бұрын
Dá uma olhada no código Henry. Acredito que as variáveis que você esteja utilizando para montar a data estejam vazias na hora de inserir na planilha. Baixe a planilha matriz lá no meu blog para comparar o código: www.sigaonerd.com Se você ainda não é um inscrito(a), convido a se inscrever em meu canal de vídeos! Espero que os mais de 530 vídeos tutorias que possuo atualmente (só de Excel são mais de 300!) possam lhe ajudar. Bons estudos e sucesso!
@luanacoelho8064
@luanacoelho8064 5 жыл бұрын
Ola Alessandro boa tarde Posso ter o seu e-mail, por favor?
@evairsilva6106
@evairsilva6106 6 жыл бұрын
Como deixar os valores formatados em moeda? somente uma parcela ficou como moeda.
@martonprestes6890
@martonprestes6890 5 жыл бұрын
É só deixar a Célula já formatada como Moeda
#101 - VBA Excel - Access e VBA - Como utilizar - Aula 01
12:55
Alessandro Trovato
Рет қаралды 16 М.
Cartão de Crédito - Parcelamento
9:58
Excel Didático
Рет қаралды 33 М.
ПРИКОЛЫ НАД БРАТОМ #shorts
00:23
Паша Осадчий
Рет қаралды 6 МЛН
Função SE no controle de taxas de cartões
10:36
byeverton
Рет қаралды 9 М.
PLANILHA - SIMULAÇÃO CÁCULO IRRF 2024 EXCEL #irrf2024
3:30
Gab Excel
Рет қаралды 1,2 М.
#89 - Excel VBA - Instrução INTERSECT e TARGET (argumento)
23:06
Alessandro Trovato
Рет қаралды 14 М.
#106 - VBA Excel e Access - fazendo um Select  - Aula 5 - Parte A
20:41
Alessandro Trovato
Рет қаралды 20 М.
#104 - VBA Excel - Access e VBA - Modelagem de dados - Aula 3 - Parte A
16:57
#170 - Excel VBA - StatusBar e DoEvents
15:13
Alessandro Trovato
Рет қаралды 10 М.
#107 - VBA Excel e Access - DELETE (Apagar registros do banco) - Aula 6
18:52
#110 - VBA Excel e Access - UPDATE (Atualizar dados) - Aula 9 - Parte A
27:33