Minha experiencia e conhecimento no assunto Excel e VBA são praticamente zero. Mas graças a sua excelente didática estou conseguindo fazer meu primeiro sistema, aplicando sem maiores dificuldades, o conhecimento utilíssimo que V.Sa. compartilha conosco. Pessoas como V.Sa. são especiais e merecem todo respeito e admiração pelo seu trabalho. Por favor, não pare jamais! Tenho indicado seu canal para todos os interessados que conheço. Forte Abraço, Deus abençoe sempre!!
Rapaz... Relamente você deu aula... Conheço um pouquinho, e com a sua aula e com algumas inclusões para o que ue precisava ficou produto. Muito bom e Parabéns!
Parabens, vc tem uma didatica muito boa, fiz o formulario, e funcionou perfeito, só tive a dificuldade no salvar as fotos, mas corrigi e ficou otimo. Obrigado por compartilhar seu conhecimento com este aprendiz,.
comprei as planilhas, e tudo perfeito ! o cara tem a manha e ainda ensina a fazer pessoal. merece meu respeito! só não aprende se não quiser. parabéns pelo belo trabalho. !
Meus parabens este sistema foi o mais proximo que eu encontrei para minha necessidade de cadastro dos meus clientes , porem tenho que ter mais campos .... mas a adicao e edição de fotos esta perfeito...obrigado e sucesso
@@CanalSGP Amigo por acaso voce teria ja uma planilha pronta neste formato mas para cadastro de clientes com fotos de pedidos feitos e formato para dar zoom nas imagens? quero comprar
Minha experiencia e conhecimento no assunto Excel e VBA são praticamente zero. Mas graças a sua excelente didática estou conseguindo fazer meu primeiro sistema,muito agradecido
Obrigado por compartilhar seu conhecimento, segui as orientações e consegui desenvolver uma planilha que atendeu as necessidades do meu filho em uma loja que ele inaugurou. Gratidão.
Obrigado mais uma vez!! Se eu pudesse dava like todo dia nessa aula! Esse formulário mais que valeu a inscrição no canal. É coisa de gênio mesmo! É tão versátil, que com pouquíssimas adaptações, podemos criar sistemas para inúmeros seguimentos. No meu caso, adaptei para cadastrar pessoas (membros). E deu super-certo. Uma satisfação ver funcionar!!! Se me for lícito, peço humildemente, quando possível, por favor nos ensinar a criar um formulário que possibilita gerar e imprimir credenciais (carteirinhas) com as informações e a foto do membro e também gerar e imprimir a ficha de cadastro, com as informações e a foto do membro. O layout da carteirinha seria uma imagem em JPG com os campos para inserir as informações e a foto do membro deixados em branco. Desse modo, eu imaginei que poderia usar caixas de texto posicionadas sobre os campos em branco do layout da carteirinha. Será que daria certo? Tenho certeza que esse projeto seria de grande utilidade não somente para mim mas também para os demais assinantes que acompanham o canal além de ser aplicável em vários seguimentos de atividades. Conto com a sua grande inteligencia e boa vontade para tal. Desde já agradeço. Forte abraço. Fique com Deus.
Mestre, depois de assistir muitos vídeos, poucos são tão completos como o seu. E sua segurança em escrever os códigos auxilia muito quem está aprendendo (meu caso). Muito obrigado e parabéns!!! Ótimo vídeo! Ótimo conteúdo! Excelente utilidade!🙏👍👏🏻👏🏻👏🏻
Professor, fiz as alterações e BINGO! kkkk Como você fala, funcionou! Novamente muito obrigado! Gratidão! Deus ilumine você, sua família e seus negócios! Forte abraço!
Agradeço muito sua generosidade em passar conhecimento! você explica de uma força muito simples onde conseguimos ter resultado em realizar o exercício.
Meu amigo, que video incrivel, parabens pelo exclarecimento total e de uma forma tao simples, eu agora preciso fazer um controle de estoque com essa mesma dinamica, aparecendo foto, mostrando quantidade e se precisa ou nao abastecer estoque, voce tem algum video assim? abraço!
Parabens pelo trabalho e por dispor de tempo para repassar o conhecimento que tens para iniciantes e/ou necessitados. De grande Valia os seus videos. Obrigado!!!!!
Achei bacana esse sistema de pesquisa funcionou perfeito aqui e já vou implementar em outros sistemas já que antes usava esse recurso usando funções do Excel mas pelo VBA fica mais leve e resumido esse processo.
BOA NOITE " EU QUERIA AQUI AGRADECER AO CANAL (SGP) COM PROFESSOR LUAN , POR SUAS EXCELENTES VÍDEO AULAS , CADA DIA ESTOU APRENDENDO MUITO MAIS . OBRIGADO ?
excelente vídeo me ajudou muito com um catalogo de Livros que queria fazer gostaria de saber se no botão de pesquisa consigo inserir duas condições para pesquisa, por exemplo fornecedor e Produto?
Bom dia, obrigado, a pesquisa precisa ser por critério exato, se for informação única pode alterar a coluna de pesquisa ou trabalhar com if para definir quando deve ser feito a busca em qual coluna.
Aula top Professor, parabens pela didatica incrivel. Tenho uma duvida, se eu quiser exportar esse cadastro de produtos em PDF, existe alguma forma pra ele exportar com as imagens anexadas?
Olá professor! Parabéns por compartilhar o conhecimento! Gostaria de saber se tem algum código para rotacionar a foto que foi carregada, pois algumas fotos quando carrego vem na horizontal, então gostaria de ver um botão para rotacionar a foto depois de carregada.
Aula muito boa! Posso fazer um pergunta? É possível copiar uma imagem para área de transferência e também recuperar uma imagem da área de transferência para um image control? Grato!
Obrigado pela resposta! A única forma que consegui foi carregando o image control do tamanho de um userform e tirando um Print Screen do mesmo. Grato pela resposta e pelo vídeo.@@CanalSGP
Ola Bondade professor tenho assistido várias vídeo aulas suas muito boas a maneira de esplicar os códigos, professor você tem vídeo aula que mostra foto no formulário e na planilha porque eu criei um cadastro de membro para a minha igreja e preciso imprimir a ficha então eu preciso que quando eu pesquisar um membro aparecer a foto dele no formulário e na planilha no formulário para conferir e na planilha para imprimir tem como mim ajudar agradeço muito.
Bondia professor Luan alguns dias eu te perguntei como fazia para aparecer a foto do formulário na planilha também a foto do formulário e para conferir a foto da planilha é para imprimir na ficha de membro que criei para a minha igreja você falou que seria o mesmo código mas eu não conseguir fazer funcionar não apareceu no objeto imagem da planilha já tentei várias vezes mas não consegui mesmo assim eu te agradeço muito pelo o que já concedeu e que Deus te abençoe. Uma coisa que esquece de te falar é que a foto vem de uma pasta da onde tá a planilha não tem endereço como da biblioteca o código que usei é esse do vídeo para buscar a image na pasta
Parabens pelo excelente tutorial, super didatico e de fácil compreensão. Gostaria de saber como habilito o TextBox de telefone apenas para números e tambem como posso limitar uma TextBox (no meu casa no campo "TLargura" para apenas duas casas decimais depois da virgula.
Hoje o TextBox de Largura esta assim: Private Sub T_Largura_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) If KeyAscii = 46 Then KeyAscii = 44 If KeyAscii = 44 And InStr(T_Largura.Text, ",") 0 Then KeyAscii = 0 Exit Sub End If If (KeyAscii < 48 Or KeyAscii > 57) And KeyAscii 8 And KeyAscii 44 Then KeyAscii = 0 End If
Bom dia, talvez a função arredondar, definindo duas casas decimais. Segue link de vídeo neste sentido. th-cam.com/video/PPqxIhQWyL8/w-d-xo.html Dim Numero As Double If IsNumeric(TextBox1.Value) = True Then Numero = VBA.Round(TextBox1.Value, 2) TextBox1.Value = Numero End If
Perfeito, muito obrigado! E como posso fazer para exibir a imagem cadastrada na linha do produto com um tamanho pre determinado, por exemplo: 2x2cm @@CanalSGP
BOA NOITE!!! MUITO TOP A AULA APRENDI MUITO, FUNCIONOU MUITO BEM A UNICA DUVIDA SERIA, QUANDO CLICO PARA PESQUISAR UM ITEM ELE ESTA TRAZENDO SOMENTE A PRIMEIRA FOTO CADASTRADA. O QUE DEVO TER ERRADO?
Primeiramente parabéns pela aula!! Me ajudou muito! Uma dúvida, ao pesquisar meu item (que não é um código,mas sim um ingrediente, exemplo FARINHA), eu preciso escrever em caixa alta,porque no início da edição eu coloquei comando de caixa alta pra cadastrar o ingrediente. Tem como eu colocar um comando que ele reconheça letra minúscula na pesquisa (exemplo: farinha)?
Boa noite, obrigado, pode converter o texto da pesquisa para caixa alta utilizando o comando ucase. Por exemplo: Dim Pesquisa as String Pesquisa = vba.ucase(Texto da pesquisa)
Excelente aula, sem experiencia no VBA , fiz meu formulario ( tudo funcionando ) em 3 dias , porém ficou uma pendencia, que seria na parte EDITAR, pois consigo alterar todas as informações , menos a imagem , quando troco e clico no BOTAO EDITAR ocorre erro , coloquei o mesmo codigo do botao SALVAR somente a parte relativa a imagem, mas não consegue salvar a nova imagem .
Bom dia! Excelente suas aulas e essa então!!! Apliquei esta função em um sistema meu aqui e conseguir fazer com que salve a foto na pasta mas estou tendo dificuldade para ativar a localização da foto no momento da pesquisa e trazer ela para o formulário. vc poderia me ajudar? tem algum meio de comunicação alem desse para conversarmos e ver se vc pode me ajudar...! grato desde já. Ass, Abimael Brasil
Oi Professor, obrigado aí por compartilhar com a gente seus conhecimentos. Poderia dar uma aula inserindo uma listview nessa planilha, selecionando item da lista, automaticamente preenche todos os campos. Desde já, muito obrigado!
Professor tenho uma dúvida. O macro serve para preencher uma planilha de itens na mesma linha. Como eu faço para preencher por exemplo, na linha 2 mas também preencher na linha 8? Porque o comando que o senhor usa pega como referência o cabeçalho, então no caso eu queria ter 2 cabeçalhos e preencher duas tabelas em linhas diferentes ao mesmo tempo.
@@CanalSGP Obrigado! Outra dúvida. No comando excluir, eu vi que uma linha inteira é deletada. Teria como excluir apenas um range? por exemplo, deletar as celulas da linha 12, da coluna A até a coluna B?
@Canal SGP na busca, ao digitar em minusculo ele não acha, pois os itens estão todos maiusculos. Como faço para que, ao digitar tambem em minusculo na busca, funcione? Obrigado e parabéns pelo trabalho amigo!
Que show! Cada brasileiro compartilhando seu conhecimento, brasileiros querendo aprender e trabalhar ao invés de mamar no comunismo, em um novo país sem corrupção, isto fará desta nação uma das primeiras do mundo.
Show de bola Vou utilizar no meu projeto porém ele está salvo no Dropbox pois é multiusuário Se tiver alguma dúvida entro em contato Desde já agradeço pela contribuição
Muito obrigada, ajudou imenso. No entanto, eu tenho um formulário próprio para a pesquisa com uma ListView que carrega logo os dados e com duplo click numa das linhas ele manda a informação para o formulário Individual. O problema é que a foto não aparece lá.... Grava certinho, Edita certinho, tudo sem erro, mas não aparece no campo Imagem1. Será que pode dar uma ajudinha por favor. É uma BD só para mim, mas queria que ficasse bem bonita. Obrigada.
Boa tarde, obrigado, talvez o nome da imagem esteja diferente, porque neste procedimento a pesquisa é feito pelo nome atribuído a imagem, se tiver, por exemplo, um espaço diferente no nome, não vai localizar na pasta.
@@CanalSGP Muito obrigada pela rápida resposta. Infelizmente já verifiquei tudo e não dá certo a parte de carregar a imagem quando chamo o formulário através da pesquisa e listview. Enfim, vou continuar a procurar.
Professor, bom dia! Primeiro, parabéns por sua destreza, dedicação e boa vontade! Fiz todo o processo e deu tudo certo, porém, quando excluímos um cadastro, a foto continua lá na pasta. Você poderia me dizer o que acrescentar no botão excluir, para que além de excluir a linha da planilha, excluir também a foto armazenada na pasta foto? Obrigado!
Boa noite, obrigado, neste formulário não foi inserido código para excluir a foto pelo risco de deletar arquivos que não se deseja do computador. Porque deletando pelo pelo vba, não tem como recuperar o arquivo, mas ao editar a foto é substituída. Mas se desejar, em outro formulário que foi disponibilizado pronto tem o código para deletar, segue link. th-cam.com/video/Mz80qoCuokQ/w-d-xo.html
@@CanalSGP Eu percebi depois, que a foto é substituída e não há necessidade de excluí-la, portanto, só fiquei curioso se havia um código para tanto, mas já que é um risco, deixa quieto! Obrigado e mais ima vez, parabéns pra você, professor! Abraço
Primeiramente parabéns por ajudar tanta gente com seus vídeos, sou seguidor e já acompanhei quase todos os vídeos e sempre aprendo algo diferente! Só uma dúvida!!! Se eu quisesse excluir a foto da pasta junto com o cadastro como faria?
Bom dia, obrigado, neste procedimento não foi colocado para deletar a foto devido ao risco de se houver erro nas referência, deletar outros arquivos do computador. E como não tem como retornar arquivo deletado via código, deixamos de fora. Mas tem outro formulário que foi disponibilizado pronto, que tem o código para deletar, segue link. th-cam.com/video/Mz80qoCuokQ/w-d-xo.html
Obrigado por compartilhar o seu conhecimento conosco. Queria saber se é possível que ao clicar na textbox aparecer automaticamente uma lista para selecionar, como por exemplo para informar o sexo de algum funcionário envés de escrever sempre podia aparecer as opções Feminino, Masculino, para facilitar o trabalho. Fico aguardando a reposta, muito obrigada desde já
Boa tarde! Obrigado por compartilhar seus conhecimentos conosco, é muito sabedoria, sua facilidade em criar as planilhas e explicar é sensacional, meus parabéns 👏🏻👏🏻👏🏻, fiz a minha exatamente como você fez acompanhado o vídeo, um show a planilha, gostaria de saber se teria como adicionar o seguinte comando, meus produtos salvos estão na plan1 e eu preciso de criar a plan2 onde será salva minhas vendas diárias, e na plan1 onde estão meus produtos preciso criar um campo de filtro para o código do produto, e ao encontrar o produto desejado EX ele está na linha 100, tem como criar um botão para copiar os dados dessa linha para plan2 automático descendo linha em linha para ter como relatório de vendas diárias e mensal, desde já muito obrigado!🙏🏻
Olá, primeiramente suas vídeos aulas são excelentes!!!! Mas me tira uma dúvida.. consigo colocar imagens que estejam no drive do Google ? Exemplo: gerar um link do drive ?
Basta adicionar as imagens dentro de uma pasta do teu Google drive no seu PC deixa teu Google drive sincronizado que todas as imagens que estiverem lá estará também na sua pasta do PC.
Boa noite. Ótima explicação. E eu posso sugerir duas idéias aqui? No meu caso, eu preciso carregar uma combo com informações de duas células de mesma linha, porém, colunas diferentes, no caso, c11 e d11. Essa seria a primeira. A segunda, na outra combo, tem que carregar iinformações de acordo com a opção desta primeira combo. Pode me ajudar por favor? Desde já fico muito grato.
Bom dia, obrigado, pode utilizar o additem para popular a combobox com as células que deseja, por exemplo. Combobox1.additem planilha1.Range("C11").value Combobox1.additem planilha1.Range("D11").value Já para as combobox dependente talvez o procedimento do vídeo no link a seguir: th-cam.com/video/JhryR7XmMfs/w-d-xo.html
Aula ótima!! Preciso de uma ajuda, tenho um autofiltro de relação de produtos, e gostaria de colocar um critério maior que zero, e não estou conseguindo fazer!
Opa professor, top das galáxias a sua aula, só uma dúvida, como faço para salvar um cadastro mesmo que esteja faltando informações em algum campo? Com a possibilidade de essa ser incluída posteriormente?
Boa tarde, no formulário no vídeo a seguir foi colocado esta função, mas cuidado para não deletar arquivos que não deseja, porque não tem como recuperar. th-cam.com/video/Mz80qoCuokQ/w-d-xo.html
Bom dia!! Obrigado pela aula!! Eu fiz tudo conforme mostrado no vídeo, mas na hora que testei não funcionou, não sei se os códigos são para PC de 32 Bits, e o meu é 64 Bits, gostaria de vincular a imagem (com os dados da mesma (inseridos na TextBox), depois salvo dados + foto (Image1) com endereço do caminho na TexBox , na hora de pesquisar ou chamar no userform aparece os dados e a foto. Obrigado!
Obrigado por compartilhar seu conhecimento, estou seguindo passo a passo porem não consegui identificar algumas ordens no programa, resultando erros na copilação tem as linhas de códigos para consulta?
Ola Professor, parabéns pela didática excelente, olha fiz todos os procedimentos explicados, todo funcionou como devido inclusive "salvar as fotos na pata" perfeito, EXCETO que (ao ter mais produtos cadastrados com suas respectivas fotos, a pesquisa retorna apenas a 1ª foto da pasta) ex: se eu pesquisar pelo "código 2 ou 3 ou 20 ou qualquer outro" ele puxa a foto 1, isso será falha minha, ou algum código faltante? obrigado pela atenção. :)
@@CanalSGP ola professor, boa tarde, fiz o procedimento alterando o nome das fotos (na hora de salvar, como "Nome" ou como "Numero" ) na pasta aparece as fotos nomeadas perfeitamente, mas não funcionou, qualquer item pesquisado vai puxar a 1ª foto da pasta que estiver em ordem alfabética, se for nº, puxa por ordem numérica, sempre a 1ª foto da pasta para qualquer pesquisa....olha fico muito agradecido pela sua atenção se puder ajudar, se não for possível, fico feliz do mesmo jeito, pois até agora sua ajuda foi IMPORTANTÍSSIMA, parabéns pela sua iniciativa e agradeço de coração por todo aprendizado que tive ao longo de anos que te acompanho, obrigado e sucesso pra vc....valew
Boa tarde, teste com os mesmos nomes utilizados no vídeos, porque é separada o nome de acordo com o ponto que consta no arquivo, separando nome da extensão. Se tiver mais pontos pode dar erro, talvez seja isso.
Boa tarde professor, aprendi muiitoo nesta aula, uma coisa que senti falta neste projeto foi o gerador de Id automatico, ao invés de digitar o codigo tds as vzs, Tbm gostaria de perguntar, se eu gerar o Id já na planilha com a função máximo se tbm dá certo. (!??)) Por hora obrigado e estou estudando este projeto passo-a-passo. Sérgio Rodrigues.
Boa tarde, obrigado, pode colocar os comandos a seguir no início do botão salvar, para gerar id automático: If TCod = "" Then TCod = WorksheetFunction.Max(Planilha1.Range("B1:B1000000")) + 1 End If
4 ปีที่แล้ว +1
@@CanalSGP valeu, muito bom, vamos aos testes. Sérgio Rodrigues
Perfeito! Parabéns pela planilha. Tem como eu salvar as imagens em várias pastas. Por exemplo, ter uma pasta para imagens de peças de prata, uma pasta para peças de ouro, etc? Ter subpastas dentro da pasta Fotos.
Boa Noite Prof. Tem como adicionar listbox que carregue os campos,salve os campos tanto na planilha como listbox,quando clicar elemostre os registro junto com foto.
que ótimo conteudo, como faço para excluir a linha inteira de duas planilhas ao mesmo tempo. e qual o codigo para editar a foto, porque ela continua na pasta, é preciso excluir da pasta e salvar outra no lugar, para edicao no caso de somente trocar a foto por exemplo. Obrigado
Existe uma maneira de eu criar um botão de saída, por exemplo eu tenho 10 peças de um determinado produto, aí quero fazer a saída tal dia de 5, aí ele me daria o registro do dia e da quantidade que saiu e que ficou no sistema?
Boa tarde, acredito que entrada e saída seja outro processo, no cadastro não é ideal já fazer entrada ou saída. Para entrada e saída de estoque acredito que vai precisar de outro formulário e outra aba na planilha.
Olá, eu segui o passo a passo mas não aparece o traço para escrever nos espaços em branco do formulário, não consigo dar continuidade na construção da planilha por não poder digitar no formulário, sabe me dizer o que eu possa ter feito de errado? Obrigada! adorei a aula!
@@CanalSGP Me falta experiência nisso. Dependendo do que eu apago da erro de complicação ou não salva o cadastro. Eu apaguei a linha referente a tratativa de erro da foto. Depois vou tentar em outro computador para ver se é isso.
muito top, poderiam me ajudar aqui, quando eu clico no botão salvar a planilha trava tudo e tenho que fechar e abrir mais ainda esta travando quando clica em salvar
Muito bom o exemplo. E como seria se o cadastro tivesse mais de uma foto? Reproduzi aqui e deu super certo, mas eu queria adptar pra pelo menos 2 fotos.
Professor, estou colocando essa rotina no projeto que salva os dados no acces. uma parte esta ok, porém quando salva a imagem para outra pasta , não esta renomeando o arquivo, ou seja o sistema encontra o arquivo somente quando vou na pasta e renomeio o arquivo para quel quero que busque.. onde será o erro
@@CanalSGP aparece a mensagem erro, quando vou salvar, clico em fechar e fala que foi salvo com suceso, porém só salva a aba telefone com: ((((((((((((((((((((((
Como proteger a planilha restringindo usuários, tipo somente uma login pode alterar e desproteger os outros usuários somente pra utilizar e lanças novos dados?
Bom dia, Professor, tive que formatar o notebook mas antes fiz backup da aula.. depois de consertado inseri o formulário novamente no note.. e parece mentira no note da erro, mas no pendrive não. Vai entender?
Parabéns PROFESSOR!! Muito boa sua aula, muitíssimo bem explicado. Mas ficou um pequeno detalhe que não consegui resolver. Salvar as fotos na pasta "Fotos". Conforme orientação, salvei a pasta "Fotos" dentro da mesma pasta onde foi salvo a planilha, no caso a pasta "Cadastro de Produtos", porém essa pasta "Cadastro de Produtos" está dentro do meu OneDrive e por isso quando clico para "Salvar" o cadastro de algum produto com foto dá um erro (que não especifica qual), depois clico pela segunda vez em "Salvar" aí salva o produto, porém a foto não é salva na pasta "Fotos". Fiz uma experiência, recortei a pasta "Cadastro de Produtos" e colei direto no "C" e lá funciona perfeitamente, inclusive salva as fotos, então deduzi que só poderia ser isso, porque o OneDrive é rede. Sendo assim pergunto se há alguma maneira de deixar a pasta "Cadastro de Produtos" dentro do OneDrive mas de forma que tudo funcione bem, inclusive o salvamento das fotos. De ante mão agradeço pela atenção. Giulio Cesar.
Boa tarde Professor! Segui sua orientação, troquei manualmente o endereço da pasta em todo o código do formulário, coloquei como endereço da pasta a url da pasta "Fotos" que por sinal está dentro da mesma pasta onde estão todos os arquivos salvos. Funcionou perfeitamente bem para "Salvar" e "Editar", porém em "Pesquisar" não funcionou. Faço a pesquisa e só consigo ver os dados salvos, a foto referente ao produto não consigo ver. Aí tentei voltar somente nessa "Sub Pesquisar_Imagem()" com o endereço de pasta "Pasta = ThisWorkbook.Path & "\Fotos\" , mas também não funcionou. Segue abaixo ó código que está atualmente em "Sub Pesquisar_Imagem()" Por favor, dê uma olhada e vê onde está o erro. Mais uma vez agradeço muitíssimo pela sua atenção. ............................................................................................ Sub Pesquisar_Imagem() On Error GoTo Erro On Error Resume Next Image1.Picture = LoadPicture("") 'ALTERAR NOME IMAGE Dim Codigo As String Codigo = TCod.Value ' ALTERAR Dim LocalImagens As String Dim Pasta As String Dim Cod, Nome, a() As String Dim Arquivo As String Dim i As Double Dim Formato As String Pasta = "C:\Users\Giulio PC\OneDrive\Area de Trabalho\TESTE\Fotos" ' ALTERAR Formato = "*.jpg" Arquivo = VBA.Dir(Pasta & Formato, VBA.vbDirectory) While Arquivo "" Nome = Arquivo a() = VBA.Split(Nome, ".") Cod = a(0) If Cod = Codigo Then LocalImagens = Pasta & Arquivo On Error Resume Next Image1.Picture = LoadPicture(LocalImagens) ' ALTERAR NOME IMAGE Exit Sub End If i = i + 1 Arquivo = VBA.Dir() Wend Exit Sub Erro: MsgBox "Erro!", vbCritical, "ERRO" End Sub @@CanalSGP
PROFESSOR NOTA 10!!!! Quem sabe, sabe já diz o ditado. Agora quem faz com dedicação, com prazer de estar ajudando ao próximo, compartilhar seus conhecimentos e sua sabedoria, AÍ ISSO NÃO TEM PREÇO! Tudo funcionando perfeitamente. Mais uma vez muito obrigado e parabéns pela sua dedicação com um desconhecido. * Só a título de informação, quando faço a exclusão de um produto, a foto do mesmo permanece dentro da pasta "Fotos", ou seja, ela não é excluída junto com o produto, mas isso é irrelevante, pois se cadastro um novo produto usando o mesmo código do produto que foi excluído, porém utilizando uma nova foto, essa substitui a foto que havia ficado lá na pasta "Fotos". Então para mim está mais do que ótimo. Valeu! @@CanalSGP
Bom dia, que bom que deu certo, o código para excluir a imagem não foi inserido porque é um código delicado, se errar o comando pode excluir outros arquivos e não é possível recuperar. Mas no formulário de cadastro com duas imagens foi colocado, segue link. th-cam.com/video/Mz80qoCuokQ/w-d-xo.html
Conteúdo valioso! Testei os campos e deu erro Loop Until .Cells(Linha, 2) .Value = "" . Eu segui todos os passos e conferir a linha de código mais de uma vez, mas quando coloco as informações no formulário ele dá esse erro. vou continuar revisando e ver se consigo fazer a correção. Abç
Bom dia, sera que poderia me ajudar, estou montando uma planilha usando o UserForm, porem eu coloquei 4 IMAGENS diferentes , só que na hora de salvar, ela salva as quatro mais repete 1 só imagem em todas dentro da pasta. É possível fazer este salvamento com as 4 imagens diferentes ao msm tempo no UserForm? Detalhe minha planilha e baseada toda nesse video msm
@@CanalSGP entendo se puder me ajudar ficarei grato,pq não existe nenhum vídeo aqui no TH-cam q ensine isso , e já tentei de TD q veio a mente e nd deu certo. Embora eu n manje nada hehe
Estou com o mesmo problema, tentei replicar os códigos. Salvar eu até consigo com nomes diferentes, o problema é pesquisar que ele não puxar as imagens para os 4 quadrados de imagens, somente para o primeiro.
✅Site SGP: Venda de Coleção de Planilhas Excel VBA Prontas:
www.planilhascanalsgp.com.br/
==========================================
Obrigado muito bom os seus vídeos parabéns, irei usar alguns modelo para o meu ambiente de trabalho valeu
Minha experiencia e conhecimento no assunto Excel e VBA são praticamente zero.
Mas graças a sua excelente didática estou conseguindo fazer meu primeiro sistema,
aplicando sem maiores dificuldades, o conhecimento utilíssimo que V.Sa. compartilha conosco.
Pessoas como V.Sa. são especiais e merecem todo respeito e admiração pelo seu trabalho.
Por favor, não pare jamais!
Tenho indicado seu canal para todos os interessados que conheço.
Forte Abraço,
Deus abençoe sempre!!
Boa tarde, muito obrigado, sucesso em seus estudos.
Rapaz... Relamente você deu aula... Conheço um pouquinho, e com a sua aula e com algumas inclusões para o que ue precisava ficou produto. Muito bom e Parabéns!
Obrigado.
Estou terminando em kkkk
Uma etapa deu certo: CADASTRAR, agora estou nas Add de imagens.
Parabéns. Seu conteúdo é muito bom.
Obrigado.
Parabens, vc tem uma didatica muito boa, fiz o formulario, e funcionou perfeito, só tive a dificuldade no salvar as fotos, mas corrigi e ficou otimo.
Obrigado por compartilhar seu conhecimento com este aprendiz,.
Bom dia, que bom que conseguiu.
comprei as planilhas, e tudo perfeito !
o cara tem a manha e ainda ensina a fazer pessoal. merece meu respeito!
só não aprende se não quiser.
parabéns pelo belo trabalho. !
Obrigado, sucesso em seus estudos.
Meus parabens este sistema foi o mais proximo que eu encontrei para minha necessidade de cadastro dos meus clientes , porem tenho que ter mais campos .... mas a adicao e edição de fotos esta perfeito...obrigado e sucesso
Obrigado
@@CanalSGP Amigo por acaso voce teria ja uma planilha pronta neste formato mas para cadastro de clientes com fotos de pedidos feitos e formato para dar zoom nas imagens? quero comprar
Boa tarde, infelizmente não tenho.
melhor explicaçao de todos que ja vi !!!!!!!!!
Obrigado
Cara Show de Bola, gosto muito das suas aulas
Muito obrigado
Parabéns pelo trabalho.
Obrigado 👍
Muito obrigado Professor pela aula. Sua didática é explicativa pra quem não entende. Conseguir desenvolver o sistema e rendeu até elogio do padrão
Que bom, sucesso em seu projeto.
Minha experiencia e conhecimento no assunto Excel e VBA são praticamente zero.
Mas graças a sua excelente didática estou conseguindo fazer meu primeiro sistema,muito agradecido
Que bom, sucesso em seus estudos.
Obrigado por compartilhar seu conhecimento, segui as orientações e consegui desenvolver uma planilha que atendeu as necessidades do meu filho em uma loja que ele inaugurou. Gratidão.
Boa noite, que bom, sucesso em seu projeto.
Top de mais a aula esta de parabens
Obrigado
Muito bom as explicação, nunca fiz, mais com essa vídeo aula consegui fazer um formulário com a minha necessidades. Parabéns topp
Que bom que ajudou
Compartilha com o pessoal essa informação provavelmente irei precisar dessa manipulação
Bingooooooo. Assistindo suas videos aulas conseguir concluir meu projeto de VBA. Obrigada por compartilhar conhecimento.
Boa tarde, que bom.
OBRIGADO PELA BELA DIDÁTICA MEU AMIGO. AGORA SÓ FAZER MEUS AJUSTES NECESSÁRIOS E PRONTO PARA USO.
Bom dia, que bom que conseguiu, sucesso em seu projeto.
Gostei Muito da Aula Parabéns
Obrigado
Espetacular VídeoAula, parabéns pela didática e pelo conteúdo
Obrigado pelo elogio
Obrigado mais uma vez!!
Se eu pudesse dava like todo dia nessa aula!
Esse formulário mais que valeu a inscrição no canal. É coisa de gênio mesmo!
É tão versátil, que com pouquíssimas adaptações, podemos criar sistemas para inúmeros seguimentos.
No meu caso, adaptei para cadastrar pessoas (membros). E deu super-certo. Uma satisfação ver funcionar!!!
Se me for lícito, peço humildemente, quando possível, por favor nos ensinar a criar um formulário que possibilita
gerar e imprimir credenciais (carteirinhas) com as informações e a foto do membro
e também gerar e imprimir a ficha de cadastro, com as informações e a foto do membro.
O layout da carteirinha seria uma imagem em JPG com os campos para
inserir as informações e a foto do membro deixados em branco.
Desse modo, eu imaginei que poderia usar caixas de texto posicionadas sobre os campos em branco do layout da carteirinha. Será que daria certo?
Tenho certeza que esse projeto seria de grande utilidade não somente para mim mas também para os demais assinantes
que acompanham o canal além de ser aplicável em vários seguimentos de atividades.
Conto com a sua grande inteligencia e boa vontade para tal.
Desde já agradeço.
Forte abraço. Fique com Deus.
Boa tarde, obrigado, vou estudar essa possibilidade futuramente. Sucesso em seus estudos.
@@CanalSGP Anciosamete, aguardando. Fica na Paz!
Obrigado pela aula, que bom ter pessoas assim como vc na web!!
Obrigado
Mestre, depois de assistir muitos vídeos, poucos são tão completos como o seu. E sua segurança em escrever os códigos auxilia muito quem está aprendendo (meu caso). Muito obrigado e parabéns!!! Ótimo vídeo! Ótimo conteúdo! Excelente utilidade!🙏👍👏🏻👏🏻👏🏻
Boa noite, obrigado, sucesso em seus estudos.
Muito bom mesmo, conteúdo de curso pago, parabéns mano!!!😊
Obrigado pelo elogio
Professor, fiz as alterações e BINGO! kkkk Como você fala, funcionou! Novamente muito obrigado! Gratidão! Deus ilumine você, sua família e seus negócios! Forte abraço!
Boa tarde, obrigado, que bom que deu certo, sucesso em seus estudos.
Mto bom... Adaptei todas as informações para construir outro tipo de formulário .. E deu tudo certo !!!
Boa tarde, obrigado, sucesso em seus estudos.
Agradeço muito sua generosidade em passar conhecimento! você explica de uma força muito simples onde conseguimos ter resultado em realizar o exercício.
Boa noite, obrigado, sucesso em seus estudos.
Aula sensacional, uma das melhores que já vi!
Obrigado pelo elogio
Valeu Mesmo Professor ...
De nada.
Meu amigo, que video incrivel, parabens pelo exclarecimento total e de uma forma tao simples, eu agora preciso fazer um controle de estoque com essa mesma dinamica, aparecendo foto, mostrando quantidade e se precisa ou nao abastecer estoque, voce tem algum video assim? abraço!
Boa tarde, obrigado, formulário neste estilo voltado para estoque não fiz ainda.
Parabens pelo trabalho e por dispor de tempo para repassar o conhecimento que tens para iniciantes e/ou necessitados. De grande Valia os seus videos. Obrigado!!!!!
Obrigado, sucesso em seus estudos.
Parabéns professor bem explicado .
Obrigado pelo elogio
Achei bacana esse sistema de pesquisa funcionou perfeito aqui e já vou implementar em outros sistemas já que antes usava esse recurso usando funções do Excel mas pelo VBA fica mais leve e resumido esse processo.
Que bom, sucesso em seus estudos.
BOA NOITE
" EU QUERIA AQUI AGRADECER AO CANAL (SGP) COM PROFESSOR LUAN , POR SUAS EXCELENTES VÍDEO AULAS , CADA DIA ESTOU APRENDENDO MUITO MAIS .
OBRIGADO ?
Bom dia, obrigado, sucesso em seus estudos.
Parabens , excelente video Aula .
obrigado.
excelente vídeo me ajudou muito com um catalogo de Livros que queria fazer
gostaria de saber se no botão de pesquisa consigo inserir duas condições para pesquisa, por exemplo fornecedor e Produto?
Bom dia, obrigado, a pesquisa precisa ser por critério exato, se for informação única pode alterar a coluna de pesquisa ou trabalhar com if para definir quando deve ser feito a busca em qual coluna.
Simplesmente excepcional!
Obrigado
Aula top Professor, parabens pela didatica incrivel.
Tenho uma duvida, se eu quiser exportar esse cadastro de produtos em PDF, existe alguma forma pra ele exportar com as imagens anexadas?
Bom dia, obrigado, não fiz algo assim ainda.
Cara seus vídeos são nota 10!
Boa noite, obrigado, sucesso em seus estudos.
Olá professor! Parabéns por compartilhar o conhecimento!
Gostaria de saber se tem algum código para rotacionar a foto que foi carregada, pois algumas fotos quando carrego vem na horizontal, então gostaria de ver um botão para rotacionar a foto depois de carregada.
Bom dia, obrigado, até o momento não fiz algo neste sentido.
Aula muito boa!
Posso fazer um pergunta?
É possível copiar uma imagem para área de transferência e também recuperar uma imagem da área de transferência para um image control?
Grato!
Boa tarde, obrigado, não tentei fazer isso ainda, não sei dizer se é possível.
Obrigado pela resposta!
A única forma que consegui foi carregando o image control do tamanho de um userform e tirando um Print Screen do mesmo.
Grato pela resposta e pelo vídeo.@@CanalSGP
Que bom que conseguiu.
Ola Bondade professor tenho assistido várias vídeo aulas suas muito boas a maneira de esplicar os códigos, professor você tem vídeo aula que mostra foto no formulário e na planilha porque eu criei um cadastro de membro para a minha igreja e preciso imprimir a ficha então eu preciso que quando eu pesquisar um membro aparecer a foto dele no formulário e na planilha no formulário para conferir e na planilha para imprimir tem como mim ajudar agradeço muito.
Bom dia, obrigado, pode inserir na planilha uma objeto image, vai ser o mesmo código para carregar a foto no image da planilha.
Bondia professor Luan alguns dias eu te perguntei como fazia para aparecer a foto do formulário na planilha também a foto do formulário e para conferir a foto da planilha é para imprimir na ficha de membro que criei para a minha igreja você falou que seria o mesmo código mas eu não conseguir fazer funcionar não apareceu no objeto imagem da planilha já tentei várias vezes mas não consegui mesmo assim eu te agradeço muito pelo o que já concedeu e que Deus te abençoe. Uma coisa que esquece de te falar é que a foto vem de uma pasta da onde tá a planilha não tem endereço como da biblioteca o código que usei é esse do vídeo para buscar a image na pasta
gostei da aula
Obrigado
Parabens pelo excelente tutorial, super didatico e de fácil compreensão.
Gostaria de saber como habilito o TextBox de telefone apenas para números e tambem como posso limitar uma TextBox (no meu casa no campo "TLargura" para apenas duas casas decimais depois da virgula.
Hoje o TextBox de Largura esta assim:
Private Sub T_Largura_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii = 46 Then KeyAscii = 44
If KeyAscii = 44 And InStr(T_Largura.Text, ",") 0 Then
KeyAscii = 0
Exit Sub
End If
If (KeyAscii < 48 Or KeyAscii > 57) And KeyAscii 8 And KeyAscii 44 Then
KeyAscii = 0
End If
End Sub
Bom dia, talvez a função arredondar, definindo duas casas decimais. Segue link de vídeo neste sentido. th-cam.com/video/PPqxIhQWyL8/w-d-xo.html
Dim Numero As Double
If IsNumeric(TextBox1.Value) = True Then
Numero = VBA.Round(TextBox1.Value, 2)
TextBox1.Value = Numero
End If
Perfeito, muito obrigado!
E como posso fazer para exibir a imagem cadastrada na linha do produto com um tamanho pre determinado, por exemplo: 2x2cm @@CanalSGP
BOA NOITE!!! MUITO TOP A AULA APRENDI MUITO, FUNCIONOU MUITO BEM A UNICA DUVIDA SERIA, QUANDO CLICO PARA PESQUISAR UM ITEM ELE ESTA TRAZENDO SOMENTE A PRIMEIRA FOTO CADASTRADA. O QUE DEVO TER ERRADO?
Boa noite como é um laço de repetição que procura pela imagem, vai parar na primeira.
Primeiramente parabéns pela aula!! Me ajudou muito!
Uma dúvida, ao pesquisar meu item (que não é um código,mas sim um ingrediente, exemplo FARINHA), eu preciso escrever em caixa alta,porque no início da edição eu coloquei comando de caixa alta pra cadastrar o ingrediente. Tem como eu colocar um comando que ele reconheça letra minúscula na pesquisa (exemplo: farinha)?
Boa noite, obrigado, pode converter o texto da pesquisa para caixa alta utilizando o comando ucase. Por exemplo:
Dim Pesquisa as String
Pesquisa = vba.ucase(Texto da pesquisa)
Excelente aula, sem experiencia no VBA , fiz meu formulario ( tudo funcionando ) em 3 dias , porém ficou uma pendencia, que seria na parte EDITAR, pois consigo alterar todas as informações , menos a imagem , quando troco e clico no BOTAO EDITAR ocorre erro , coloquei o mesmo codigo do botao SALVAR somente a parte relativa a imagem, mas não consegue salvar a nova imagem .
Bom dia, qual mensagem de erro retorna.
Bom dia! Excelente suas aulas e essa então!!!
Apliquei esta função em um sistema meu aqui e conseguir fazer com que salve a foto na pasta mas estou tendo dificuldade para ativar a localização da foto no momento da pesquisa e trazer ela para o formulário. vc poderia me ajudar? tem algum meio de comunicação alem desse para conversarmos e ver se vc pode me ajudar...! grato desde já.
Ass,
Abimael Brasil
Bom dia, obrigado, deixe seu e-mail que envio a planilha de exemplo.
Amei ☺️☺️☺️❤️
Obrigado
Oi Professor, obrigado aí por compartilhar com a gente seus conhecimentos.
Poderia dar uma aula inserindo uma listview nessa planilha, selecionando item da lista, automaticamente preenche todos os campos.
Desde já, muito obrigado!
Bom dia, vou analisar esta questão.
Show! Aula excelente! Me responda só uma dúvida: Como fazer para tudo que digitar na caixa de pesquisa (InputBox) ficar maiúsculo?
Boa tarde, obrigado, ao digitar não sei se é possível, mas pode converter depois de capturar a informação. Por exemplo
Pesquisa = vba.ucase(Pesquisa)
Gratidão!
De nada.
Professor tenho uma dúvida. O macro serve para preencher uma planilha de itens na mesma linha. Como eu faço para preencher por exemplo, na linha 2 mas também preencher na linha 8? Porque o comando que o senhor usa pega como referência o cabeçalho, então no caso eu queria ter 2 cabeçalhos e preencher duas tabelas em linhas diferentes ao mesmo tempo.
Boa tarde, não fiz procedimento assim ainda, geralmente formulário é para salvar dados mais padronizados em sequência.
@@CanalSGP Obrigado! Outra dúvida. No comando excluir, eu vi que uma linha inteira é deletada. Teria como excluir apenas um range? por exemplo, deletar as celulas da linha 12, da coluna A até a coluna B?
Bom dia, sim, para capturar o código pode gravar uma macro fazendo o processo manualmente e depois adaptar a sua macro.
@Canal SGP na busca, ao digitar em minusculo ele não acha, pois os itens estão todos maiusculos. Como faço para que, ao digitar tambem em minusculo na busca, funcione? Obrigado e parabéns pelo trabalho amigo!
Bom dia, obrigado, pode padronizar para caixa alta, se não fazer pesquisa por número.
Pesquisa = VBA.Ucase(Pesquisa)
Que show! Cada brasileiro compartilhando seu conhecimento, brasileiros querendo aprender e trabalhar ao invés de mamar no comunismo, em um novo país sem corrupção, isto fará desta nação uma das primeiras do mundo.
Boa noite, obrigado, sucesso em seus estudos.
Show de bola
Vou utilizar no meu projeto porém ele está salvo no Dropbox pois é multiusuário
Se tiver alguma dúvida entro em contato
Desde já agradeço pela contribuição
Boa noite, obrigado, não testei no dropbox, mas se capturar o endereço correto, pode dar certo.
Muito obrigada, ajudou imenso.
No entanto, eu tenho um formulário próprio para a pesquisa com uma ListView que carrega logo os dados e com duplo click numa das linhas ele manda a informação para o formulário Individual. O problema é que a foto não aparece lá.... Grava certinho, Edita certinho, tudo sem erro, mas não aparece no campo Imagem1.
Será que pode dar uma ajudinha por favor.
É uma BD só para mim, mas queria que ficasse bem bonita.
Obrigada.
Boa tarde, obrigado, talvez o nome da imagem esteja diferente, porque neste procedimento a pesquisa é feito pelo nome atribuído a imagem, se tiver, por exemplo, um espaço diferente no nome, não vai localizar na pasta.
@@CanalSGP Muito obrigada pela rápida resposta. Infelizmente já verifiquei tudo e não dá certo a parte de carregar a imagem quando chamo o formulário através da pesquisa e listview. Enfim, vou continuar a procurar.
Professor, bom dia! Primeiro, parabéns por sua destreza, dedicação e boa vontade! Fiz todo o processo e deu tudo certo, porém, quando excluímos um cadastro, a foto continua lá na pasta. Você poderia me dizer o que acrescentar no botão excluir, para que além de excluir a linha da planilha, excluir também a foto armazenada na pasta foto? Obrigado!
Boa noite, obrigado, neste formulário não foi inserido código para excluir a foto pelo risco de deletar arquivos que não se deseja do computador. Porque deletando pelo pelo vba, não tem como recuperar o arquivo, mas ao editar a foto é substituída. Mas se desejar, em outro formulário que foi disponibilizado pronto tem o código para deletar, segue link. th-cam.com/video/Mz80qoCuokQ/w-d-xo.html
@@CanalSGP Eu percebi depois, que a foto é substituída e não há necessidade de excluí-la, portanto, só fiquei curioso se havia um código para tanto, mas já que é um risco, deixa quieto! Obrigado e mais ima vez, parabéns pra você, professor! Abraço
De nada
Excelente conteúdo, só está um pouco rápido e sem explicação nas funções, no mais, show de bola!!!!!....👍👍👍👍👍👍
Boa noite, obrigado, para fazer em um vídeo precisar ser mais rápido mesmo.
Primeiramente parabéns por ajudar tanta gente com seus vídeos, sou seguidor e já acompanhei quase todos os vídeos e sempre aprendo algo diferente!
Só uma dúvida!!! Se eu quisesse excluir a foto da pasta junto com o cadastro como faria?
Bom dia, obrigado, neste procedimento não foi colocado para deletar a foto devido ao risco de se houver erro nas referência, deletar outros arquivos do computador. E como não tem como retornar arquivo deletado via código, deixamos de fora. Mas tem outro formulário que foi disponibilizado pronto, que tem o código para deletar, segue link. th-cam.com/video/Mz80qoCuokQ/w-d-xo.html
Obrigado por compartilhar o seu conhecimento conosco. Queria saber se é possível que ao clicar na textbox aparecer automaticamente uma lista para selecionar, como por exemplo para informar o sexo de algum funcionário envés de escrever sempre podia aparecer as opções Feminino, Masculino, para facilitar o trabalho.
Fico aguardando a reposta, muito obrigada desde já
Bom dia, pode trocar uma campo de texto por uma combobox e colocar a lista via código ou carregar de uma lista da planilha.
Boa tarde!
Obrigado por compartilhar seus conhecimentos conosco, é muito sabedoria, sua facilidade em criar as planilhas e explicar é sensacional, meus parabéns 👏🏻👏🏻👏🏻, fiz a minha exatamente como você fez acompanhado o vídeo, um show a planilha, gostaria de saber se teria como adicionar o seguinte comando, meus produtos salvos estão na plan1 e eu preciso de criar a plan2 onde será salva minhas vendas diárias, e na plan1 onde estão meus produtos preciso criar um campo de filtro para o código do produto, e ao encontrar o produto desejado EX ele está na linha 100, tem como criar um botão para copiar os dados dessa linha para plan2 automático descendo linha em linha para ter como relatório de vendas diárias e mensal, desde já muito obrigado!🙏🏻
Boa noite, obrigado, bem complexo o que deseja, não fiz procedimento assim ainda, mas vou estudar essa necessidade.
@@CanalSGP
Boa noite!
Obrigado pela atenção, pra você e pelo seu conhecimento, tenho certeza que será super simples 😃👏🏻👏🏻👏🏻
Adorei o video!! Parabéns!! :)
Que bom que gostou
Sensacional, muito bom.
Obrigado.
valeu! ótimo vídeo cara, parabéns!
Bom dia, muito obrigado.
Olá, primeiramente suas vídeos aulas são excelentes!!!! Mas me tira uma dúvida.. consigo colocar imagens que estejam no drive do Google ? Exemplo: gerar um link do drive ?
Bom dia, obrigado, acredito que não, pelo menos não sei de código para fazer isso ainda.
Basta adicionar as imagens dentro de uma pasta do teu Google drive no seu PC deixa teu Google drive sincronizado que todas as imagens que estiverem lá estará também na sua pasta do PC.
Boa noite. Ótima explicação. E eu posso sugerir duas idéias aqui? No meu caso, eu preciso carregar uma combo com informações de duas células de mesma linha, porém, colunas diferentes, no caso, c11 e d11. Essa seria a primeira. A segunda, na outra combo, tem que carregar iinformações de acordo com a opção desta primeira combo. Pode me ajudar por favor? Desde já fico muito grato.
Bom dia, obrigado, pode utilizar o additem para popular a combobox com as células que deseja, por exemplo.
Combobox1.additem planilha1.Range("C11").value
Combobox1.additem planilha1.Range("D11").value
Já para as combobox dependente talvez o procedimento do vídeo no link a seguir:
th-cam.com/video/JhryR7XmMfs/w-d-xo.html
Aula ótima!! Preciso de uma ajuda, tenho um autofiltro de relação de produtos, e gostaria de colocar um critério maior que zero, e não estou conseguindo fazer!
Boa noite, está utilizando funções ou macros para fazer o filtro.
Boa noite, se for fazer um laudo onde preciso de várias fotos, funciona também????
Bom dia, infelizmente não.
Opa professor, top das galáxias a sua aula, só uma dúvida, como faço para salvar um cadastro mesmo que esteja faltando informações em algum campo? Com a possibilidade de essa ser incluída posteriormente?
Bom dia, obrigado, pode retirar o campo do if de verificação do inicio do código.
Só pra fechar mestre, e pra excluir a foto lá da pasta caso o produto seja excluído como faz?
Boa tarde, no formulário no vídeo a seguir foi colocado esta função, mas cuidado para não deletar arquivos que não deseja, porque não tem como recuperar. th-cam.com/video/Mz80qoCuokQ/w-d-xo.html
@@CanalSGP Como consigo aplicar esse código de exclusão pro projeto DESSE vídeo aqui?
Bom dia!! Obrigado pela aula!! Eu fiz tudo conforme mostrado no vídeo, mas na hora que testei não funcionou, não sei se os códigos são para PC de 32 Bits, e o meu é 64 Bits, gostaria de vincular a imagem (com os dados da mesma (inseridos na TextBox), depois salvo dados + foto (Image1) com endereço do caminho na TexBox , na hora de pesquisar ou chamar no userform aparece os dados e a foto. Obrigado!
Boa tarde, acredito que funciona em ambas as versões, deixe seu e-mail que envio a planilha da aula.
Obrigado por compartilhar seu conhecimento, estou seguindo passo a passo porem não consegui identificar algumas ordens no programa, resultando erros na copilação tem as linhas de códigos para consulta?
Bom dia, deixe seu e-mail que envio a planilha para que possa comparar.
Muito bom ! Excelente !
Obrigado.
Ola Professor, parabéns pela didática excelente, olha fiz todos os procedimentos explicados, todo funcionou como devido inclusive "salvar as fotos na pata" perfeito, EXCETO que (ao ter mais produtos cadastrados com suas respectivas fotos, a pesquisa retorna apenas a 1ª foto da pasta) ex: se eu pesquisar pelo "código 2 ou 3 ou 20 ou qualquer outro" ele puxa a foto 1, isso será falha minha, ou algum código faltante? obrigado pela atenção. :)
Boa tarde, obrigado, teste alterar o nome das fotos para ver.
@@CanalSGP ola professor, boa tarde, fiz o procedimento alterando o nome das fotos (na hora de salvar, como "Nome" ou como "Numero" ) na pasta aparece as fotos nomeadas perfeitamente, mas não funcionou, qualquer item pesquisado vai puxar a 1ª foto da pasta que estiver em ordem alfabética, se for nº, puxa por ordem numérica, sempre a 1ª foto da pasta para qualquer pesquisa....olha fico muito agradecido pela sua atenção se puder ajudar, se não for possível, fico feliz do mesmo jeito, pois até agora sua ajuda foi IMPORTANTÍSSIMA, parabéns pela sua iniciativa e agradeço de coração por todo aprendizado que tive ao longo de anos que te acompanho, obrigado e sucesso pra vc....valew
Boa tarde, teste com os mesmos nomes utilizados no vídeos, porque é separada o nome de acordo com o ponto que consta no arquivo, separando nome da extensão. Se tiver mais pontos pode dar erro, talvez seja isso.
@@CanalSGP Vou verificar, muito obrigado e desculpe pelo transtorno, vc é fantastico, vou verificar... :)
De nada
Boa tarde professor, aprendi muiitoo nesta aula, uma coisa que senti falta neste projeto foi o gerador de Id automatico, ao invés de digitar o codigo tds as vzs,
Tbm gostaria de perguntar, se eu gerar o Id já na planilha com a função máximo se tbm dá certo. (!??))
Por hora obrigado e estou estudando este projeto passo-a-passo.
Sérgio Rodrigues.
Boa tarde, obrigado, pode colocar os comandos a seguir no início do botão salvar, para gerar id automático:
If TCod = "" Then
TCod = WorksheetFunction.Max(Planilha1.Range("B1:B1000000")) + 1
End If
@@CanalSGP valeu, muito bom, vamos aos testes.
Sérgio Rodrigues
Ótima aula, parabéns... No cadastro todas as informações estão em caixa alta, porém não na pesquisa, como faço para pesquisar em caixa alta?
Bom dia, obrigado, pode converter pra ucase, por exemplo:
Pesquisa = vba.ucase(Pesquisa)
Perfeito! Parabéns pela planilha.
Tem como eu salvar as imagens em várias pastas. Por exemplo, ter uma pasta para imagens de peças de prata, uma pasta para peças de ouro, etc?
Ter subpastas dentro da pasta Fotos.
Bom dia, obrigado, o que pode tentar é colocar condições if para identificar no momento de salvar, em qual pasta deve ser inserida a imagem.
@@CanalSGP outra pergunta: tem como colocar Caixa Alta, no campo da pesquisa?
Boa tarde, pode utilizar VBA.Ucase para transformar o critério de pesquisa para caixa alta.
@@CanalSGP problema resolvido. Obrigado, mais uma vez.
@@wilsonlopesjunior1043 Que bom que conseguiu.
Boa Noite Prof.
Tem como adicionar listbox que carregue os campos,salve os campos tanto na planilha como listbox,quando clicar elemostre os registro junto com foto.
Bom dia, vou estudar essa necessidade.
@@CanalSGP Obrigado
10, Muito Obrigado.
Obrigado.
Boa nOite
Tem como colocar listbox,quando salvar ,salvar na planilha e listbox.
Bom dia, acredito que sim, mas talvez seja o caso de montar um filtro na listbox.
Bom dia, Prof como colocar a InputBox em caixa alta par ficar tudo igual? um abraço.
Boa tarde, segue link de vídeo sobre este tema. th-cam.com/video/9EYJ2aDGB_c/w-d-xo.html
que ótimo conteudo, como faço para excluir a linha inteira de duas planilhas ao mesmo tempo. e qual o codigo para editar a foto, porque ela continua na pasta, é preciso excluir da pasta e salvar outra no lugar, para edicao no caso de somente trocar a foto por exemplo. Obrigado
Boa tarde, foto é trocada automaticamente quando escolher outra com o mesmo código.
Boa tarde. Ótima aula. Só que no meu aparece e salva a foto virada. Sabe onde errei?
Bom dia, obrigado, acredito que está falha não tenha relação com o código vba, deve ser na foto original.
Boa noite! Posso enviar o meu projeto baseado nas sua aulas. Estou tendo dificuldade em retornar a imagem (foto)
par Editar!
Bom dia, deixe seu e-mail que envio a planilha da aula.
Tem como fazer um que o cadastramento abre diretamente a câmera do celular ou notebook? (No caso, sem possibilidade de colocar alguma foto da galeria)
Bom dia, não tentei código assim ainda, não sei dizer se é possível.
Existe uma maneira de eu criar um botão de saída, por exemplo eu tenho 10 peças de um determinado produto, aí quero fazer a saída tal dia de 5, aí ele me daria o registro do dia e da quantidade que saiu e que ficou no sistema?
Boa tarde, acredito que entrada e saída seja outro processo, no cadastro não é ideal já fazer entrada ou saída. Para entrada e saída de estoque acredito que vai precisar de outro formulário e outra aba na planilha.
Olá, eu segui o passo a passo mas não aparece o traço para escrever nos espaços em branco do formulário, não consigo dar continuidade na construção da planilha por não poder digitar no formulário, sabe me dizer o que eu possa ter feito de errado? Obrigada! adorei a aula!
Boa noite, obrigado, se refere ao underline utilizado para continuar a digitação do código na próxima linha do editor?
@@CanalSGP não seria isso, ele nem digita, eu clico no espaço para escrever mas não funciona. Difícil explicar sem mostrar haha
No meu não salva. Aparece no meu formulário de inserção de dados "Não está respondendo". Fica assim e nunca salva. Parei no instante 29:20. Não salva.
Bom dia, talvez seja algum Loop sem condição de saída, porque fica rodando infinitamente.
Obrigado pela aula. Que Deus te abençoe.
Só está dando erro quando eu incluo uma foto.
Boa tarde, qual mensagem de erro.
Ao preencher o cadastro incluindo a foto ele aparece: "ERRO!". O cadastro fica salvo, mas sem a foto. E a foto não vai para a pasta Fotos.@@CanalSGP
Boa tarde, desative o sistema de tratamento de erro, talvez seja falha no código de referência ao endereço url da pasta.
@@CanalSGP Me falta experiência nisso. Dependendo do que eu apago da erro de complicação ou não salva o cadastro. Eu apaguei a linha referente a tratativa de erro da foto. Depois vou tentar em outro computador para ver se é isso.
Boa noite, solicite a planilha de exemplo no e-mail do site do canal, link na descrição do vídeo.
muito top, poderiam me ajudar aqui, quando eu clico no botão salvar a planilha trava tudo e tenho que fechar e abrir mais ainda esta travando quando clica em salvar
Boa tarde, obrigado, é difícil saber exatamente a causa. Solicite a planilha de exemplo no e-mail do site do canal, link na descrição do vídeo.
Muito bom o exemplo. E como seria se o cadastro tivesse mais de uma foto? Reproduzi aqui e deu super certo, mas eu queria adptar pra pelo menos 2 fotos.
Boa noite, obrigado, para este procedimento acredito que não seja possível colocar duas fotos, porque vai atrelar a foto ao nome.
Professor, estou colocando essa rotina no projeto que salva os dados no acces. uma parte esta ok, porém quando salva a imagem para outra pasta , não esta renomeando o arquivo, ou seja o sistema encontra o arquivo somente quando vou na pasta e renomeio o arquivo para quel quero que busque.. onde será o erro
Bom dia, é difícil saber exatamente onde está o problema, solicite a planilha de exemplo no e-mail do site do canal, link na descrição do vídeo.
boa noite, outra pergunta, como fazer para que o botão excluir tbm exclua a imagem dentro da pasta que foi salva?
Bom dia, a imagem na realidade não precisa deletar, porque quando entrar outra foto com mesmo nome vai excluir automaticamente a anterior.
Top essa planilha.
Obrigado.
@@CanalSGP o meu deu erro no comando cells após o loop
Bom dia, qual a mensagem.
@@CanalSGP aparece a mensagem erro, quando vou salvar, clico em fechar e fala que foi salvo com suceso, porém só salva a aba telefone com: ((((((((((((((((((((((
Boa noite, deixe seu e-mail que envio a planilha da vídeo aula para que possa comparar.
Como proteger a planilha restringindo usuários, tipo somente uma login pode alterar e desproteger os outros usuários somente pra utilizar e lanças novos dados?
Boa tarde, neste sentido não fiz lógica ainda.
Bom dia, Professor, tive que formatar o notebook mas antes fiz backup da aula.. depois de consertado inseri o formulário novamente no note.. e parece mentira no note da erro, mas no pendrive não. Vai entender?
Boa noite, qual mensagem de erro retorna.
Parabéns PROFESSOR!!
Muito boa sua aula, muitíssimo bem explicado.
Mas ficou um pequeno detalhe que não consegui resolver.
Salvar as fotos na pasta "Fotos".
Conforme orientação, salvei a pasta "Fotos" dentro da mesma pasta onde foi salvo a planilha, no caso a pasta "Cadastro de Produtos", porém essa pasta "Cadastro de Produtos" está dentro do meu OneDrive e por isso quando clico para "Salvar" o cadastro de algum produto com foto dá um erro (que não especifica qual), depois clico pela segunda vez em "Salvar" aí salva o produto, porém a foto não é salva na pasta "Fotos".
Fiz uma experiência, recortei a pasta "Cadastro de Produtos" e colei direto no "C" e lá funciona perfeitamente, inclusive salva as fotos, então deduzi que só poderia ser isso, porque o OneDrive é rede.
Sendo assim pergunto se há alguma maneira de deixar a pasta "Cadastro de Produtos" dentro do OneDrive mas de forma que tudo funcione bem, inclusive o salvamento das fotos.
De ante mão agradeço pela atenção.
Giulio Cesar.
Bom dia, obrigado, no OneDrive acredito que não funciona a captura do endereço da pasta, teste colocar o endereço url manualmente no código.
Boa tarde Professor!
Segui sua orientação, troquei manualmente o endereço da pasta em todo o código do formulário, coloquei como endereço da pasta a url da pasta "Fotos" que por sinal está dentro da mesma pasta onde estão todos os arquivos salvos.
Funcionou perfeitamente bem para "Salvar" e "Editar", porém em "Pesquisar" não funcionou.
Faço a pesquisa e só consigo ver os dados salvos, a foto referente ao produto não consigo ver.
Aí tentei voltar somente nessa "Sub Pesquisar_Imagem()" com o endereço de pasta "Pasta = ThisWorkbook.Path & "\Fotos\" , mas também não funcionou.
Segue abaixo ó código que está atualmente em "Sub Pesquisar_Imagem()"
Por favor, dê uma olhada e vê onde está o erro.
Mais uma vez agradeço muitíssimo pela sua atenção.
............................................................................................
Sub Pesquisar_Imagem()
On Error GoTo Erro
On Error Resume Next
Image1.Picture = LoadPicture("") 'ALTERAR NOME IMAGE
Dim Codigo As String
Codigo = TCod.Value ' ALTERAR
Dim LocalImagens As String
Dim Pasta As String
Dim Cod, Nome, a() As String
Dim Arquivo As String
Dim i As Double
Dim Formato As String
Pasta = "C:\Users\Giulio PC\OneDrive\Area de Trabalho\TESTE\Fotos" ' ALTERAR
Formato = "*.jpg"
Arquivo = VBA.Dir(Pasta & Formato, VBA.vbDirectory)
While Arquivo ""
Nome = Arquivo
a() = VBA.Split(Nome, ".")
Cod = a(0)
If Cod = Codigo Then
LocalImagens = Pasta & Arquivo
On Error Resume Next
Image1.Picture = LoadPicture(LocalImagens) ' ALTERAR NOME IMAGE
Exit Sub
End If
i = i + 1
Arquivo = VBA.Dir()
Wend
Exit Sub
Erro:
MsgBox "Erro!", vbCritical, "ERRO"
End Sub
@@CanalSGP
Boa tarde, teste colocar mais uma barra no final do endereço.
Pasta = "C:\Users\Giulio PC\OneDrive\Area de Trabalho\TESTE\Fotos\" '
PROFESSOR NOTA 10!!!!
Quem sabe, sabe já diz o ditado.
Agora quem faz com dedicação, com prazer de estar ajudando ao próximo, compartilhar seus conhecimentos e sua sabedoria, AÍ ISSO NÃO TEM PREÇO!
Tudo funcionando perfeitamente.
Mais uma vez muito obrigado e parabéns pela sua dedicação com um desconhecido.
* Só a título de informação, quando faço a exclusão de um produto, a foto do mesmo permanece dentro da pasta "Fotos", ou seja, ela não é excluída junto com o produto, mas isso é irrelevante, pois se cadastro um novo produto usando o mesmo código do produto que foi excluído, porém utilizando uma nova foto, essa substitui a foto que havia ficado lá na pasta "Fotos".
Então para mim está mais do que ótimo.
Valeu!
@@CanalSGP
Bom dia, que bom que deu certo, o código para excluir a imagem não foi inserido porque é um código delicado, se errar o comando pode excluir outros arquivos e não é possível recuperar. Mas no formulário de cadastro com duas imagens foi colocado, segue link. th-cam.com/video/Mz80qoCuokQ/w-d-xo.html
Bom dia, como eu colocar 2 botões no form para ir pra frente e para trás, sem precisar pesquisar?
Boa tarde, segue link de vídeo com procedimento neste sentido. th-cam.com/video/1V82o-KH2TU/w-d-xo.html
Conteúdo valioso! Testei os campos e deu erro Loop Until .Cells(Linha, 2) .Value = "" . Eu segui todos os passos e conferir a linha de código mais de uma vez, mas quando coloco as informações no formulário ele dá esse erro. vou continuar revisando e ver se consigo fazer a correção. Abç
Boa tarde, qual mensagem de erro retorna?
@@CanalSGP boa tarde! erro de sintaxe
Acredito que seja erro de digitação pela mensagem, talvez nome de objeto errado.
Bom dia, sera que poderia me ajudar, estou montando uma planilha usando o UserForm, porem eu coloquei 4 IMAGENS diferentes , só que na hora de salvar, ela salva as quatro mais repete 1 só imagem em todas dentro da pasta. É possível fazer este salvamento com as 4 imagens diferentes ao msm tempo no UserForm?
Detalhe minha planilha e baseada toda nesse video msm
Bom dia, seguindo este procedimento não tentei salvar mais de uma imagem.
@@CanalSGP entendo se puder me ajudar ficarei grato,pq não existe nenhum vídeo aqui no TH-cam q ensine isso , e já tentei de TD q veio a mente e nd deu certo. Embora eu n manje nada hehe
Boa tarde, vou estudar ver se é possível fazer algo.
@@CanalSGP Desde já agradeço pela sua atenção!!!
Estou com o mesmo problema, tentei replicar os códigos. Salvar eu até consigo com nomes diferentes, o problema é pesquisar que ele não puxar as imagens para os 4 quadrados de imagens, somente para o primeiro.