Dante Amor

Te paso la macro: Sub ColocarFormula() With Range("A2:A99") .Formula = "=IF(B2<>"""",CONCATENATE(E2,A$1,F2),"""")" .Value = .Value 'si quieres la fórmula, quitas esta línea End With End Sub

[Hola Ana y bienvenida a TodoExpertos. Debes desproteger la hoja, modificar las celdas y volver a proteger la hoja. Puede ser así. Cambia "abc" por el password de tu hoja: Private Sub CommandButton1_Click() ActiveSheet.Unprotect "abc"...

¿Cuáles datos del listbox quieres pasar al textbox? ¿Cada línea del listbox la quieres en una línea del textbox? Si es así, entonces el textbox deberá tener la propiedad de multilínea. Y una duda más: ¿Cuál es el objetivo de pasarlos al textbox?, es...

Por ejemplo, si quieres poner la fórmula en la celda K7 Sub Macro2() Range("K7").Formula = "=TIME(HOUR(J7), MROUND(MINUTE(J7), 30), 0)" End Sub Si quieres solamente el resultado de la fórmula: Sub Macro2() With Range("K7") .Formula = "=TIME(HOUR(J7),...

Te paso la macro actualizada: Private Sub CommandButton1_Click() 'Por Dante Amor ' Dim sh As Worksheet Dim max As Long, cont As Long, lr As Long Dim Nombre As String ' Set sh = Sheets("Hoja2") '<---Nombre de tu hoja origen 'Crear palntilla de jugador...

Prueba el siguiente código. Private Sub CommandButton1_Click() With ListBox1 .AddItem .List(.ListCount - 1, 0) = TextBox1.Value .List(.ListCount - 1, 1) = TextBox2.Value .List(.ListCount - 1, 2) = TextBox3.Value End With End Sub Nota: La propiedad...

Desconozco cómo se haría para realizar todos los recibos en un solo documento de word. Revisa si lo siguiente te ayuda. Se va a generar un archivo por cada Nota de Abono. El archivo se guardará con el nombre del beneficiario. Los archivos se...

Esto es lo que sucede, en el textbox, tienes un texto, para pasarlo a la celda debes convertir el texto en fecha, para eso puedes utilizar la función CDATE( ). Utiliza lo siguiente para que en la celda te ponga 1 de mayo de 2022. O en general para...

Prueba la siguiente macro. Según tu ejemplo, la macro llena la matriz de la derecha, empezando en la celda G7 y hacia la derecha y hacia abajo. Sub CapturarNumeros() 'Por Dante Amor ' Dim c As Range Dim i As Long ' 'para cada valor en la columna B,...

Revisa si el siguiente formato en la celda para ver si es lo que necesitas: [$-80A]hh:mm:ss AM/PM Supongo que excel requiere identificar si 12:00 es de la mañana y 12:00 es de la noche. Por eso es prescindible que aparezca AM/PM . .