¿Cómo evito que me salgan mensajes de error en una macro utilizando Visual Basic?

Preguntas y respuestas relacionadas

Error en el método Range de objeto _Global

Tengo el siguiente codigo: Private Sub ComboBox2_Click() Dim ApNom As String Dim idBusca As String Dim fila As Integer Application.ScreenUpdating = False Sheets("DATOS").Select fila = 0 ApNom = ComboBox2 Do While idBusca <> ApNom fila = fila + 1...
2 respuestas

Ordena una tabla de datos mediante una macro

Tengo una tabla de la columna B a la BC Y de la fila 12 a la 61. En la columna BB, se van a generar una serie de datos, en porcentaje, Lo que yo necesito que haga la macro es que me ordene todo en base a esa columna. El archivo es de "Priorización de...
1 respuesta

Rango a ordenar con macro

Tengo el siguiente código: Private Sub ORAZ() Sheets("Hoja 1").Select A = InputBox("INGRESA LA LETRA DE LA COLUMNA QUE QUIERES ORDENAR", "ORDENAR A/Z", , 500, 500) ActiveSheet.Unprotect "ábrete" ActiveWorkbook.Worksheets("Hoja...
1 respuesta

Crear código vba para guardar datos

Tengo este código para grabar los datos de un formulario, en una tabla en Access Pero al ejecutarlo solo me guarda el primer registro 2 veces, ¿Cuál sera el error? Lo que quiero es que me coja todos los registros que hallan en el formulario y me los...
1 respuesta

Mostrar Imagen en un Formulario al buscar un dato

Para Elsa Matilde Tengo un formulario de Operadores en la que ellos registran datos de análisis, mi pregunta es como puedo Hacer que el botón (buscar Fecha) del formulario de búsqueda me muestre la foto del operador según la fecha ingresada en el...
1 respuesta

Seleccionar Varias hojas y copiar o mover a un nuevo libro

Necesito un código que seleccione varias hojas de un libro para mover o copiar a un libro nuevo la hojas seleccionadas, solo necesito seleccionar la varias hojas que están no estén vacías en la celda a1 de cada hoja, tengo este código pero no logro...
1 respuesta

Como soluciono el siguiente código

Dim numm As Double Dim strSQL As String If (DLookup("[Codigo]", "[TIP_COMPROBANTE]", "[codigo] = form![com_tipo]")) = False Then MsgBox "comprobante no exite" Else numm = DLookup("[Num_comp]", "TIP_COMPROBANTE", "[codigo] = form![com_tipo]")...
1 respuesta

Abrir Formulario dependiendo de no existencia registro en tabla

Vuelvo a recurrir a su ayuda... Necesito registrar datos solo una única vez en una tabla. Tengo un formulario de INICIO en blanco con temporizador que al cerrase corra un código que me permita hacer un If y donde revise dos condiciones y de acuerdo a...
2 respuestas

¿Se puede utilizar a la vez contar y filtrar por fechas?

Estoy intentando hacer una aplicación para la gestión de la biblioteca que tenemos en la empresa que trabajo. Ya la tengo avanzada y lo último que se me ha ocurrido es intentar saber que libros han sido los más leídos en un periodo determinado. He...
3 respuestas

Error en DBúsq con valor nulo

Hace poco rgsnipper me solucionó mi problema con la siguiente línea =DBúsq("Nacionalidad";"tAutores";"IdAutor=" & [Formularios]![fLibros]![IdAutor]) Me busca un valor (Nacionalidad) de otro formulario. Mi problema ahora es que me da error si no hay...
1 respuesta
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas de los temas