ErickSant

@Lucas Takeshi Yamamotobom dia. Você conseguiu resolver esse seu problema? Estou em 2022 e estou enfrentando o mesmo... Não sei o que fazer. Toda vez que estou de live aberta na twitch, passa um tempo e a internet cai, só no PC...

Pessoal, boa noite, Tenho uma lista de valores onde precisava transformar essa lista em uma única célula com o " ; " de separador, hoje em dia eu copio essa lista no Word e substituo o "^p" por " ; " e funciona, mas precisava fazer isso sem utilizar o word. Vejam meu anexo para melhor entendimento. Alguém consegue me ajudar ? Obrigado! lista.xlsx

Oi Pessoal, boa noite, Possuo uma tabela onde há alguns números de notas que se repetem, estou tentando criar uma dinâmica para agrupar por número de nota e somando o valor total dessas notas, até consegui, mas a ideia era montar uma "tabela" como na primeira planilha só que eliminando as notas duplicadas e deixando apenas o total de cada nota... Alguém já fez algo parecido com o group by do access, só que no excel ? Vejam meu anexo por favor para ficar mais fácil de entender... Obrigado! Agrupamento.xlsx

consegui!

Boa tarde pessoal, Estou com uma dúvida para realizar atualização de uma tabela no excel, acredito que vendo meu anexo fica mais fácil de entender minha dúvida, que é a seguinte: haverá sempre o primeiro arquivo (principal) e em seguida haverão outros arquivos, a ideia é toda vez que eu for importar outros arquivos, a macro faça uma atualização do meu arquivo principal, seguindo as seguintes regras: - Caso a chave do primeiro arquivo seja = a chave do segundo arquivo, faça as seguintes verificações, caso o valor bruto e data de vencimento sejam diferentes, trazer para o arquivo principal as novas informações. - Caso a chave do primeiro arquivo não exista no segundo arquivo, deletar a linha atual ou marcar ela para ser deletada em um segundo loop por exemplo. e por último e o que ta me dando mais dor de cabeça: - Caso a chave do segundo arquivo não exista no primeiro arquivo, levar esses caras para o primeiro arquivo... Alguém consegue me ajudar ? valeu... teste2.zip

Boa tarde, Tenho o seguinte código para importar arquivos automaticamente no Access... Eu precisava criar uma validação para impedir que fosse importado registros repetidos... Minha dúvida seria criar alguma regra que impedisse que eu imputasse registros repetidos... Private Sub btn_01_Click() nome = Dir("C:\*.xlsx") planilha = "C:\" & nome 'CurrentDb.Execute "DELETE * FROM Radares" 'limpa a tabela antes de importar Set dbLocal = CurrentDb 'banco atual Set myRec = CurrentDb.OpenRecordset("Radares") 'abre a tabela que você escolher Set dbExcel = OpenDatabase(planilha, False, True, "Excel 8.0; HDR=NO; IMEX=1;") 'abre o excel Set rsExcel = dbExcel.OpenRecordset("Instrumentos$") 'rsExcel.MoveNext 'começa a pegar da segunda linha do excel Do While Not rsExcel.EOF If rsExcel.Fields("F1") = "Municipio" Then rsExcel.MoveNext End If myRec.AddNew 'adiciona uma linha na tabela myRec.Fields("Municipio") = rsExcel.Fields("F1") myRec.Fields("NumInmetro") = rsExcel.Fields("F2") myRec.Fields("Local") = rsExcel.Fields("F4") myRec.Fields("DataVerificacao") = rsExcel.Fields("F5") myRec.Fields("DataValidade") = rsExcel.Fields("F6") myRec.Update rsExcel.MoveNext Loop rsExcel.Close Set rsExcel = Nothing dbExcel.Close Set dbExcel = Nothing 'caminhoresultado = "C:\" 'DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12Xml, "Encontrados", caminhoresultado, True MsgBox ("Importado com sucesso!") 'Debug.Print (caminho) End Sub Alguém consegue me ajudar ?

era isso mesmo cara! Muito obrigado!

Prezados, boa tarde, Venho com mais uma dúvida, a lógica dessa vez é a seguinte, há a coluna de descrição e a coluna de valor... A ideia é pegar caso o valor termine com a letra D, pegue a segunda linha da descrição, recorte e cole na linha da descrição do valor... (esse é o primeiro loop) O segundo loop seria apagar todas linhas que não possuem descrição... Vendo meu anexo acredito que ficaria muito mais fácil o entendimento... Na planilha2 coloquei como teria que ficar... Alguém consegue me ajudar ? teste.xlsx

Fala @R0DR1G0_CWB não to conseguindo te mandar mensagem privada... Não mandei com o vba porque a ideia é bem 'simples', to mandando agora com o código que tentei fazer... O objetivo é filtrar tudo da coluna A diferente dos números que coloquei nos critérios... Que são: 27001101 27001102 27001103 27001104 27001105 27001106 27001201 27001202 27001203 27001204 27001205 e também não pegar os campos vazios Segue o anexo... Pasta1.zip

Amigos, boa tarde, Tenho uma dúvida que para muitos acredito que será fácil, mas eu estou quebrando a cabeça e não consigo resolver... Possuo 4 bases enormes em excel onde possuem diversas colunas, a ideia é dessas 4 bases, retirar apenas algumas colunas específicas e jogar em um layout pronto já do Excel... Porém algumas colunas desse layout, possuem fórmula de concatenação e uma outra de conversão de valor(real para Euro)... Eu queria tentar fazer isso em Access, onde no Access eu já teria a tabela do layout pronta e exportaria todas bases do excel la e rodaria alguma query... Alguém já fez algo parecido ?

Corrigindo, sua resposta acima estava certa! OBRIGADO! RESOLVIDO!

Bom dia Rodrigo! Obrigado pelo retorno até aqui! Verificando com o resultado que foi feito na mão, alguns pequenos valores não entraram na macro, fiz alguns testes na planilha 2, verifique meu anexo por favor... A soma da coluna Erro teria que dar: 169.573,43 Obrigado!! Teste versão Feito.zip

@R0DR1G0_CWB Fala cara, beleza? Eu testei o seu código, ele praticamente da o mesmo 'erro'... Veja meu anexo, se você pegar por exemplo, depois de rodar a macro do status, o valor 12,5... Vai encontrar alguns valores desse negativo mas cade o positivo ? A ideia é deixar com o status OK, somente os números que se cruzam, ou seja, esses que estão com ok, na verdade deveriam estar com erro... Fazendo essa conciliação no olho, verifiquei que o número de Errados é de 178, ou seja, são alguns que estão com 'ok' mas que na verdade deveriam estar como 'erro' também... Pasta1.zip

Amigos, bom dia, Eu havia marcado esse tópico como resolvido, porém analisando de novo a planilha, me deparei que ainda constam valores que deveriam estar com o status 'OK' mas não ficaram... É como se o código só faz o calculo quando há um número positivo seguido de um negativo, quando há por exemplo, dez números positivos e depois de outros números aleatórios terem esses mesmos 10 números negativos, ele não altera o status deles... Vejam meu anexo por favor... Alguém consegue me ajudar ? teste.zip adicionado 7 minutos depois Em uma outra época, um amigo fez um código em vba para mim, onde conciliava valores que se repetiam na mesma coluna, por exemplo, há 10 valores positivos e 10 valores negativos, dai essa macro ela pintava todos os 20 valores de uma cor específica.... Não sei se daria para adptar esse código para minha nova necessidade... Segue: Sub conciliar() On Error Resume Next Dim ul As Long 'inicio: ul = Planilha1.Range("A" & Rows.Count).End(xlUp).Row For i = 2 To ul conf1 = CStr(Cells(i, 7).Value & Cells(i, 8).Value) For j = 2 To ul If CStr(Cells(j, 7).Value & (Cells(j, 8).Value) * -1) = conf1 And Cells(j, 7).Row <> Cells(i, 7).Row Then Cells(j, 2).EntireRow.Interior.Color = 65535 Cells(i, 2).EntireRow.Interior.Color = 65535 'GoTo inicio End If Next j Next i MsgBox "Conciliação realizada com Sucesso!", vbExclamation, "Sucesso!" End Sub

prezados, bom dia, Quando baixo algum arquivo da internet, automaticamente abre a tela de pergunta se quero salvar o arquivo ou apenas abri-lo... Existe alguma configuração onde eu consigo tirar essa pergunta e salvar direto o arquivo em meu computador?(downloads) Ou alguém sabe me informar qual seria o nome do botão 'save'(código)? Obrigado!