Ir ao conteúdo
  • Cadastre-se

Parreira16

Membro Júnior
  • Posts

    1
  • Cadastrado em

  • Última visita

Tudo que Parreira16 postou

  1. Primeiramente peço desculpa por re-abrir este topico, vou dar uma dica para os que pesquisarem neste topico e tentar descobrir como proceder. Eu apenas coloquei uma variavel no commandbutton1 com nome data e alterei o valor da igualdade da .Cells(3, 5).Value = UserForm1.TextBox5.Value, conforme abaixo: Private Sub CommandButton1_Click() [B]Dim Data As Date Data = UserForm1.TextBox5.Value[/B] With Worksheets("Registros") .Cells(3, 5).Value = [B]Data[/B][COLOR="Green"] 'substitui o UserForm1.TextBox5.Value por Data[/COLOR] .Cells(3, 6).Value = UserForm1.TextBox4.Value End With End Sub

Sobre o Clube do Hardware

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

×
×
  • Criar novo...

Ebook grátis: Aprenda a ler resistores e capacitores!

EBOOK GRÁTIS!

CLIQUE AQUI E BAIXE AGORA MESMO!