Por que se coloca como fecha ¿Al momento de modificar los registros en la macro de excel?
hola.
tengo una macro que modifica los registro capturados.
en la columna B son registros únicos y en la columna L de excel se graba la fecha del sistema automáticamente.
el problema es cuando modifico el registro, en la macro me respeta en la columna L la fecha automática del sistema pero no el de la columna B me lo coloca como tipo fecha también.
muestro el código que estoy empleando.
Private Sub CommandButton2_Click()
TextBox9.Value = Date + Time
Selection.NumberFormat = "dd/mmm/yyyy h:mm"
ActiveCell.Offset(0, 5) = (TextBox4)
ActiveCell.Offset(0, 6) = (TextBox5)
ActiveCell.Offset(0, 7) = (TextBox6)
ActiveCell.Offset(0, 8) = (TextBox7)
ActiveCell.Offset(0, 9) = (TextBox8)
ActiveCell.Offset(0, 10) = (TextBox9)
ActiveCell.Offset(0, 11) = (ComboBox4)
ActiveCell.Offset(0, 12) = (TextBox11)
ActiveCell.Offset(0, 13) = (TextBox12)
End Sub
como ven el código imprime en el textbox9 que es la columna L la fecha del sistema, pero esto también cambia en mi columna B el formato del numero a fecha.
1 respuesta
Primero le estás enviando la fecha y hora al TextBox9... a continuación le estás enviando formato a la CELDA ACTIVA... y cuál es esa celda? seguramente la de la col B.
Luego recién en la linea: ActiveCell.Offset(0, 10) = (TextBox9) estás enviando el valor del textbox a la hoja (en col 10 a partir de la celda activa)
Resumiendo, quitá la línea Selection.NumberFormat = "dd/mmm/yyyy h:mm"
Y colocala a continuación de la línea donde movés el textbox9, pero con esta instrucción:
ActiveCell.Offset(0, 10).NumberFormat = "dd/mmm/yyyy h:mm"
Sdos y no olvides finalizar la consulta.
