Dante Amor

Dante Amor

https://www.youtube.com/@CursosDeExcelyMacros
 5.752K puntos  Ciudad de México, México @aprendemos desde - visto
Preguntar

Respuestas en Visual Basic

Respuesta en y en 1 temas más a

¿Verificar si la celdas están vacías para guardar?

¿Cómo se llama la hoja origen donde están los datos? ¿Cómo se llama la hoja destino donde se van a guardar los datos? ¿Cuáles celdas se van a verificar? ¿Y en cuáles celdas se van a guardar?
Respuesta en y en 1 temas más a

Buscar y seleccionar una fila de un ListBox según valor de un TextBox

Te anexo el código: Private Sub CommandButton1_Click() 'Por.Dante Amor If TextBox1 = "" Then MsgBox "Captura un dato en el textbox" TextBox1.SetFocus Exit Sub End If If ListBox1.ListCount = 0 Then MsgBox "No hay datos en el listbox" TextBox1.SetFocus...
Respuesta en y en 2 temas más a

Macro que copie un rango de datos de varios archivos, con una hoja en común y en la columna siguiente el nombre de los archivos.

Envíame 3 archivos, el archivo con la macro y 2 archivos más que contienen el rango a extraer, me explicas cuál es el problema. Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “robert farfan” y el título de esta pregunta.
Respuesta en y en 2 temas más a

Exportar rango de celdas a libros del mismo directorio en hoja oculta

Te anexo la macro. De igual forma revisa que los espacios en las instrucciones de la macro estén correctos Sub Copiar_Rango() '--- ' Por.Dante Amor '--- Application.ScreenUpdating = False Application.DisplayAlerts = False Set l1 = ThisWorkbook Set h1...
Respuesta en y en 2 temas más a

Copiar rangos de celdas de archivos de una carpeta

H o l a: Vamos a resolver una petición por pregunta. Pon la siguiente macro en tu libro "Overworkmaster", crea en este libro una hoja llamada "destino", en esta hoja se pegará la información. Guarda tu libro en la misma carpeta donde tienes tus...
Respuesta en y en 2 temas más a

¿Cómo hacer una macro que sume los totales de 2 textbox en un tercer textbox?

Prueba con lo siguiente: If TextBox1.Value <> "" Then t1 = CDbl(TextBox1.Value) Else t1 = 0 End If If TextBox2.Value <> "" Then t2 = CDbl(TextBox2.Value) Else t2 = 0 End If TextBox3 = Format(t1 + t2, "$#,##0.00;-$#,##0.00") 'S aludos. Dante Amor....
Respuesta en y en 1 temas más a

¿Error en Combo Box y filtrado?

H o la: Envíame tu archivo con el userform y varios datos de ejemplo en la hoja. También me envías otro archivo de ejemplo, como si hubieras generado la información de Enero. Me dices qué nombre deberá llevar el archivo cada vez que presiones el...
Respuesta en y en 2 temas más a

Comprobar la existencia de un valor dentro de un rango, y si existe, ejecutar una macro

Te anexo el código para tu botón del userform Puedes ejecutar la macro desde la hoja "inicio", la macro no se cambia de hoja. También actualiza en la macro los nombres de las hojas, por los nombres reales de tus hojas, en esta parte: Set h1 =...
Respuesta en y en 2 temas más a

Macro para recorrer una lista en Excel automáticamente

Te anexo la macro Sub Recorrer_Lista() 'Por.Dante Amor For i = 3 To 24 Sheets("Seguimiento").Range("D1") = Sheets("Datos").Cells(i, "J") Call OtraMacro Next MsgBox "Fin" End Sub Cambia OtraMacro por el nombre de la macro que quieras ejecutar. 'S...
Respuesta en y en 2 temas más a

¿Cómo separar en Excel texto en varias filas cuando una cadena de texto se repite varias veces dentro de una misma celda?

H o l a: Te anexo la macro para lo siguiente: 1. Separar el texto en caso de que en la C1 venga más de una vez "Univ Andres Bello" 2. Poner en negrita solamente lo que corresponde a esa línea, ya lo verás en el archivo que te envié. Si requieres más...