Error 1004 en tiempo de ejecución: Error en el método Subtotal de la clase Range.

Preguntas y respuestas relacionadas

Exportar consulta Access con parámetros a Excel

Estoy tratando de exporta una consuta a excel con formato y no ejecuta la consulta Public Sub exportar() Dim AppExcel As Object, rst As DAO.Recordset, SQL As String, Y As Long, A As Long On Error GoTo ManipularError SQL = SELECT...
2 respuestas

Macro para Imprimir Hojas según Condición

Alguien me puede ayudar a desarrollar una macro en excel para que me pueda imprimir solo algunas hojas solo si cumplen algunas condiciones. Les explico tengo un archivo excel con 21 Hojas, en la Hoja 1 hay una lista basada en nombres, montos ($) y...
1 respuesta

Excel con Delphi

Me gustaría crear un fichero excel a partir de una consulta de Delphi. ¿Cómo puedo hacerlo? También creo que hay un tipo de reports que pueden guardarse como ficheros de excel. ¿Sabes cómo?
1 respuesta

Macro para asignar valor de una celda a un textbox

Estuve tratando de implementar el siguiente código para poder asociar el valor de una celda de Excel a un texbox sencillo que tengo en una prueba:Private SubUserForm_Activate() Sheets("Hoja1"). Select 'Activas la hoja donde están los datos TextBox1....
1 respuesta

Comportamiento irregular de una macro dentro de un formulario

Mi consulta trata de encontrar una macro que actualice los nombres de los clientes en la hoja Pedidos, cuando se modifican en la hoja Clientes. En la pregunta realizada anteriormente “Actualizar datos de una hoja a otra”, la rutina propuesta funciona...
2 respuestas

Bucle condicional según celdas vacías o llenas (VBA)

Os cuento, en la celda A2 tengo la clase y en el rango B3:B8 los nombres de los mejores alumnos. A10 otra clase, B11:B16 otros nombres. Así sucesivamente. Lo que necesito es una macro que verifique si hay alguna clase en la columna A y si es cierto,...
1 respuesta

Copiar rango de celdas a otra hoja con pegado especial (Luis Mondelo)

Encontré esta macro de Luis Mondelo que copia un rango especifico de celdas en otra hoja en la primera fila libre: Sub copiar() fila = sheets("hoja2").Range("a65000").End(xlUp).Row + 1 Range("a6:n6").Copy Destination:=Sheets("hoja2").Cells(fila, 1)...
1 respuesta

Introducir datos con Lector de Códigos de Barras en Excel

Utilizo un lector de códigos de barras para hacer inventario sobre una hoja dispuesta de la siguiente forma: Referencia en la columna A Alternativa en la columna B Cantidad en la columna C Utilizo una macro sacada de este foro la cual así una celda...
1 respuesta

Código con error "se ha producido el error '1004' en tiempo de ejecución error defino por la aplicación u objeto "

Necesito de su experiencia, soy nuevo en esto y me gustaría que me ayudaran con este tema. Tengo el siguiente código que me genera este error. El error me lo indica en el siguiente código, el cual me lo resalta en amarillo. Private Sub...
1 respuesta

Problema al exportar datos a excel

Tengo un Procedimiento para exportar Datos de VB6 a Excel. El caso es que el código me funciona en bastantes equipos pero concretamente en 2, no lo hace. Me da error en la sentencia : Set XlsApl = CreateObject("Excel.Application") -> "Error en el...
2 respuestas
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas del tema