×
Ir ao conteúdo
  • Cadastre-se

LucasExcel

Membro Pleno
  • Posts

    87
  • Cadastrado em

  • Última visita

  • Qualificações

    0%

Tudo que LucasExcel postou

  1. Ficou perfeito, muito obrigado pela ajuda. Todo esse bate papo me gerou vontade de pesquisar mais sobre power query, conseguiu resolver a questão de apagar linha e tornou a planilha mais funcional. Obrigado pela ajuda
  2. Muito show e muito valido as dicas, mas eu continuo não conseguindo utilizar o código do power query. Você criou uma aba que eu consigo utilizar perfeitamente a função, mas eu preciso que essa função seja utilizada na aba saída na tabela 4 ( ou a tabela TSaídas como voce nomeou). Eu até tentei passar o código do power query para a tabela 4 ( ou a tabela TSaídas como voce nomeou) para utilizar função mas quando eu atualizo no excel ao invés de excluir na própria tabela as linhas que estão vazias o excel cria automaticamente uma nova tabela.
  3. @DJunqueira muito legal e rápido, obrigado, eu utilizo office 2016 mas eu não sei mover o seu código para a minha planilha. Pode me ensinar ou me ajudar. Em anexo está o arquivo em zip com a planilha. Vou fazer um resumo sobre o que eu fiz na planilha e o porquê dessa ajuda. Na aba Capa eu preencho com o "cod" os produtos que estão sendo vendidos em cada atendimento, o meu problema era que eu não sabia como utilizar a macro para copiar e colar varias linhas, em que cada uma contem 1 produto para cada atendimento (1 atendimento pode ser vendido vários produtos), por isso eu fiz uma macro para copiar e colar uma quantidade de linhas independente se tivesse preenchida ou não e depois eu fiz outra macro para apagar as linhas que não estivessem com nada preenchido na aba " Saída", coluna C e coloquei essa macro dentro da macro geral para finalizar venda porém a parte de apagar linha era muito lento, como eu faço para colocar esse código que você fez na macro que eu fiz e também fazer um botão sobre a macro que você fez? Gerenciamento da loja.zip
  4. Boa noite, eu tenho uma tabela (tabela 4) que é abastecida por hora e em alguns valores ficam em branco na linha C. O código abaixo é para excluir as linhas que contem a célula C entre C8 e C1000 que ficam em branco, porém o código é lento para rodar, tem alguma forma de deixar esse código mais rápido? Sub DeleteCelulas() For Each c In Range("c8:c1000") If c = "" Then c.EntireRow.Delete Next End Sub
  5. Aconteceu em uma pagina de vinhos, eu entrei em uma pagina e 3min depois ja não tinha mais acesso a conta, e sim tinha a verificação de duas etapas.
  6. Ola, meu instagram foi hackeado e trocaram o e-mail e o numero de celular, ja tentei reverter o e-mail mais o instagram envia um e-mail para o e-mail trocado, tem alguma forma de recuperar o meu perfil novamente?
  7. alguém pode me ajudar
  8. Desculpa, estou tendo dificuldade de criar um filtro avançado na tabela, eu gostaria de filtrar a tabela da aba saída pela data que esta sendo informada na célula C4 da aba Financeiro diário. Segue a planilha e como estou tentando fazer Pasta1.xlsx
  9. Ola, preciso de um código VBA, preciso que seja copiado todas as células da K25 até N30 que estejam preenchidas juntamente com a coluna K25 até k30. O meu problema é que quando eu insiro apenas 1 linha na tabela (linha 25) eu não consigo copiar exatamente; Planilha em anexo Pasta1.xlsx
  10. @RafaVillani Ficou ótimo, muito obrigado
  11. @RafaVillani ficou ótimo, mas preciso de outra ajuda. Eu coloquei tudo em uma aba só quando fiz a pergunta para facilitar,porém na planilha eu preciso que esses dados sejam inseridos automaticamente em outra aba, na planilha que enviei na pergunta os dados eram inseridos na aba "Dados", preciso na verdade que sejam inseridos na aba "Grafico". Eu tentei mudar mas não consegui. Não sei nada sobre função Gostaria por favor que os dados sejam inseridos na aba "Grafico", célula W5,W6 e W7. Estou enviando a planilha em anexo e o seu código abaixo. Private Sub Worksheet_Change(ByVal Target As Range) Dim Nome As String, Data As Date Dim sNome As Range, sData As Range Dim Lin As Integer, Col As Integer Dim Celula As Range Set Celula = Range("E21") If Not Application.Intersect(Celula, Range(Target.Address)) Is Nothing Then If Range("E20") = Empty Then MsgBox "Informe o nome primeiro!", vbInformation Else Nome = Range("E20").Value Data = Range("E21").Value Set sNome = Sheets("Dados").[A:A].Find(What:=Nome, LookIn:=xlValues, LookAt:=xlWhole) Set sData = Sheets("Dados").[B:B].Find(What:=Data, LookIn:=xlValues, LookAt:=xlWhole) If Not sNome Is Nothing Then If Not sData Is Nothing Then If Nome = sNome And Data = sData Then sData.Select ActiveCell.Offset(1, -1).Activate Lin = ActiveCell.Row Col = Plan2.Cells(Lin, Cells.Columns.Count).End(xlToLeft).Column Range("F22") = Cells(Lin, Col).Value Range("F23") = Cells(Lin + 1, Col).Value Range("F24") = Cells(Lin + 2, Col).Value Range("E21").Select End If Else MsgBox "Data não encontrada!", vbInformation End If Else MsgBox "Nome não encontrado!", vbInformation End If End If End If End Sub Avaliação..xlsx
  12. Boa tarde. Poderiam me ajudar por favor. Como eu faço para ao inserir o nome (célula a20) e a data (célula A21) o excel me mostre o ultimo valor preenchido da tabela para essas condições. Por exemplo, com os dados acima o resultado precisa ser as informações da célula F22,F23 e F24. Observação, sempre que eu mudar o nome e a data a tabela terá mais ou menos informações Planilha em anexo Avaliação.xlsx
  13. @Midori Muito obrigado, ficou perfeito
  14. @Midori Não entendi como eu utilizo o código. Da para colocar em um botão? Não sei manusear código quando é função.
  15. @RafaVillani atendeu sim. Muito obrigado
  16. @Rui GuilhermeObrigado pela ajuda, mas eu não seu adicionar a id do facebook nas minhas metas. Pode orientar um passo a passo por favor. Onde acho esse campo de meta? O que seria o meu Id do facebook? Onde acho?
  17. @Rui GuilhermeObrigado pela ajuda, mas eu não seu r adicionar a id do facebook nas minhas metas. Pode orientar um passo a passo. Onde acho esse campo? <meta property="fb:app_id" content="ХХХХХХХХХХХХХХХ" /> O que seria o meu Id do facebook? Onde acho?
  18. Bom dia, Eu tenho uma planilha que ao apertar o botão cadastrar le um código em Vba que inseri os valores da aba "Painel", célula G12 até M12 na aba "Tabela" na primeira linha vazia . É possível que sempre que eu apertar o botão cadastrar o excel gere uma mensagem e não insira os valores na aba "Tabela" se o numero da célula M12 ja estiver cadastrado em alguma linha da coluna J? Código que eu tenho na planilha do botão do Cadastrar Sub Cadastrar() ' ' Essa macro copia as células G12 até M12 e cola na primeira célula vazia da planilha Tabela ' ' On Error Resume Next Sheets("Painel").Select Range("g12").Select If Range("g12") <> "" Then Range(Selection, Selection.End(xlToRight)).Select Selection.Copy Sheets("Tabela").Select Application.Goto Reference:="R1C4" Selection.End(xlDown).Select If Range("d2") = "" Then Range("d1").Select ActiveCell.Offset(1, 0).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Columns("D:D").Select Selection.NumberFormat = "m/d/yyyy" Columns("E:E").Select Selection.NumberFormat = "h:mm;@" Range("Tabela1[[#Headers],[Mês]]").Select Application.Goto Reference:="R1C4" Selection.End(xlDown).Select Call Salvar Sheets("Ticket").Select ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _ IgnorePrintAreas:=False Sheets("Painel").Select Range("J12:M12").Select Selection.ClearContents Range("M24").Select Selection.ClearContents Range("M25").Select Selection.ClearContents Range("K12").Select ActiveCell.FormulaR1C1 = "=R[13]C[2]-R[12]C[2]" Range("Tabela13[Carreta]").Select End Sub Teste.xlsx
  19. @CasaDoHardware não tinha pensado, mas fui tentar, o problema é que a linha em azul de F. C (BPM) muda os valores de acordo com cada pessoa, dessa forma eu não consigo por títulos. Ainda é possível criar um gráfico dinâmica? Não consegui fazer
  20. @Midori Me expressei mal. Deixa eu tentar explicar novamente. Por favor ignorar a explicação do primeiro post. Vamos la, O objetivo é poder, ao escolher um nome (célula E5) e uma data (célula L5) na aba "Historico" que as informações (as duas linhas abaixo do nome, exemplo no anexo 1) na aba "dados" sejam copiados e colados na tabela da aba "Historico" na célula D18 em diante. Dessa forma ao colar os dados na aba "Historico" eu vou conseguir o gráfico dos dados (valores) antigos 2Avaliação.xlsx
  21. Boa noite, Eu criei uma conta de anuncio no facebook business porém sempre que eu vou criar um anuncio mostra como rejeitado, e sempre que ponho a Url do meu site, diz que esta rejeitado porque conteudo não esta de acordo com a politica do facebook, pesquisando achei o depurador de compartilhamento do facebook porém gera o seguinte erro As duas propriedades obrigatórias a seguir estão ausentes: fb:app_id. Alguem sabe o que fazer°? url:https://sublime-relogio.myshopify.com/
  22. Boa tarde Preciso criar uma forma de ao inserir o nome e a data o excel localiza-se esse valor na planilha e iria colocar a seta em cima desse valor. Segue em anexo a planilhaAvaliação.xlsx Boa tarde, como são muitas datas, se possível so aparecer na caixa de seleção as datas ligadas ao nome selecionado. Obs: Pode alterar que for necessário para a fórmula
  23. @NIGHT FALL Gostaria de algo similar ao google drive, porém no google drive eu preciso enviar permissão para pessoa acessar a pasta. Gostaria de uma aplicação na nuvem que ao enviar um link na internet a pessoa acessaria uma pasta na internet com os arquivos. Conhece algum para me indicar?
  24. @AfonsoMira muito bacana, mas o meu acesso ao computador é limitado. gostaria de uma forma que eu conseguisse baixar em algum local a versão antiga do aplicativo e conseguisse instalar a versão antiga. Por exemplo, nesse site eu consigo baixar a versão antiga do App para Android, porém mesmo no Android eu não consigo instalar a versão antiga. https://m.apkpure.com/br/wearfit-pro/com.wakeup.howear
  25. Olá, alguém sabe como instalar o App WearFit pro versão antiga no IOS? o aplicativo atualizou nesse mês, porém prefiro a versão antiga

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...

Curso de Hacker Ético

LANÇAMENTO!

CLIQUE AQUI E CONFIRA!

* Este curso não é ministrado pela equipe do Clube do Hardware.