Ir para conteúdo
Fórum Script Brasil

Erik Wesley

Membros
  • Total de itens

    62
  • Registro em

  • Última visita

Sobre Erik Wesley

Últimos Visitantes

O bloco dos últimos visitantes está desativado e não está sendo visualizado por outros usuários.

Erik Wesley's Achievements

0

Reputação

  1. Se for possível poste seu arquivo, vou tentar lhe ajudar também.
  2. Erik Wesley

    Horário

    Tente explicar com mais detalhes, assim não consigo entender o que você quer.
  3. Use: Sheets("PROSPECTS").Cells(linha, "AB") = DateValue(Frm_Prosp.TxtDataAut.Value)
  4. Manda a parte do seu código que retira a data do local e cola no destino.
  5. Use o: DateValue(Variavel) ele ira resolver seus problemas de data invertida. Exemplo: Dim DataAtual as String DataAtual = "10/08/2018" ActiveCell.Value = DateValue(DataAtual)
  6. Aqui uma ótima dica: https://www.baboo.com.br/arquivo/software/desative-o-modo-protegido-no-excel/
  7. Erik Wesley

    Rows com variável

    Seu código está correto. No entanto, você colocou o seguinte trecho de forma errada: wIr.Rows("9:Linhas").EntireRow.Hidden = True O certo seria: wIr.Rows("9:" & Linhas).EntireRow.Hidden = True
  8. Hm... então é pra pegar a variável da label + 1 (Até o 30) e colocar em uma célula correspondente ao número anterior, acertei?
  9. Talvez a planilha esteja bloqueada (Como disse o Alysson), ou ele não encontrou a planilha, ou o nome da mesma está errado (Mesmo que por uma virgula - a grosso modo). Mais é bom compartilhar um exemplo, ajuda na hora de ajudar.
  10. Fiquei perdido... Até onde (Eu) entendi, você pode usar o comando "MsgBox"
×
×
  • Criar Novo...