Dante Amor

H o l a: Envíame un correo nuevo con los archivos y la explicación. En el asunto del correo pon tu nombre de usuario: "Lauris Wing" Sal u dos

H o l a: En un correo nuevo envíame tu archivo y me explicas con ejemplos lo que tienes y lo que esperas de resultado.

H o l a: Pon lo siguiente en los eventos de tu libro Private Sub Workbook_BeforePrint(Cancel As Boolean) Call macro1 End Sub Cambia macro1 por el nombre de la macro que deseas ejecutar, la macro1 se ejecutará y después se enviará a la impresión....

H o l a: Puedes enviarme tu archivo en una hoja me pones un ejemplo de lo que tienes. En otra hoja me pones el resultado de lo que esperas que haga la macro. Explica el ejemplo con comentarios y colores. Mi correo [email protected] En el asunto del...

H o l a: Envíame tus 4 libros con algunos ejemplos. Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “Alejandro King” y el título de esta pregunta.

Te anexo las macros actualizadas para los 4 puntos Dim colTbxs As Collection 'Collection Of Custom Textboxes ' Private Sub CommandButton1_Click() 'Por.Dante Amor If tb_centro = "" Then cad = "Centro. " 'If tb_nombre = "" Then cad = cad & "Nombre. "...

H o l a: Puedes explicar con ejemplos o con imágenes lo que tienes y lo que esperas de resultado.

H o l a: Cambia esta línea H1. Range(h1. Cells(10, "a"), h1.Cells(f, c)) = ListBox1. List Por esta: h1.Range(h1.Cells(10, "a"), h1.Cells(f + 10 - 1, c)) = ListBox1.List' : ) 'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias ' : )

H o l a: Puedes poner al principio algo como esto: If TextBox1 = "" Then MsgBox "Ingresar Número de Rol", vbExclamation TextBox1.SetFocus Exit Sub End If' : ) 'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias ' : )

H o l a: Sí me llegó el archivo y te envié los siguientes comentarios: Las columnas de la hoja "Mayor" no coinciden con tu explicación. En tu explicación mencionas: " 1) Que filtre por DVENT en la columna K, de la hoja Mayor. " Pero el dato "DVENT"...