Oscar Saldaña

El valor debe ser convertido a objeto Ejemp. Xtxt=me.textbox1.objet

¿Se puede repetir el examen a alguna en la siguiente o siguientes semana?

Crear 2 variables y darles la columna y la fila empezas="A20" terminar="A115" xrango=empezar & ":" & terminar =SUMAR.SI(xrango ">0")

Se puede poner una condición que haga que salga del sub sin hacer nada mientras el textbox no sea numérico... Private Sub TextBox2_Change() if not isnumeric(textbox2) then Exit sub ' si no es numérico sale sin hacer nada Dim can As Integer Dim subt...

Todo se puede, pero si me detallas o me mandas un ejemplo, por que puedes hacer una pequeña base conde con buscarv o elegir devuelta lo que quieres a través de una Macro.

Podría ser solo una mascara "A" al numero en si, para convertirlo en personalizado el formato Pero que siga teniendo función de Número ejemp. Sumas etc. Selection.NumberFormat = """A""General"

Debes usar esta Macro en la Hoja activa, escribes y luego la seleccionas para que haga la función de corrección de altura, espero te sirva... Saludos. Private Sub Worksheet_SelectionChange(ByVal Target As Range) ActiveCell().RowHeight = 90 End Sub

desde Cd Guadalupe Nuevo León Prueba ésto a ver si es la idea ten envío de la imagen de la hoja y la del código del VBA

Solo Pega ésta fórmula Donde B1 sería la celda donde se encuentra la cadena a Analizar. =Extrae(B1, 1, Encontrar(" ", Sustituir(B1," "," ",(Largo(B1)-Largo(Sustituir(B1, " ","")))/Largo(" "))))

Debes tener Seleccionada la 1era columna, y luego con el Activecell(1,1) = textobx1 ir Actualizando en cada Columna con los Labele o Combobox, Textbox etc es así Activecell(Row, Column) el 1,1 es la columna donde esta posicionado el cursor.