Dante Amor

Si entendí bien quieres copiar lo que tienes de G1:G600 a las celdas L1:¿L600? Puede ser así: Sub Copia_Rango() Range("G1:G600").Copy Range("L1") End Sub . 'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias . Avísame cualquier duda .

¿Un número puede aparecer 1 o 2 veces? O puede aparecer 1, ¿2 o más veces? Si aparece solamente 1 o 2 veces, y un número aparece 2 veces, ¿quieres qué en el listbox te aparezcan los 2 registros o solamente 1 de los 2? El mismo caso para cuando un...

Mejor te cambio la macro. En la macro reemplaza Image1 por el nombre de tu control donde quieres insertar la imagen. Private Sub CommandButtonImagen_Click() 'Por.Dante Amor With Application.FileDialog(msoFileDialogFilePicker) .Title = "Selecciona...

Te anexo la actualización Private Sub CommandButton5_Click() fichero = Application.GetOpenFilename If fichero = False Then Exit Sub tope = Range("A5").Top izq = Range("A5").Left alto = Range("A5").Height ancho = Range("A5").Width...

Al inicio de tu macro tienes esto: Option explicit Significa que tienes que declarar todas las variables que utilizas en la macro. En VBA no es necesario declarar las variables, puedes optar por borrar esa línea de tu código, o bien, declarar cada...

Te anexo una macro. Cambia estos nombres "formulario", "hoja1", "hoja2", por los nombres de tus hojas que no quieras borrar o agrega más nombres, pero siembre en minúsculas. Sub Borrar_Hojas() 'Por.Dante Amor Application.DisplayAlerts = False For i =...

Te anexo la macro, cambia "Hoja1" por el nombre de la hoja que quieras respaldar, cambia "Libro2" por el nombre del nuevo archivo Sub Respaldo_Hoja() ' ' Por.Dante Amor ' ' Application.ScreenUpdating = False Application.DisplayAlerts = False...

Te anexo la actualización Private Sub CommandButton2_Click() 'Act.Por.Dante Amor 'Nombre de los controles vcs = Array("TextBox5", "Código", "Nombre", "Apellidos", "DNI", _ "ComboBox3", "ComboBox1", "ComboBox2", "TextBox9") 'mensaje por control vtx =...

¿El envío del correo es por outlook? Envíame un correo para darte mi aplicación de envío de correos masivos. Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “Daniel Torrejon” y el título de esta pregunta.

Puedes poner un ejemplo de cómo están tus datos en la hoja "productos" y cómo quieres los datos en la hoja "consulta", es decir, pon en cuáles celdas está la información.