diego_janjao

@Edson Luiz Branco funcionou perfeitamente, Edson! Novamente nos ajudando a resolver os problemas aqui no tópico. Muito obrigado.

Boa noite a todos. Eu estou enfrentando problemas na planilha que criei para realizar sorteios da empresa durante os treinamentos (que baseiam-se no número da lista de presença). Quando eu coloco no VBA a linha WindowsMediaPlayer1.URL ThisWorkBook.Path & "\music.aac" o arquivo retorna erro... Mas quando eu vou nas propriedades do objeto WindowsMediaPlayer1 e no campo URL eu coloco o caminho exato (C:\Users\bn45323\Desktop\music.aac) ele funciona, mas eu queria com o endereço dinâmico (ThisWorkBook.Path) pois nem sempre o pessoal deixará a música no local correto. Alguém saberia como resolver? SORTEADOR_by_DiegoMarinho.zip senha de desbloqueio: diegomarinho

@andressa b. s. g. ribeiro Tente assim =SE(B4="";"";SE(K4<>"";"CONCLUÍDO";SE(H4=HOJE();"VENCE HOJE";SE(H4<HOJE();"ATRASADO";H4-HOJE() & "DIAS PARA VENCER")))) Apenas inseri o desejado na fórmula já existente.

@KaiqueS14 se eu entendi bem é isso que você procura: comparacao vendaxhora_diegojanjao.xlsx

@guigsantan4 Ter até tem, mas pra isso o melhor modo seria você enviando uma planilha de exemplo.

@guigsantan4 Apenas coloque isso no final do seu código e antes do End Sub MsgBox "Pesagem Efetuada com Sucesso", vbInformation, "Controle de Pesagem" E ficará como na imagem abaixo.

Desculpe, mas ficou mais difícil ainda de entender o que deseja. O João na planilha tem 5 números a frente dele, nesse caso o nome dele deveria ficar em vermelho?

@Patropi não fui eu quem abriu o tópico, rs. Mas acho que ele entendeu que era pra ele.

sem um arquivo fica difícil mas tente colar a seguinte fórmula na formatação condicional: =Se(cont.ses(A1:A10;"Diego")>=5;1;0) e coloque a formatação em vermelho.

@felipestoker tem, mas precisa colocar uma planilha como exemplo para o pessoal te ajudar.

@Luis F sim, A10 vai retornar o valor 10, fazendo a fórmula no final biscar a planilha com nome 10. para buscar a planilha com nome 1, teria que ser LIN(A1). Ao arrastar para baixo, ele ira distribuir as linhas da forma que tu queria... (1, 2, 3, 4, 5, etc)

@Luis F tente o seguinte: =Indireto(concatenar ("'";Lin(A10);"'!$CN$19")) Veja que a fórmula inicia em 10

Olá, segue a fórmula usada: =se(B2>635;635;B2) E aqui o arquivo com a fórmula aplicada: Arquivo Monica_diegojanjao.xlsx

@Mayckel Barroso deduzindo que seus códigos de barras sempre tenham 12 dígitos, acredito que a fórmula atenda sua necessidade. Dica, sempre que utilizar o fórum, disponibilize um arquivo com dados de acordo com sua necessidade. diegojanjao.xlsx

Eu estava tentando responder antes mas o fórum não habilitava o campo de responder. Enfim... Vá em formatação condicional, fórmulas e coloque isso: =SE(PROCV($A1;$B$1:$B$10;1;0)<>0;1;0) O que ele vai fazer: Se o procura da palavra na coluna A encontrar o valor na coluna B, ele retorna verdadeiro fazendo a célula ficar amarela. segue planilha de exemplo: diegojanjao.xlsx

Estes valores provavelmente são de B1. Só aplicar a fórmula Se nela também. Concatenar(se(A1=0;"";B1);se(A1=0;"";A1);se(A1=0;"";B1))

@BrunoM87 Tente algo assim: =concatenar(B1;Se(A1=0;"";A1);B1)

na ajuda 1 eu até sei como te ajudar: =SE($M2=MAIOR($Microsoft2:$Microsoft51;1);1;0) =SE($M2=MENOR($Microsoft2:$Microsoft51;1);1;0) Controle de Jogos_diegojanjao.xlsx Agora a parte 2 eu não entendi

@Ro_gastaldello veja se isso te ajuda Ajuda Excel_ diegojanjao.xlsx

@Vitor Souza_727234 eu coloquei um texto apenas para entender a fórmula, aí é só você escrever o que deseja em cada situação: =SE(E7="";"";SE(HOJE()-E7>365;"maior que 1 ano";SE(E(HOJE()-E7>=180;HOJE()-E7<=365);"maior que 6 meses";"OK"))) Novo(a) Planilha do Microsoft Excel_diego.xlsx

@osvaldomp funcionou perfeitamente mas por algum motivo, quando seleciono o valor da combobox ele não encontra na coluna especificada, mesmo contendo o valor nela. Caso puder dar uma olhada: GESTÃO_NÃO_CONFORMIDADES_INTERNAS_2019_rev03.zip

Pessoal, boa noite. Estou tentando popular essa combobox para depois gerar os demais dados do form mas não estão aparecendo os dados. Private Sub form_gerar_Initialize() Application.ScreenUpdating = False Sheets("GESTÃO NÃO CONFORMIDADES 2019").Select Range("AM6").Select Selection.End(xlDown).Select linForm = ActiveCell.Row rnc_txt.RowSource = "GESTÃO NÃO CONFORMIDADES 2019!AM6:AM" & linForm End Sub Segue o arquivo para melhor entendimento: Gestão de Não Conformidades Internas 2019.zip

@pcpicos sem problemas. Infelizmente eu acho que a explicação não ficou das melhores pois é um pouco complexo para colocar em palavras. No fórum há pessoas muito mais capacitadas para resolver estes problemas, mas sempre tento de alguma forma para aprender e praticar. Aqui eu mais peço ajuda do que ajudo Caso precise de mais alguma coisa e estiver a meu alcance não exite em pedir.

@paulocezarpicos é que eu quero que sejam apenas os 7 dígitos do seu horário juntando com o número gerado pelo lin. Toda data e hora são números apenas com uma formatação diferente, a minha fórmula pega seu horário e o transforma em um número e tira os 7 primeiros dígitos dele e adiciona o número gerado pelo lin: Com isso é criado um número único para que possamos organizá-los

para contabilizar células vazias utilize aspas duas vezes ""