R0DR1G0_CWB

Olá você pode chamar esses comandos na hora que você quer ativar ou desativar o botão... Sub desativarBotao() Plan1.CommandButton1.Enabled = False ' Plan1.NOME DO SEU BOTAO.Enabled = False End Sub Sub ativarBotao() Plan1.CommandButton1.Enabled = True ' Plan1.NOME DO SEU BOTAO.Enabled = True End Sub

A solução praticamente já esta na tabela... Você pode usar a função CONT.SES... =CONT.SES(Geral!$B:$B;">="&Relatório!P3;Geral!$B:$B;"<="&Relatório!Q3) Absenteísmo TESTE.xls

Olá, essa lentidão pode ser normal dependendo do tamanho da base. Leia esse artigo e veja se te ajuda.

Olá, já tentou usar a tabela dinâmica? você resolve facilmente esse dilema com a Contagem Distinta. Veja o exemplo: Modelo Solução.xlsx É só você adaptar para sua necessidade...

Bom dia, Sem a planilha em anexo fica difícil te ajudar...mas tente algo assim. =PROCV(C11 ; 'Banco de Dados'!aqui vai sua matriz ; aqui o número da coluna que está o resultado esperado ; 0) Clique aqui e aprenda mais sobre essa função.

@Fortd2 Precisa ser necessária mente o Enter? Você pode facilmente criar um atalho com Ctrl+"alguma tecla a sua escolha".

@Ileusis LUNA ARAUJO E SILV Boa tarde, Veja se esse arquivo ( Ficha de produção.zip ) resolve seu problema. Este modelo está em VBA, você não precisa digitar nada na planilha. Clique em Visualizar Impressão para conferir o que será impresso. Ao clicar em imprimir, você deverá informar a quantidade de folhas ou páginas que serão impressas. Quando tiver tudo enviado para a impressora você terá a confirmação na tela. *Obs.: Não fiz os devidos testes, sugiro você testar com 2 páginas ou mais para verificar se terá os resultado esperado. Essa foi a solução que consegui elaborar para seu problema, não sei se alguém aqui tem algo melhor em mente.

Olá, veja se entendi o que você precisa... Dúvida....xlsx

e isso é um empecilho? os dois q sugeri vem com 1 inclusa e os devidos encaixes ou espaços para a instalação das outras... se você quer um pronto, sugiro ir direto na loja e solicite da forma exata que você quer.

Tem alguns pela web. Mas de uma olhada nesses aqui... https://www.cissamagazine.com.br/gabinete-gamer-aerocool-mid-tower-aero-500-window-en55576-preto?utm_source=google&utm_medium=Shopping&utm_campaign=gabinete-gamer-aerocool-mid-tower-aero-500-window-en55576-preto&inStock&gclid=EAIaIQobChMI7OLkn8Ok3AIVD1gNCh1U3QCtEAQYAyABEgINw_D_BwE https://www.kabum.com.br/produto/91478/gabinete-gamer-aerocool-mid-tower-gt-window-en58683-preto?origem=52&gclid=EAIaIQobChMI7OLkn8Ok3AIVD1gNCh1U3QCtEAQYESABEgKhfvD_BwE

Agora sim entendi rsss.... Acredito que não seja possível no MySQL, mas o comando para essa ação seria o PIVOT, que faz as linhas se transformarem em colunas. Uma solução seria a combinação de CASE e SUM... ou por meio de uma estrutura de IF. adicionado 18 minutos depois Nossa, hj minha cabeça está travada, eu juro que li você perguntando de como você fazer isso no MySQL. Segue um artigo para seu problema, mas agora sim no PostgreSQL... https://danielteofilo.wordpress.com/2015/05/21/transformando-linhas-em-colunas-no-postgres/ *Desculpe a desatenção...

@bnmatrix UTF8 funciona, porém pode ser usado também p Latin1. /*** "método" UTF-8: ***/ Collation do banco: utf8_general_ci Charset da página: utf-8 /*** "método" Latin1: ***/ Collation do banco: latin1_general_ci Charset da página: iso-8859-1 Mas nada melhor que as baterias de testes antes, durante e após qualquer desenvolvimento.

@ma8926167 Confesso que não entendi... você quer ordenar por mês?

@JorgeSouza Certifique-se que todos os e-mails estão corretos, ou então a separação desses e-mails com o ponto e vírgula ";".

Boa tarde, @Roberto Lucena Segue modelo aproveitando a dica do @CasaDoHardware . Modelo restrição de exibição - Rodrigo.zip

@Roberto Lucena Veja esse exemplo, que fiz em um formato básico... Modelo restrição de exibição - Rodrigo.zip Note que ao digitar a senha na caixa de mensagem irá aparecer a senha digitada. Existe uma forma de converter para o asterisco, porém não me lembro como se faz e estou sem tempo para pesquisar, se quiser vejo isso para você na segunda. Ao clicar no botão a senha atual está como "teste". Para trocar mude para a senha desejada no código: If xPass = "teste" Then ***Obs.: sempre entre aspas duplas... 1º pressione > Alt+F11 2º de um duplo clique no nome do arquivo conforme imagem: Nessa etapa vai pedir outra senha que é "testevba". 3º duplo clique em módulo1, que irá aparecer o código a direita:

Bom dia, Uma forma de restringir o acesso é configurar uma senha de acesso a essa planilha pelo VBA. Via código, você pode simplesmente ocultar/exibir essas planilhas restritas pelo código: Exemplo: Sub Oculta() Worksheets(2).Visible = xlSheetVeryHidden Sheets(2).Protect Password:=”xxxx”, UserInterfaceOnly:=True End Sub Sub Mostra() Worksheets(2).Visible = xlSheetVisible Sheets(2).Protect Password:=”xxxx”, UserInterfaceOnly:=True End Sub Porém é muito importante que você crie uma senha também para a edição do VBA.

Bom dia, Isso acontece pois nas células de 2017 você tem fórmulas de soma, e sempre que os dados forem atualizados, o cálculos são processados e com isso você terá um novo resultado. Nas áreas que você pretende "congelar" a informação, sugiro que simplesmente remova essas fórmulas e mantenha o valor correto. Para isso você seleciona as células que quer manter os valores, faz a cópia (Ctrl+C) e cola como valores exatamente no mesmo local aproveitando a seleção. Se tiver dívida de como colar, veja a imagem abaixo.

Segue... Modelo - inicio Rodrigo.zip Lembre que não pude concluir... vou ver isso mais tarde caso o arquivo do Márcio não lhe atenda. modelo.zip

@ewpreis Comecei a fazer uma versão do arquivo para você, mas não vou ter tempo de terminar hoje pois tenho um compromisso agora. Segue prévia do arquivo com código incompleto porém funcional para ir te ajudando ter as idéias... Modelo - inicio Rodrigo.rar

Olá, a situação apresentada está bem clara, agora poste uma planilha com dados fictícios exemplificando sua situação. Só assim conseguiremos te ajudar.

@manoelmr1984 Bom dia! Já passei por uma situação semelhante, e resolvi usando a biblioteca do Microsoft Internet Controls. No código exemplificado, você traz a informação integral da tabela da página, e acredito que deve deverá especificar o que você busca no código. Exemplo, para cada linha da tabla captura o valor das células e atribui nas variáveis: For Each linha In tabela.all.tags("tr") var0 = linha.all.tags("td")(0).innertext var1 = linha.all.tags("td")(1).innertext var2 = linha.all.tags("td")(2).innertext Next No caso do cartão, tente algo assim: For Each i In ie.Document.body.getElementsByTagName("span") If i.className = "ico aa-icon-YC" Then xCor = i.color End If Next i Observe que para o cartão, não é aplicado algum texto, apenas pintado o fundo do span pelo CSS, não me lembro exatamente qual o atributo para isso, no código exemplifiquei com i.color.

Bom dia... @CasaDoHardware Não se acostumou ainda com dúvidas sem exemplos? @ewpreis Imagens não ajuda muito, uma frase que já foi citado em outros post se aplica a essa situação. "Você precisa ajudar a ser ajudado" Poste uma amostra da sua planilha para que os apoiadores possam saber todos os cenários possíveis e incluir na lógica que deverá ser aplicada no VBA, monte com dados fictícios mesmo, pois 99% dos membros que apoiam na solução dos problemas não perdem tempo montando as planilhas do zero.

Bom dia, Sua fórmula não está funcionando pois nos nomes contidos nas células da coluna AB estão com espaços em branco após o texto. Antes de concluir a fórmula você precisa tratar essa coluna. Analise Mix - EXEMPLO.xlsx

Isso aconteceu porque no seu primeiro modelo eram chaves únicas... nem me atentei em rever o novo arquivo... Agora como não é único e foi utilizado a formula de somar, ele somou todos os casos com a mesma Chave...