Ir ao conteúdo
  • Cadastre-se

Igor F.

Membros Plenos
  • Total de itens

    103
  • Registro em

  • Última visita

  • Qualificações

    N/D

Reputação

4

Informações gerais

  • Cidade e Estado
    Ipatinga/MG
  • Sexo
    Masculino

Meu PC

  • Processador
    i3 7100
  • Placa-mãe
    GA-H110M-H
  • Memória
    Ballistix 8GB 2400Mhz
  • SSDs
    Kingston A400 240GB
  • Gabinete
    PCYes! Black Bear
  • Fonte
    Corsair CX450
  • Mouse
    Redragon Chroma Cobra M711
  • Teclado
    Alfawise V1
  • Headset
    Corsair HS40 Raptor
  • Monitor
    AOC/SAMSUNG
  • Sistema Operacional
    WIN10

Meu Smartphone

  • Marca e modelo
    IPHONE 6S 32GB
  1. Na primeira dúvida sem macro não funciona do jeito exato. Mas você pode fazer o seguinte, em hyperlink na hora selecionar a célula de destino coloque A19:G36. Depende de onde vai parar com o scroll do mouse, se parar mais em baixo vai ficar do jeito que quer, mas se para em cima vai ficar igual a imagem acima mostra. Caso queira faça o mesmo com o restante. ---------------- Segunda dúvida: =SE(E3<6;=Funcionarios!B3 ;"") E assim por diante... Obs.: Lembrando que essa fórmula só irá retornar os valores (1, 2, 3, 4 e 5) por serem menor que 6. Caso queira que o 6 entre na fórmula coloque <=
  2. Veja se ficou do jeito que queria: Importe o formulário: ALT + F11 Botão direito em "Formulários" Importar arquivo Selecione o arquivo "saveas10".frx (extraido) Adicione para abrir automaticamente o form quando abrir a planilha: ALT + F11 Microsoft Excel Objetos EstaPasta_de_trabalho Cole o código a seguir: Private Sub Workbook_Open() If Sheets("Plan2").Range("F4") = "" Then saveas10.Show End If End Sub Faça o download do arquivo .frx aqui: saveas10.rar
  3. Rapaz, pelo que entendi você quer procurar valores dentro de uma célula que tenha formula? Se for do jeito normal é só apertar CTRL + L e pesquisar, da mesma forma acha... Caso não seja isso, tente explicar melhor...
  4. Em relação a segunda dúvida se for do jeito que estou pensado é simples. Para ter os mesmo dados de uma célula em outra é só fazer o seguinte: Na célula que você deseja que os dados sejam iguais aos da outra planilha clique nela e coloque: = Clique na outra planilha, e clique na célula que deseja copiar o resultado. (Quando atualizar em uma atualiza na outra) Na prática tem que ficar assim: =Funcionarios!B3 ou ='Funcionarios 19'!B3 (Nessa fórmula possui (') pois contêm espaço, o mesmo serve para caracteres especiais) O mais recomendado no seu caso seria usar uma tabela sem cabeçalho, pois ela puxa as fórmulas automaticamente para todas as células contidas dentro dela. ----- Sobre a primeira dúvida, não entendi direito!
  5. Bom dia, fiz um esqueminha aqui para automatizar todo o processo para duplicar uma planilha. Sou aux. administrativo de uma empresa, e essa planilha tem como função declarar as receitas e despesas. Minha planilha é composta por meses: 1. JAN - 2. FEV - 3. MAR - ... Automatizei para não ter que ficar trocando nome de tabelas e outras coisas. Enfim, minha dúvida é: Fiz um form que contem uma caixa de listas com todos os meses e um botão para criar a planilha, como faço para quando executar o form, checar se uma planilha já existe? E caso ela exista, cancele toda a operação e envie uma msgbox avisando. Grato!
  6. Bom dia, estou fazendo um simples código de um sistema de login com contador de logins, porém estou tendo alguns probleminhas: 1. Quando erro da primeira vez o form trava e fecha o excel 2. Não aparece a quantidade de tentativas que ainda tenho O que eu queria: Ao logar, terei 3 tentativas, caso a pessoa erre todas, o excel fechará e salvará a planilha. Private Sub btnentrar_Click() Dim t As Integer t = 3 If Me.txtsenha = "cruzeiro2018" Then Me.Hide Sheets("MENU").Select Sheets("ACESSANDO").Visible = False Application.DisplayFullScreen = False Else If t = 0 Then t = t - 1 Me.txtsenha.Text = "" MsgBox "Senha invalida, tentativas restantes: " & t Exit Sub Else Application.DisplayAlerts = False ThisWorkbook.Save t = 3 ThisWorkbook.Close End If End If End Sub Private Sub btnentrar_Exit(ByVal Cancel As MSForms.ReturnBoolean) Application.DisplayAlerts = False ThisWorkbook.Save ThisWorkbook.Close End Sub Private Sub UserForm_Initialize() Me.txtsenha.Text = "" End Sub O que tem de errado no código?
  7. E através da própria planilha, com ou sem ajuda do vba para tal ação, facilitaria?
  8. Boa tarde, estou montando uma tabela para facilitar meu serviço. O sistema é de apreensão de bicicletas, a minha dúvida é a seguinte: • Quero montar um esquema através do VBA tipo banco de dados, onde eu digitar o ID de acordo com o PESQUISAR POR que é composto por: () Ex.: ID: 06/12/2018 Buscar por: RECEPÇÃO ou ID: POTI Buscar por: MARCA e/ou MODELO (buscar por todos que contenha POTI na célula) • Em seguida puxar todos os dados que contenha a data 06/12/2018 na coluna RECEPÇÃO para dentro do userform: É possível? Segue a planilha: BICICLETAS.rar Grato!
  9. Resolvido! Valeu rapazeada! @Edit Não tem como puxar através da célula não? Ficaria mais fácil para o meu caso...
  10. Deu certo! kkkk É só fuçar com cautela que da certo! Valeu brother!
  11. A câmera é de 12v. Ai que ta o problema, não tem fonte, é só os fios, porque na verdade essa tela LCD é uma tela para carro, para instalar sensor de ré. Ai pensei, tem entrada para vídeo, deve funcionar kkk Pra ligar a câmera os fios vermelho e preto vai direto na energia certo? Ou posso adaptar uma fonte de celular 12v para ligar ela e a tela? (Não entendo nada disso! rs)

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas publicações 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

×