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

Preguntas y respuestas relacionadas

Ocultar pestañas con subformularios si no tienen datos

Tengo un subformulario dentro de una pestaña de un formulario. Si no hay datos en el subformulario este no se ve, y mi intención es que también se oculte la pestaña del subformulario cuando esto ocurra. Lo he puesto con esto: Private Sub...
2 respuestas

Me gustaría simplificar esta macro

Esta es la macro: Sub BorrarMiaSeleccion() Call BorrarDesbloqueadas Call Borrar1 Call finalizar_las_macros_así End Sub Y esto depende de : Sub BorrarDesbloqueadas() ActiveSheet.Protect Password:="1" Dim r As Range For Each r In Selection If r.Locked...
1 respuesta

Operaciones con textbox

En un formulario tengo un label y 2 textbox, en el Label aparece la cantidad de días del mes seleccionado con un combobox(ej, Diciembre = 31 días) este dato servirá para restar con los datos que le ingreso al textbox1, de tal manera que el valor que...
1 respuesta

Limpiar ComboBox con VBA

Tengo un proyecto en excel 2010 con algo de VBA donde en determinada hoja lleno celdas con datos simulando un formulario, un dato especifico de esa serie se debe seleccionar de un ComboBox, una vez llenas todas las celdas ejecuto una macro que copia...
1 respuesta

Copiar datos de otra hoja excel

Primeramente agradecerles por sus apoyos a los novatos como nosotros: Quiero crear dos macros con las siguientes indicaciones: Macro1. Que me permita crear una nueva, ponerle un nombre (textbox1) y cuando le doy al botón de crear, me cree la nueva...
1 respuesta

VBA Formulario Captura de datos

Estoy haciendo un formulario a la MALA 'no se mucho de programación' El trabajo de formulario es captar quien hace una tarea y en que fecha + saber si entrego el documento Tengo un tema En mi formulario tengo muchos Textbox mas de 30 Unos llevan...
1 respuesta

Calificador no valido, al usar .contains en un if

Tengo un formulario que tiene varios campos pero uno es un campo multivalor que se llama ASEFURAMIENTOD y quisiera que cuando el usuario seleccionara una o varias opciones se mostraran los subformularios que corresponden a la elección (los sub...
1 respuesta

Cambiar el color a un cuadro de texto

Tengo un informe y en un cuadro de texto coloco un numero que proviene de una consulta y lo que deseo es que si es menor a cero que el número me lo coloque en rojo, si es mayor a cero en negritas y si es igual a cero que me coloque una diagonal. Todo...
9 respuestas

Como utilizar funcion Split VB

La verdad soy nuevo en la creación de macros, he estado revisando algunos ejemplos de la función split pero cada vez que intento crear una macro al compilar me arroja el mensaje "No se ha definido SUB o Function", la pequeña rutina de ejemplo la...
1 respuesta

Mejora en impresión por medio de macro

Tengo este macro Private Sub imprimir() Application.ScreenUpdating = False Sheets("IMPRESION").Select Range("A:G" & j).Select Selection.PrintOut Copies:=1 Sheets("JUGADOS").Select Application.ScreenUpdating = True End Sub pero quiero que cuando...
1 respuesta
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas del tema