Michelle Alves

Obrigada Kuroi Vou tentar adaptar o exemplo, qualquer coisa tento uma ajudinha no serviço também.

Olá !!! Existe alguma forma de fazer uma rotina dessa forma pelo VB ? - zipar e salvar um arquivo .xls - ao salvar dar outro nome (data atual) automaticamente para ele ?

Oi Pessoal, Formatei meu PC essa semana, só que mesmo após fazer o download do DevCpp o arquivo <iostream.h> não é localizado. Alguém sabe como devo fazer para localiza-lo novamente ? brigada

Oi, Precisa detalhar biblioteca sim. Habilite Microsoft Forms Object Library.

Oi José, obrigada pela ajuda. Seu exemplo não é exatamente a minha necessidade, mas ajudou muito. Nele os mais vendidos vão sendo acumulados, e o que necessito é que seja pesquisado os mais vendidos em determinada data. Sei que você colocou uma pesquisa Inter Data, mas ela não está filtrando a quantidade por dia corretamente, percebeu isso ? De qualquer forma, acho que consigo adapta-lo, afinal consegui agora compreender qual a linha de raciocínio devo seguir. Esclarecendo sua duvida, aqui na empresa tem 2 Guilherme, e ambos somos do mesmo depto.

Tudo bem. Eu consegui fazer a pesquisa por datas como o mdomingos falou, mas não sei como armazenar os valores de cada produto. Vou ficar esperando você postar seu exemplo. Muito obrigada. Guilherme de onde ?

Boa noite José, Teria a possibilidade de você postar a forma como conseguiu fazer ? Talvez eu consiga adaptar a minha necessidade ou até seja... Obrigada

Então, eu vou gerar o relatório dos mais vendidos, mas geralmente será de algum período. Ou seja, da forma como você disse no penúltimo POST. é exatamente isso que preciso. Obrigada

Ta legal. Estou postando uma planilha com o exemplo. Relatorio Seria pesquisada a data e a quantidade, então o relatorio deveria voltar mostrando a soma de cada item vendido, ordenado pelos mais vendidos. não estou sabendo como armazenar cada item vendido, para que ele seja somado e depois faca essa classificacao. Todos que puderem ajudar eu agradeco.

Oi Gente, Não se se me fiz entender, mas realmente estou precisando de uma ajuda, vou tentar explicar melhor. O que preciso é que o código some cada produto que foi vendido e depois ordene os produtos pelo número de vendas. Só que estou no limbo absoluto, sem saber por onde começar.... Obrigada

Boa noite Pessoal, já procurei por todos os lugares possiveis, mas pouco encontrei. alguém sabe como criar um relatorio de produtos mais vendidos em VBA ??

Oi Nelson Boa noite, Primeiramente obrigada por sua presteza. Veja só, colocando a estrutura como colunas eu poderia cadastrar no máximo 2560 clientes, uma vez que esse é o limite de colunas, já colocando como linhas, meu limite será mais de 65 mil clientes. Por isso escolhi trabalhar dessa forma. Sobre o Access eu não tenho muito conhecimento, até porque se tivesse eu iria realmente construir o projeto por lá. De qualquer forma, caso tenha alguma sugestão de como realizar a rotina que necessito pelo Excel irá me ajudar e muito. Obrigada, Michelle

Ops... Desculpem esqueci de deixar o link http://www.4shared.com/account/file/127758.../teste_CRM.html Gostaria que ao clicar no botoão PRÒXIMO, seja localizado o valor do TEXT1 na planilha e vá para 3 células a frente, mas na mesma linha do valor localizado. E a mesma coisa com o botão ANTERIOR, porém 3 células atrás. obrigada

Nossa o José tem razão, não existe tal propriedade no TEXT, desculpe mas quando li o intervalo que você queria já pensei no Listbox na hora. Até porque não tem como carregar um TEXT com este intervalo, uma vez que ele só poderá carregar um dado de cada de vez. Não seria melhor usar o Listbox ?

Boa noite, Estou terminando meu projeto, mas ficou faltando uma rotina para fazer com que ao clicar no Button PROXIMO os dados exibidos nos TEXTBOXES sejam avançados para 5 células a frente cada um, ate o fim. E a mesma coisa para o ANTERIOR, porém 5 células anteriores até o início. Deixo abaixo um link com um exemplo da minha necessidade. O form em questão sera iniciado ao abrir o arquivo. Obrigada

Boa noite, Na propriedade EowSource do Listbox você pode definir o período da planilha que quer exibir. Por exemplo; Plan1!A1:E10

Boa noite, Você pode se referir a planilha de duas formas: Sheets("nomedaplanilha"). ou simplesmente por Plan1. Porém isso vai depender de como você irá escrever seu procedimento.

Boa noite Kuroi, Certinho !!! É isso mesmo. Obrigada

Kuroi boa noite e obrigada, Funcionou corretamente, só tem um detalhe. Sobre as outras colunas do ListBox; Tenho no total 3 colunas, que são referentes ao TEXTBOX no formulario. Porém, ele buscaria não na próxima coluna, mas na próxima linha da planilha. Tentei fazer da seguinte forma, mas acabou faltando definir WITH, é preciso colocar WITH ? Veja como ficou: Private Sub CommandButton3_Click() Dim r As Range Dim j As Range Dim m As Range ListBox1.Clear If OptionButton1.Value Then Set r = Worksheets("CRM").Range("C2") j = r m = r Do While r.Value <> "" If r.Value = TextBox13.Text Then ListBox1.AddItem r.Value ListBox1.AddItem j.Value ListBox1.AddItem m.Value Exit Do End If Set r = r.Offset(, 1) Set r = r.Offset(, 2) Set r = r.Offset(, 12) Loop Else ...................... Ate mesmo no Duplo click para transferir os valores do List para os TEXT ficariam diferentes, pois geralmente eu usaria o .BoundColumn, mas nesse caso seria a Linha, ai desconheço qual propriedade usar nesse caso também.

Sem problemas Kuroi. Fico no seu aguardo. Tomara que você consiga, estou precisando demais disso. Obrigada

sim, Kuroi o LIst vai ter sempre uma linha pra ser exibida, mas no duplo clique deverão passar todos os dados para os respectivos TEXT ao lado. já na pesquisa, se a pesquisa for por código ele encontrará apenas um, mas se for por nome, corre o risco de achar mais de um, por exemplo, se digitar José, pode ser que haja mais de um. Obrigada.

Ok Kuroi Obrigada pelo aviso, segue o novo link: http://www.4shared.com/file/118005350/7434...GENDA_LED3.html

Boa noite, Tenho um FORMULARIO chamado "CRM'. Gostaria que ao digitar o código do cliente num TEXT, seu valor fosse pesquisado na linha 2 e em todas as colunas da planilha, e gostaria que o resultado fosse retornando o resultado no LISTBOX. Para facilitar a compreensão do que tento desenvolver, posto o link abaixo com o exemplo completo: http://www.4shared.com/file/118005350/7434...GENDA_LED3.html Obrigada

Boa noite, Preciso mais uma vez da ajuda de vocês. Tenho uma planilha onde preciso que caso o TEXTBOX1 seja igual a algum dado já existente na linha 2 de alguma Coluna que os dados sejam adicionados nessa mesma coluna, mas na próxima linha vazia. Senão os dados serao incluidos na linha 2 da primeira coluna que estiver vazia. Obrigada

Realmente Kuroi, Já até consegui, mas sua forma ficou mais simples. Só não vai atualizar o item deletado, né.... Veja só: If Not x Is Nothing Then Sheets("CREC").Activate Set rgOrigem = Sheets("CREC").Range("B" & i & ":N" & i) Lastrow = Sheets("BAIXA").Cells(Rows.Count, 2).End(xlUp).Row If Lastrow < 3 Then Lastrow = 3 rgOrigem.Copy Sheets("BAIXA").Range("B" & Lastrow + 1) rgOrigem.EntireRow.Delete End If MSGBOX "Registro baixado com sucesso" ListBox1.Object.Clear