[Resolvido] Utilizando Botão de Opções Excel

brunofeliped disse:

Saudações pessoal.

To bolando um esquema de cadastro para um parceiro meu e gostaria da colaboração do fórum para que eu consiga algumas funções novas.

A principio começei a montar o arquivo (que consta em anexo), nesse caso o funcional está somente 2 TextBox.

Nesse caso específico o que eu precisaria.

Ao preencher o cadastro eu precisaria selecionar uma das tres opções abaixo (manhã / tarde / noite), que corresponde a uma disponibilidade.
Na planilha CAD eu disponibilizei 3 colunas (uma correspondente para cada).

Gostaria de que ao inserir os dados de cadastro, quando eu determinasse qual seria a disponibilidade, ele fizesse uma marcação na coluna correspondente.

Será que dá pra fazer ?

Abraços

Bruno

Private Sub CommandButton1_Click()

Sheets("CAD&quot.Select

Range("A65000&quot.End(xlUp).Offset(1, 0).Select

ActiveCell.Value = Me.TextBox1.Value

ActiveCell.Offset(0, 1).Value = Me.TextBox2.Value

    If Me.OptionButton1.Value = True Then

        ActiveCell.Offset(0, 2).Value = "X"

    End If

    If Me.OptionButton2.Value = True Then

        ActiveCell.Offset(0, 3).Value = "X"

    End If

    If Me.OptionButton3.Value = True Then

        ActiveCell.Offset(0, 4).Value = "X"

    End If

    

Me.TextBox1 = Empty

Me.TextBox2 = Empty

Me.OptionButton1.Value = False

Me.OptionButton2.Value = False

Me.OptionButton3.Value = False

Me.TextBox1.SetFocus

End Sub

brunofeliped disse:

Era exatamente isso que eu estava precisando, mais uma vez o Coloniz@dor colaborando muito.

Mais uma pergunta, que na verdade eu até esqueci de colocar a princípio no tópico.

Ao longo desse fomulário preciso incluir uma coluna, na qual será registrada data/hora do cadastro.

Existe alguma forma de ao clicar confirmando o cadastro e lançar em uma célula a data/hora atual de sistema ?

Fiz com TextBox, mas acho que como automático ficaria mais prático.

Abraços

brunofeliped disse:

Coloniz@dor consegui resolver usando:
ActiveCell.value = now

Abraços e muito obrigado