Ir para conteúdo
Fórum Script Brasil

ericsilvapereira

Membros
  • Total de itens

    4
  • Registro em

  • Última visita

Tudo que ericsilvapereira postou

  1. Preciso que uma célula seja configurada para que o valor que seja ali inserido seja indicado e reconhecido apenas como ano, e outra e outra como mês. posteriormente gostaria de poder aumentar as duas com base em porcentagem, como 1/3. Ex. ano: 3 mês: 6 Aumento 1/3 Total: 4 a e 8 m Não consigo configurar a célula para que reconheça o ano como ano e não como número ou texto ou como dia/mes/1900. O grande problema é que número é 10 e ano é 12.
  2. alguém sabe como ocultar este display quando a planilha não consegue puxar os dados da internet? Gostaria apenas que desconsiderasse a ação de baixar se esta não fosse possível sem aviso.
  3. Sub Geral() Sheets("Boletim de Ocorrência").Select If H30 <= 11 Then Sheets("Estatística").Select Range("BA5:BH5").Select Selection.ClearContents Range("BA5").Select ActiveCell.FormulaR1C1 = "X" If 12 >= H30 <= 17 Then Sheets("Estatística").Select Range("BA5:BH5").Select Selection.ClearContents Range("BB5").Select ActiveCell.FormulaR1C1 = "X" If 18 >= H30 <= 24 Then Sheets("Estatística").Select Range("BA5:BH5").Select Selection.ClearContents Range("BC5").Select ActiveCell.FormulaR1C1 = "X" If 25 >= H30 <= 29 Then Sheets("Estatística").Select Range("BA5:BH5").Select Selection.ClearContents Range("BD5").Select ActiveCell.FormulaR1C1 = "X" If 30 >= H30 <= 34 Then Sheets("Estatística").Select Range("BA5:BH5").Select Selection.ClearContents Range("BE5").Select ActiveCell.FormulaR1C1 = "X" If 35 >= H30 <= 64 Then Sheets("Estatística").Select Range("BA5:BH5").Select Selection.ClearContents Range("BB5").Select ActiveCell.FormulaR1C1 = "X" If H30 >= 65 Then Sheets("Estatística").Select Range("BA5:BH5").Select Selection.ClearContents Range("BB5").Select ActiveCell.FormulaR1C1 = "X" Else Sheets("Estatística").Select Range("BA5:BH5").Select Selection.ClearContents Range("BH5").Select ActiveCell.FormulaR1C1 = "X" End If End If End If End If End If End If End If End Sub
  4. Bom, office 2007 - excel Criei um formulário multiaba onde na primeira se encontra para o acesso ao programa (local para se digitar a senha), na segunda a inserção de dados e na terceira a pesquisa. Ocorre que gostaria de deixar apenas a primeira aba (a que contem o campo para senha)habilitada até que a senha, se digitada correta, liberasse o acesso as demais abas. Podem as demais abas ficarem ocultas ou bloqueadas até que a senha seja corretamente digitada. Abaixo tem o código que fiz, mas preciso saber como bloquear/ocultar as demais abas para que possa concluir o código e liberar o acesso. Grato! Private Sub TextBoxsenha_Change() If TextBoxsenha <> "1" Then Application.Quit 'Senha para utilização End Sub
×
×
  • Criar Novo...