Dante Amor

Dante Amor

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

Respuestas en Programación

Respuesta en y en 3 temas más a

Reparar codigo de para crear base de datos

Quedaría así: Private Sub CommandButton4_Click() Set a = Sheets("history") fila a.range("A" & rows.count).end(xlup).row + 1 For i = 0 To ListBox1.ListCount - 1 a.Cells(fila, 4).Value = ListBox1.List(i, 0) 'PRODUCTO a.Cells(fila, 5).Value =...
Respuesta en y en 2 temas más a

Deseleccion y parpadeo de un Cuadro de Control ListBox

H o la Una opción es que borres la celda H2. La otra opción es que pongas el siguiente código en los evento de la hoja donde tienes el listbox Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean) celda =...
Respuesta en y en 3 temas más a

Macro que haga coincidir celdas de dos columnas distintas y copie información de las celdas iguales en otra hoja

H o l a: Haber si entendí bien. Tomo el primer dato de la columna D, de la hoja "equipos" y lo busco en la columna L de la hoja "dispbesalco", Si lo encuentro en la hoja "resumen" te pongo 4 datos: el dato buscado, El valor de la columna "M" de la...
Respuesta en y en 2 temas más a

Ocultar y mostrar columnas según el valor de la última celda de esta columna (con fórmula)

H o la: Te anexo la macro Sub Ocultar_Columnas() '--- ' Por.Dante Amor '--- Application.ScreenUpdating = False Columns("E:AI").EntireColumn.Hidden = False For i = Columns("E").Column To Columns("AI").Column If Cells(74, i) = 0 Then...
Respuesta en y en 3 temas más a

Macro para buscar un valor y devolver su "Información"(Indice y Coincidir en EXCEL

H o la: En VBA no es necesario declarar las variables, solamente en algunos casos. Por otra parte, tampoco es necesario que pases el valor del control (textbox, combobox) a una variable y luego la variable a la celda, lo puedes hacer directamente del...
Respuesta en y en 3 temas más a

Pasar un código de evento hoja a un formulario textbox

H o l a: Pon lo siguiente en tu formulario Private Sub TextBox1_Change() '--- ' Por.Dante Amor '--- Set h1 = Sheets("bd") ListBox1.Clear If TextBox1 = "" Then Exit Sub For i = 5 To h1.Range("B" & Rows.Count).End(xlUp).Row If h1.Cells(i, "B") Like "*"...
Respuesta en y en 2 temas más a

Ocultar filas de Excel según valor de lista

H o l a: Según tu ejemplo tienes 3 condiciones para ocultar o mostrar filas, las condiciones son de las celdas N1, R3 y Z5 Si cambias cualquiera de esas 3 celdas, supongo entonces, que se van a ocultar y mostrar ciertas filas. Te anexo unos ejemplos...
Respuesta en y en 1 temas más a

Macro para identificar cedas en blanco de un rango

H o l a: No tengo solver, así que no puedo probar los resultados de solver, pero voy a modificar las líneas de tu macro para que vayan tomando la dirección de la celda. Según tu ejemplo en la columna E tienes un periodo y esa columna sí tiene datos....
Respuesta en y en 2 temas más a

Macro para Unir varios archivos excel

H o la: envíame 3 archivos de excel. Los archivos 1 y 2 que sean dos de los archivos que se tienen que unir. En el archivo 3 me pones cómo uniste esos 2 archivos. Supongo que los archivos a unir están todos en la misma carpeta. Mi correo...
Respuesta en y en 2 temas más a

Macro para generar archivos con pie de página

Para hacer la macro, me faltan varios datos. En cuál celda vas a poner el número de caja, ¿entonces la macro leerá ese número de caja y solamente generará los archivos que correspondan a ese número de caja?¿Qué datos se deben pasar de la hoja "Hoja1"...