LucasExcel

Bom dia,

Então... não sei se é possível, eu gostaria de criar um filtro com 2 variáveis. Na aba Pesquisa de preço, célula B4 eu gostaria que quando eu digitasse um nome nessa célula fosse mostrado da célula H4 até T4  as 6 colunas com todos os itens da linha com esse nome. Após isso quando eu colocasse um nome na célula C4 fosse feito um novo filtro sobre o anterior mostrando na célula H4 até T4 as 6 colunas dos dados informados para filtro na célula B4 e C4.

Obs: A tabela de dados está na aba Table 1.

Informativo, o objetivo é que eu consiga diariamente ter os valores dos produtos de hortifrut, com esse valor posteriormente vou fazer uma média de preços para cada item. 

Segue a planilha em anexo

Eu sei que é muita coisa, mas qualquer ajuda é valida, eu ainda não sei nem por onde começar.

Boletim diario de precos 16 07 2020.xlsx

@Muca Costa  ja me ajuda bastante. Agora eu só faço a quebra de texto na imagem e ponho do lado da tabela, porém eu perdi os dizeres ( "Prezados" -> pula duas linhas -> xxxxxxxx). E quando tentei colocar no campo Email.HTMLBody deu erro na hora de inserir o gráfico.

Segue a imagem, em anexo com dizeres..

Três duvidas,

1° tem diferença de modelo do excel, porque no excel 2016 eu consegui utilizar porém  deu erro no excel 2010 (e o computador no meu local de trabalho utiliza 2010)

2°Em algumas tentativas de utilização da macro a tabela era colada no local onde ponho o e-mail (destinatários), é algo que estou fazendo errado?
Isso costumava acontecer se em algum momento que eu enviei um e-mail anterior e cliquei pela ultima vez nos destinatários.

3° Como eu coloco os dizeres no começo do corpo do email?

Ps: se tiver como na macro quebra de texto na imagem e ponho do lado da tabela, se não for possível também já tem me ajudado muito

Então eu alterei o código inicial ( que enviei no primeiro post) e inseri o complemento abaixo que ficou posicionado antes de criar o e-mail. Ele copia o intervalo porém não consigo um código que cole e com a largura 46 e altura 12,67

Sheets("Tabela dinamica - Volume").Select
   ActiveSheet.Range("f3:AL31").Select
   Application.CutCopyMode = False
   Selection.CopyPicture Appearance:=xlScreen, Format:=xlBitmap

@Muca Costa  Obrigado pela ajuda, porém não consigo utilizar o código, mostra o erro abaixo.

Relatório de expedição rodoviário.zipEstou enviando o arquivo comprimido em anexo, para ajudar na visualização.  

e uma imagem como ficará o e-mail.Não sei se é possível que o gráfico fique do lado, se for possível eu diminui um pouco o tamanho do mesmo, se não for possível ok.

Obrigado pela ajuda

Relatório de expedição rodoviário.zip

Bom dia

Gostaria de enviar o corpo do e-mail o intervalo da célula G4 até I23 (copiar o intervalo e colar no e-mail) contido na aba "Tabela dinamica - Volume" e o Grafico 6 como imagem (o gráfico está na aba "Tabela dinamica - Volume")

Obs: Para o grafico 6 o comprimento é de 12,55 cm e a largura é de 40 cm

No momento eu tenho o código abaixo onde ele envia via e-mail com os destinatários ja informados e com o texto ja informado.

Sub MacroEmail()
'
' Macro17 Macro
                     
Set objeto_outlook = CreateObject("Outlook.Application")
Set Email = objeto_outlook.CreateItem(0)

Email.Display
Email.CC = "xxxx"
Email.To = "xxxxx"
    
Email.Subject = "xxxxx"

Email.Body = "Prezados," & Chr(10) & Chr(10) & "Segue em anexo " & Chr(10) _
& Chr(10) & "" & ActiveWorkbook.Sheets("Dash").Range("b2").Value & "" & ":" & "" & ActiveWorkbook.Sheets("Dados").Range("s3").Value & "" _
& "" & ActiveWorkbook.Sheets("Dados").Range("Q7").Value & Chr(10) & Chr(10) & ""

    
     'troque o diretorio do documento que queira enviar 'add' anexo.
    Email.Attachments.Add "\\xxxxxxxxxxxxxxxxxxxxxxxx"

       Email.Display

Obrigado

Bom dia,

Como faço para selecionar todos os itens do filtro "data" na tabela dinâmica1, exceto quando o item do filtro "data" estiver vazia ou nulo ou "" ?

No código abaixo eu consigo atualizar a tabela dinâmica e desmarcar o item "" no filtro "data" na tabela dinâmica mas não consigo marcar todos os outros itens da mesma tabela.

    Range("AI4").Select
    ActiveSheet.PivotTables("Tabela dinâmica1").PivotCache.Refresh
    With ActiveSheet.PivotTables("Tabela dinâmica1").PivotFields("Data")
        .PivotItems("").Visible = False
        End With

Beleza, obrigado e desculpa a indiscrição. 

Esterei tentando remover o conteudo dessas mensagens,não  tinha me atentado para aquela informação. 

.

@Eder Neumann 

@Eder Neumann Seria isso ?

><sheetPr codeName="Plan4"/><dimension ref="A1:CR65536"

Planilha_controle_estoque.zip

@Midori  Enviei e-mail para o criador e para o site mas nenhum deles me responderam. Mas obrigado pela sugestão 

Alguém sabe?

Bom dia 

Na caixa de texto tem a macro 

Private Sub Loja_Change()
    Selection.AutoFilter Field:=2, Criteria1:=CStr("*" + Loja.Text) + "*"
End Sub 

Essa macro filtro a tabela automaticamente quando eu insiro o valor na caixa de dialogo, porém se eu transformar as célula em formato contabil, formato de dinheiro a caixa de dialogo não filtra a minha tabela. Como faço para filtrar também em formato de dinheiro.

Boa noite,

Eu baixei essa planilha da internet do site dicas do Excel porém está bloqueada para modificações, é possível desbloquear?  gostaria que ao clicar em "vendas" e "confirmar venda" fosse gerado um recibo e quando eu clicar em "consulta" fosse possível excluir registro apenas se o tipo de usuário for "Administrador" ( não será possível quando for "usuário padrão" - Na aba cadastro).

Link com a planilha

https://www.sendspace.com/file/9j3tc4

Obrigado

@Midori Só com a dica de buscar o minimo na tabela dinâmica já me atendeu em 50%. Esse modo que você disse que seria mais fácil com fórmula ou macro, poderia me enviar a planilha por gentileza, pois não sei como usar fórmulas UNICO nas datas (Excel 2010)

Obrigado

@djacy.neto  ainda sim não ajuda. 

Acho que me expressei mal, vamos tentar de outra forma. O que eu queria por favor é uma tabela dinâmica com o menor valor da coluna L (titulo saldo) separado por dia, ou seja, ficaria de forma automática em uma tabela dinâmica os  dados conforme eu preenchi manualmente (coluna AF até AJ)  ,esse saldo vai ser a minha barra azul no gráfico dinâmico, conforme no exemplo (coluna AF até AJ) 

Obs: A meta de Arcos é igual a 30.000 - (800 * quantidade de dia que ja passaram do mês) e Volta Redonda 5000 - (50 * quantidade de dia que ja passaram do mês)

Pasta2.xlsx

Lembrando dessa obs: Muito importante: Caso eu não tenha nenhuma linha referente a data na tabela da coluna A até M o saldo na tabela AF até AJ será igual ao ultimo saldo (na própria tabela AF até AJ) para que quando eu faça o gráfico eu tenha barras preenchidas até o fim do mês independente se tem linha referente a data na tabela da coluna A até M ou não.

O meu principal objetivo é fazer o gráfico com saldo, se não tiver a meta tudo bem.

Obs: Quando tentei fazer o grafico manualmente percebi que os valores organizados da forma que está na coluna AF até AJ facilita a montagem do grafico, melhor que da  coluna AB até AD.

@djacy.neto Na verdade não, o arquivo que você me mandou considera o valor de  30.000 para qualquer destino, uma das premissas é considerar 30.000 para Arcos e 5.000 para Volta Redonda.

O gráfico não atualiza a meta, por exemplo se a meta no dia 01 é de 30.000 para Arcos e no dia 10 ja foi somado de peso liquido (coluna F)  10.000 a meta então seria 20.000. Mas o principal para mim é ajustar os valores de saldo, tudo bem ficar sem a meta. O saldo por exemplo, no dia 07 é de 103403,18 ou seja, muito maior do que os 30.000 iniciais, como eu estou tirando saldo a tendencia é que esse valor seja decrescente, na tabela dinâmica acho que você somou, o correto desse saldo seria 29.899,62 para Arcos e 4.591,59 para Volta Redonda conforme a tabela da coluna AB até AD, que eu preenchi manualmente.

Obs: no gráfico o saldo que é a barra azul sempre será crescente e a meta que é a linha verde sempre será decrescente.

Bom dia, 

Poderiam me ajudar por favor 

Pasta2.xlsx

O meu objetivo é fazer um gráfico dinâmico (anexo 1 ) e tabela dinâmica (anexo 2) como as informações do gráfico abaixo, porém eu quero uma segmentação de dados para poder separar por destino.
Na tabela da coluna A até a coluna N eu tenho uma tabela que puxarei os dados, cada linha nessa tabela refere-se a um peso liquido (coluna F) e outras informações, porém tenho mais de uma linha de informações para uma mesma data  
( coluna I), acredito que se eu conseguir na tabela da coluna AB até AD colocar o saldo ( é o menor valor da coluna L de acordo com a data, coluna I) para cada destino em seu determinado dia, eu consigo criar o gráfico que eu quero. 

Obs: Para Arcos inicialmente eu tenho um saldo de 30.000 e a cada dia estou diminuindo esse saldo com o peso acumulado do dia referente a cada destino.
Obs: Para Volta Redonda  inicialmente eu tenho um saldo de 5.000 e a cada dia estou diminuindo esse saldo com o peso acumulado do dia referente a cada destino.

Muito importante: Caso eu não tenha nenhuma linha referente a data na tabela da coluna A até M o saldo na tabela AB até AD será igual ao ultimo saldo (na própria tabela AB até AD) para que quando eu faça o gráfico eu tenha barras preenchidas até o fim do mês independente se tem linha referente a data na tabela da coluna A até M ou não.

 
Eu preenchi na tabela referente a coluna AB até AD manualmente como exemplo. O gráfico e a tabela são apenas ilustrativos.

@deciog  Ficou incrível, eu tive umas dificuldades para passar para minha tabela original e na utilização da primeira linha quando toda a planilha está em branca. Quando isso acontece eu só preciso jogar a formula novamente na célula e arrastar para a planilha, assim depois de preenchido a primeira linha não é preciso fazer novamente.  Ficou ótima a fórmula, muito obrigado pela ajuda.

Bom dia, @deciog

Teste.xls

Segue a planilha em anexo. Fiz algumas modificações: eu inclui as observações na coluna Z até AF apenas para conhecimento(é a descrição q esta nesse site do meu pedido)

Inclui a linha 33 e 34 para sinalizar a necessidade de continuidade na fórmula 

Pus os valores  da coluna K e L da linha 31,32,33,34 manualmente ( para fazer manualmente, por exemplo, eu para a coluna K, linha 31  fiz "=K29+F31" e para coluna L, linha 31 "=L29-F31")

@Patropi  tem alguma ideia ?

@Patropi Vamos lá, na tentativa de utilizar a fórmula vi alguns detalhes que impossibilitarão a utilização 

1° Para a coluna K - >  Na célula K31 deve-se somar F31 ao invés de F30. Sempre o ultimo valor da coluna "Acumulado" (coluna K) + peso liquido da própria linha ( na coluna F), nesse caso peso liquido é a célula F31 porque estou preenchendo a célula K31 (linha 31)

2° O mesmo acontece para o coluna L - > Na célula L31 deve-se subtrair F31. Sempre o ultimo valor da coluna "Saldo" (coluna L) - peso liquido da linha (na coluna F), nesse caso peso liquido é a célula F31 porque estou preenchendo a célula L31 (linha 31)

Obs: Atualmente a célula F31 diminui 1000  da célula F30, ao invés de subtrair com base na coluna F.

3° Eu preciso arrastar essa célula para que a fórmula funcione de acordo com o meu novo preenchimento (fórmula funcione nas células abaixo K31,K32,K33...), eu tentei destravar as células na barra de fórmula mas deu erro, por exemplo, na linha 32 eu preenchi o peso liquido (coluna F) e o destino (coluna M) porém quando arrasto a fórmula da o erro #Valor ou #NUM!.

Eu estou usando o excel 2013, tem algum problema?

4° Eu estou preenchendo a célula K31 eu preciso que a fórmula procure na coluna M, caso o destino seja Volta Redonda o ultimo acumulado, na coluna K referenciando ao destino,Volta Redonda coluna M e faço o mesmo caso para o destino Arcos. Porque o valor Acumulado ou Saldo são diferentes de acordo com o destino. Isso na mesma célula.

Peço desculpa pela correção do enunciado, pois percebi com a utilização da fórmula.

Caso seja feito com VBA, para mim não faz diferença.

Obrigado pela ajuda

Bom dia,

Preciso de uma ajuda por favor. 

Com a fórmula ÍNDICE(K2:K31;CORRESP(M30;M2:M31;0);CORRESP("Volta Redonda";M2:M31;0));"") eu consigo procurar na coluna L o valor referente a cada destino, porém a fórmula não me mostra o ultimo valor preenchido. Acredito que o meu grande problema é "procurar ultimo valor preenchido que seja com cada destino". 

Para a coluna K - >  Se a célula  M29 for igual a "Arcos" então eu vou somar F29 com o ultimo valor da coluna K  que for com destino a "Arcos" (por exemplo, K28), se a célula  M29 for igual a "Volta Redonda" então eu vou somar F29 com o ultimo valor da coluna K  que for com destino a "Volta Redonda" (por exemplo K17)

Para a coluna L - > se  M29 for igual a "Arcos" então a fórmula vai procurar na coluna L o ultimo valor que for com destino a "Arcos" e vai subtrair com a célula F29, se M29 for igual a "Volta Redonda" então a fórmula vai procurar na coluna L o ultimo valor que for com destino a "Redonda" e vai subtrair com a célula F29

Teste.xls

Obs: a partir da linha 32,coluna K e L eu vou começar utilizar a fórmula de modo que a cada preenchimento da coluna F e M seja automatizado o preenchimento da linha 32,coluna K e L

@Midori Deu certo, obrigado pela ajuda.