Curso de Excel Grátis

você poderia usar um VBA para carregar as empresas, basicamente faz um clear no componente e depois vai fazer additem outra forma seria usar a função filtro do excel aqui a coluna C tem o nome da emrpesa e a D tem o status =FILTRO(C2:D4;D2:D4="Ativo")

boa tarde você pode fazer um looping que passa pelas linhas e outro pelas colunas, algo assim for linha = 1 to 7 for coluna = 1 to 14 if cells(linha,coluna) = valorprocurado then 'pintar end if next coluna next linha mas provavelmente da pra fazer sem VBA também no meu canal no youtube tenho alguns videos com os primeros passos de VBA www.cursodeexcelgratis.com.br/canal

se você tem o resultado na planilha, não consegue pegar dela ?

posta o codigo que você fez pf

pode estar faltando criar a conexão odbc no painel de controle

bom dia, se você tiver uma versão nova do excel, não precisa usar VBA, poderia usar o unirtexto() você tem essa função disponível ? Aproveite para acessar e assinar meu novo canal no youtube http:\\cursodeexcelgratis.com.br\canal

bom dia @ricardo.ssantoseu tentaria via VBA usar o comando sendkeys para mandar a "setinha para baixo" , se você colocar no google sendkeys vba seta para baixo vai ver um exemplo de como você pode fazer isso Aproveite para acessar e assinar meu novo canal no youtube http:\\cursodeexcelgratis.com.br\canal

bom dia, pode ser que seja a versão do excel, pois o sumifs é relativamente recente Aproveite para acessar e assinar meu novo canal no youtube http:\\cursodeexcelgratis.com.br\canal

obrigado por se inscrever ! 🙂

estimado , bom dia, se puder compartilhar o codigo atual ajudaria a entender melhor o problema Aproveite para acessar e assinar meu novo canal no youtube http:\\cursodeexcelgratis.com.br\canal

bom dia, o with é usando quando você quer fazer varias coisas com um objeto, e no lugar de você repetir o nome do objeto com você coloca with objeto e sai fazendo tudo, por exemplo no lugar de cells(1,1).select cells(1,1).color = 123 cells(1,1).text= "fasdfa" você faria with cells(1,1) .select .color = 123 .text= "fasdfa" end with então é mais para organizar o código, se puder, disponibiliza sua planilha num link para dar uma olhada nela.

você acabou abrindo duas vezes o mesmo post .. você pode usar o application.ontime pra isso, junto com o evento change Private Sub Worksheet_Change(ByVal Target As Range) If Target.Row = 1 And Target.Column = 1 Then If Target.Text = "1" Then Range("B1") = 1 ElseIf Target.Text = "0" Then Call Application.OnTime(DateAdd("s", Range("c1"), Now()), "zerarb1") End If End If End Sub tem um exemplo no meu canal de uso no evento change para atualizar tabela dinamica a funcao zerarb1 você cria um num modulo Sub zerarb1() Range("B1") = 0 End Sub Aproveite para acessar e assinar meu novo canal no youtube http:\\cursodeexcelgratis.com.br\canal

estimado, se você vai em configurar página e em seguida cabeçalho / rodapé e deixa configurado lá, não da certo ao gerar o pdf ? eu fiz um gravar macro, e gravei a planilha como pdf, o resultado foi a macro abaixo ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Users\Admin\Documents\pdfpdf.pdf", Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _ True e gerou o pdf com cabealho e rodapé configurado aproveito para te convisar para meu canal no youtube http://cursodeexcelgratis.com.br/youtube

você pode usar o application.ontime pra isso, junto com o evento change Private Sub Worksheet_Change(ByVal Target As Range) If Target.Row = 1 And Target.Column = 1 Then If Target.Text = "1" Then Range("B1") = 1 ElseIf Target.Text = "0" Then Call Application.OnTime(DateAdd("s", Range("c1"), Now()), "zerarb1") End If End If End Sub tem um exemplo no meu canal de uso no evento change para atualizar tabela dinamica a funcao zerarb1 você cria um num modulo Sub zerarb1() Range("B1") = 0 End Sub Aproveito para te convisar a assinar meu canal e ver os videos de VBA

Estimado, fiz duas funções para ficar mais organizado, numa primeira função pego o nome do mês e transformo na ordem dele e na outra função uso a ordem do mês para fazer o clear contents que você precisa Private Sub LimparCelulas(ByVal mes As String) Range("O" & 11 + ordemMes(mes) & ":O23").ClearContents End Sub Private Function ordemMes(ByVal mes As String) As Integer Select Case LCase(mes) Case "janeiro" ordemMes = 1 Case "fevereiro" ordemMes = 2 Case "março" ordemMes = 3 Case "abril" ordemMes = 4 Case "maio" ordemMes = 5 Case "junho" ordemMes = 6 Case "julho" ordemMes = 7 Case "agosto" ordemMes = 8 Case "setembro" ordemMes = 9 Case "outubro" ordemMes = 10 Case "novembro" ordemMes = 11 Case "dezembro" ordemMes = 12 End Select End Function se gostou, te convido a se inscrever meu canal do youtube, tenho uns videos de vba cursodeexcelgratis.com.br/canal

Estimado, as funções no VBA são em inglês, imagino que deva ser algo como now() porém, o now() retorna a data inteira com hora e tudo , como você quer dia e mês teria que fazer algo assim Format(Now, "DD/MM") Cells.Find(What:=Format(Now, "DD/MM")).Activate

boa tarde ! como você fez para ativar a tela do whatsapp web via VBA ? Aproveite para acessar e assinar meu novo canal no youtube http:\\cursodeexcelgratis.com.br\canal

oi Rita, boa noite você fez a pergunta também no guru do excel https://gurudoexcel.com/forum/viewtopic.php?f=12&t=15010 você acabou não enviando o anexo por lá, fico no aguardo

Por nada, disponha ! é importante que você grave a planilha onde vão ficar todos os arquivos fora da pasta que você vai fazer o looping, para não abrir ela mesma. Aproveite para acessar e assinar meu novo canal no youtube http:\\cursodeexcelgratis.com.br\canal

hola Rodrigo, fiz o passo a passo no video, pena que meu mic quebrou e o som está péssimo, espero que de pra entender e que seja isto que você precisava, qualquer coisa pode me falar

Estimado, segue a planilha abaixo http://cursodeexcelgratis.com.br/arquivos/juntarplanilhasumaso.xlsm gravei um video para postar no youtube com o passo a passo, mas o audio ficou horrivel, se eu conseguir arrumar posto mais tarde para você entender o passo a passo

obrigado pelo retorno positivo Igor e fico muito contente que tenha dado certo, lamentavelmente o som do video ficou péssimo, acho que foi ontem quando sai da mesa e esqueci de tirar o mic da lapela KKKK Aproveite para acessar e assinar meu novo canal no youtube http:\\cursodeexcelgratis.com.br\canal

oi, acabei de finalizar a planilha e o video explicando como fazer uma pena que o audio ficou uma porcaria 😞 na descrição do video tem o link para baixar a planilha também espero ter ajudado e se der qualquer problema me avisa .

mandei no lugar errado ... , não sei como excluir ...

Obrigado Rodrigo pelos detalhes, da pra fazer uma macro assim sem problemas, vou montar ela hoje a noite e te mando por aqui.