Saludos amigos Tengo un formulario (Fmrfechas) el cual debe aparecer una vez que haga Login en el Formulario (frmlogin) introduciendo un Usuario (TxtUSUARIO) y Clave (TxtCLAVE) para lo cual tengo esta macro que me funciona muy bien hasta ahora: Private Sub CmdACEPTAR_Click() Call Module1.BotonAceptar Fmrfechas.Show End Sub Sin embargo, cuando los campos Usuario (TxtUSUARIO) y la Clave (TxtCLAVE) estan vacíos o introduzco datos erróneos al hacer click en el Botón Aceptar (CmdACEPTAR) igual me aparece el formulario. Pregunta 01: requiero me ayuden con los elementos que deberían agregársele a la macro para que sí y solo si cuando el Usuario (TxtUS…

Buenas noches, amigos he estado adaptando un macro a mis necesidades, lo que hace el macro es filtrar desde una base de datos (hoja3-RENT) en un listbox los valores coincidentes con la busqueda, pero tengo problemas para cargar el formulario porque cuando presiono el boton buscar desde la hoja factura me sale el siguiente error "se ha producido el error 13 en tiempo de ejecucion no coinciden los tipos". Por favor colaboremen con la solucion a este problema. Nota: Si paso el boton buscar a la hoja3 0 pestaña RENT en macro funciona sin problemas. Pero quisiera hacerlo funcionar desde la hoja8 o pestaña FACTURA. Borrador_1_2014_V1.1.rar

HABER SI ME EXPLICO.QUIERO FILTRAR DOS CONDICIONES (REPARTIDOR Y FECHA)PERO LOS RESULTADOS ME LOS MUESTRE EN OTRA HOJAPERO NO TENGO NI IDEA COMO EMPEZARTENGO ARCHIVO CONREPARTIDOR -CLIENTE -FECHA DE SURTIDO -CANTIDADY NECESITO QUE ME FILTRE POR REPARTIDOR Y FECHA PARA PODER PROGRAMAR EL PEDIDO:soap:

como crear una factura donde imprima y guarde de datos de la factura pero utillizando un formulario.

Hola a todos! tengo esta macro: Sub loco() Dim CompareRange As Variant, x As Variant, y As Variant, contador As Double Dim RANGES As Range Set CompareRange = Sheets("PRECIOS").Range("B1:B1000") Set RANGES = Sheets("COMPRAS").Range("B1:B1000") Application.ScreenUpdating = False Sheets("PRECIOS").Select Range("A1").FormulaLocal = "=CONTARA(B1:B1000)" For Each x In RANGES For Each y In CompareRange If x = y Then contador = 1 Next y If contador = 1 Then contador = 0 Else Cells(Cells(1, 1…

[info]La siguiente rutina me arroja el error:se ha producido el error '6' en tiempo de ejecucion desbordamiento[/info] tengo entendido que hay un valor declarado por fuera de rango o acumulado hasta el limite y no se cual es. me gustaria descargar todo de la memoria o descargar el valor de alguna variable para evitar el desbordamiento si es que asi se hace espero sus amables comentarios, el código funciona bien pero después de un mes de uso digamos se daña.... aqui la rutina aclaro: la base de datos va por 900 registros mas o menos hasta ahora nunca tuvo problemas simplemente arrojo el error y desde entonces no ha funcionado de nuevo Sub VERIFICADOR() D…

Buenos días para todos... Mi consulta es: Tengo un excel en donde esta conformado en la primera hoja una lista y n cantidad de hojas donde: n= personas que deben cumplir con ciertos criterios para pasar primera hoja= lista donde deben ir las personas que no cumplieron con ciertos criterios como mencione anteriormente en cada hoja se pone el nombre y cédula del individuo y se desglosa en los criterios que deben cumplir para pasar ejemplo: Experiencia certificada, realizacion de cursos etc... Cuando la persona no cumple con el requisito de terminar estudios se debe reportar en la lista (situada en la primera hoja) con su nombre y cédula... Realice una macro para que c…

bueno amigos tengo un problema que me gustaría resolver la verdad no se como hacerlo, tratare de explicarme bien quiero hacer una macro que al abrir el explorador de archivos yo vaya a una carpeta o ruta "X", pero yo quiero guardar esa ruta en una variable para después usar solo la variable, esto con el fin que estoy tratando de hacer un catalogo con imágenes, pero quiero que ese catalogo guarde un registro con nombre e imagen por lo tanto quiero haya un botón de buscar imagen, que se vea en un image y luego se guarde no se si me explique bien.

Hola Amigos: necesito un poco de ayuda con una macro de internet que adapte para trabajar con planillas en la empresa, es para dar formato al RUT que usamos en chile, la macro funciona bien, hace exactamente lo que necesito que haga, el problema se genera al limpiar la planilla para usarla nuevamente, cree un boton que ingresa los datos a una base de datos y borra el contenido de la planilla para empesar a usarla con datos nuevos... cuando uso el boton o cuando selecciono las celdas y le doy suprimir, o borrar contenido, me aparece el famoso error... "Se ha producido el error '13' en tiempo de ejecucion" y mas abajo en el cuadro pone: "no coinciden los tipos", al usar el…

Buenas tardes necesito de su apoyo con la siguiente situacion. Necesito una macro que me reconosca el mes actual para asi poder filtrar la columna "a" que esta en formato "20131001 añomesdia" a meses ateriores y elimiar los datos que esten en la columna "b", despues poderla filtrar a meses futuros y elimiar los datos que esten en la columna "c", tengo que hacer un reporte todos los dias y no quiero tener que establecer el mes manualmente en la macro. Les adjunto un ejemplo. Se los agradesco mucho de antemano. Saludos. EJEMPLO (2).zip

Hola buenos días Mi pregunta es la siguiente Lo que pasa es que soy principiante en esto de excel como desarrollador he creado mi primer proyecto el cual se insertan datos consulta y eliminar an estos en fin Lo que quiero es que al cerrar dicho proyecto también se cierre el proceso de excel Tengo un formulario "frmPrincipal" el cual tiene un boton salír # este boton al darle click cierra y guarda # Pero al dale salír cierra mi proyecto pero me voy al administrador de tareas y aun sigue en proceso *excel* Lo que quiero es que al darle click al botón salir me cierre, y también mate ese proceso de excel El código que tiene ese boton es el siguiente Private su…

Buenos días, Me gustaría saber cómo declarar una constante pública disponible en todos los módulos, tal y como aparece en la siguiente imagen: Public Const SH1_NM As String = "CONEXIONES" public Const SH1_PW As String = "***" Sin embargo, este es el mensaje de error que me aparece: He estado consultando la documentación de VBA, y dice lo siguiente: Fuente: https://docs.microsoft.com/es-es/office/vba/language/concepts/getting-started/declaring-constants Así que no entiendo por qué me da ese error, cuando en la documentación oficial e incluso en los ejemplos presentados dice claramente que admite la clase Str…

Buenas tardes, tengo desarrollado una serie de formularios de búsqueda, bajo distintos criterios buscan en la tabla excel y muestran los datos de las lineas que correspondan en un listbox. El caso es que si bien la búsqueda la realiza bien, en el listbox aparecen después muchas lineas en blanco que no tengo muy claro como quitar, si alguien pudiese echarme un cable estaría muy agradecido. Un saludo Empresas.zip

Hola: Esta es la respuesta a un hilo que no consigo encontrar. Si alguien sabe cual es, por favor que suba el archivo. Se puede gestionar cualquier nº de regalos. Las imágenes deben coincidir con el nombre del regalo de la columna A de la hoja REGALOS. El nº total de regalos debe ser siempre 72 (12 filas x 12 columnas), si hay menos, quedarán celdas en blanco, y si hay más, los regalos que excedan de 72 no se adjudicarán a ninguna celda. Saludos y perdón por las molestias. Mis documentos.rar

Hola Estimado, Saben si es posible leer una imagen desde vba excel y colocar lo que dice la imagen en una celda de excel? Encontré este ejemplo en internet, pero no me sirve, ya que alcambiar la imagen por otra, sigue poniendo el dato de la imagen anterior, https://drive.google.com/file/d/1Oah4v6U1pX0jvhGDQExKqkGhoSSRkWxS/view

Hola buenos días, Llevo un tiempo intentando realizar búsqueda en mi ListBox con varios criterios y lo que mas se asemeja a lo que necesito es un archivo que descargue de @Antoni. Mi idea inicial es poder filtrar los registros con un Combobox que me permita seleccionar el concepto que necesite (títulos de cabecera de mi tabla) y con el otro combobox realizar la búsqueda según el concepto que haya seleccionado. Eso seria lo ideal para mi pero no lo consigo de ninguna manera... Así que si no es posible realizar lo comentado antes, el código de @Antoni me podría valer. He intentado adaptarlo a mi libro pero no consigo que me funcione y no se a que se de…

Hola colegas, buenas tardes reiteradas. Vuelvo por acá, ahora para que me brinden ayuda con una alerta. Me explico: Este es el proyecto del que les comenté que mi Jefe me pidió hacer. En el FrmCombustible debo crear dos (2) alertas, UNA - Que un (1) mes antes de vencerse las tarjetas me envíe un MsgBox : "La Tarjeta " & " se vence en un mes" El Listado de tarjetas está en la Hoja5 (Auxiliares). Se debe tener en cuenta que puede estar en blanco o vacío (Empty) este campo. Yo comencé a trabajarlo, pero me "perdí", porque creo se debe generar un ciclo que recorra las tarjetas y las fechas de vencimientos y las compare con la fecha…

Buenos tardes: estoy buscando poder bloquear la impresion de un archivo de excel si una celda no tiene un valor determinado. Esto lo hago ya que estoy creando un formato el cual debe diligenciarse completo antes de imprimirse. agradezco cualquier ayuda

Hola que tal buen día a todos, antes que nada es un honor estar en este foro que es de tanta ayuda para mi y mucha gente, en esta ocación le quiero pedir si me pueden apoyar con una macro que necesito para poder filtrar 2 columnas que están en mi hoja 1, se debe de comparar la columna B y debe de empezar a comparar los datos a partir de la celda B3 y a su vez también con la columna N3, cabe mencionar que el final de cada columna es variable y en ocaciones tiene mas filas con informacion, el resultado de esta comparación se tiene que mostrar en la columna "S" y empezar a poner los datos a partir de la celda "N3", si existen resultados comparados que no se encuentran se d…

Hola buenos días: Estoy intentando crear una macro que me emule la función buscarv. En el ejemplo existen 2 celdas (año y SMI), mi idea es que si metes un año mayor de 2002, la celda de SMI me devuelva el valor encontrado en una tabla adjunta. Actualmente esta ultima celda lo calcula con la función BUSCARV, pero querria hacerlo con una macro, ya que estaría dentro de un private sub, en el caso de que cambie la celda del año, al introducir el año, me busque el dato en la tabla. Espero haberme explicado bien. Muchas gracias BUSCAR EN CELDA.xls

Feliz Navidad para toda la comunidad Despues que finalmente iba a llenar este libro con datos, se me presento un dilema (para mi). Cuando me proponia a Eliminar todo dato existente en la hoja2 ("Datos") para llenarla definitivamente, procedi a: Procedimiento: Marco el OptionBotton Eliminar, selecciono el 1º dato de la lista en el ComboBox, apreto el boton con el caption Eliminar y mi surpresa, me dice; Elija una opcion de la lista desplegable. Si selecciono el 2º de la lista Si funciona bien pero al selecconar el 1º NO. He dado vueltas al evento Private Sub Eliminar_Click() (creo ser por aqui) cambiando algunas cositas pero no he sido capaz de corrigir el fallo. Los…

Buenas tardes, acudo a ustedes los expertos por que tengo este problema y espero me puedan apoyar. Estoy usando este código: Sub SumaBilletes() Me.TextBox16 = Str(Val(Me.TextBox23.Text) + Val(Me.TextBox22.Text) + Val(Me.TextBox21.Text) + Val(Me.TextBox20.Text) + Val(Me.TextBox19.Text) + Val(Me.TextBox18.Text)) End Sub[/PHP] Pero no me suma los separadores de miles, solo me suma los valores de los textbox 23 al textbox 18 si tienes un valor de 999.99, en este si me suma los decimales y todo bien, pero si tiene un valor de 1,129.00 no me suma ese valor solo me lo suma como numero 1 o si es 2,000.00 me lo suma como numero 2. El formato que estoy usando en los textbox …

Estimados, Junto con saludar y esperando que se encuentren bien, tengo el siguiente problema, necesito traer el código que se encuentra en la columna C9 a la B9 con la extensión (Dos últimos caracteres) que se encuentra en la columna V9 siempre y cuando cumpla las condiciones que se encuentran en las columnas W9 - X9 - Y9. Adjunto archivo para su revisión donde hay una formula pero algo le falta para que cumpla las condiciones. Gracias por todo !! Juan Ignacio. CONDICION_PAYER (2).xlsx

Hola a todos, mi problema es el siguiente: Tengo un libro de excel con varias hojas y similar estructura (Abonados, Socios, Jugadores, CuerpoTécnico, Directivosycolaboradores, Patrocinadores y Honor). Lo que quiero es que los datos de las hojas "Socios, Jugadores, CuerpoTécnico, Directivosycolaboradores, Patrocinadores y Honor" (pero solo las columnas "Apellidos, Nombre, Teléfono Fijo, Teléfono Movil, Correo electrónco, Fecha nacimiento y Direccion) se copien con una macro en la hoja "Abonados", de tal forma que si tengo 100 socios, 30 jugadores, 2 técnicos, 1 directivo, 5 patrocinadores y 3 socios de honor, se me copien en la hoja de abonados ordenados por el apellido …

Hola, he buscado durante días la posibilidad de añadir un texto con formato a un texto de un comentario de celda y no he encontrado solución. Sé que se puede realizar aunque no se cómo después de ver algunos ejemplos en el siguiente enlace enlace enlace 2 El tema es que tengo múltiples celdas con comentarios incluidos y necesito incluirle una palabra concreta a los textos con diferente color en función de lo que haya realizado previamente. La macro la tengo asociada a un botón para que simplemente seleccione la celda, pulse el botón y listo, de manera que funcionase sin definir rango, sólo seleccionando la celda activa. Un ejemplo: comentario: Cliente x, código z …