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 tardes a todos. Pretendo implementar un formulario el cual lo dibujé en el archivo adjunto para darme a entender (espero que así sea) cuenta con un BD y 1 catalogo de Status. En el archivo adjunto describo el requerimiento. Gracias anticipadas por su atención. Formulario v01.xlsx

Private Sub Worksheet_Change(ByVal Target As Range) Dim KeyCells As Range Dim rumbo As String If Application.Intersect(Target, Range("E4")) Is Nothing Then Exit Sub Else Set KeyCells = Range("E4") Azi = KeyCells If (Azi >= 0 And Azi <= 20) Then rumbo = "nn" ElseIf (Azi >= 21 And Azi <= 69) Then rumbo = "ne" ElseIf (Azi >= 70 And Azi <= 110) Then rumbo = "ee" ElseIf (Azi >= 111 And Azi <= 159) Then rumbo = "se" ElseIf (Azi >= 160 And Azi <= 200) Then rumbo = "ss" ElseI…

Hola! Qué tal? Estoy intenando hacer una mini base de datos en Excel para mi trabajo (Debe ser en Excel si o si y el libro se usará para compartir) Quiero aclarar que soy principiante en tema de VBA y me manejo un poco con Macros pero no es mi fuerte, estoy aprendiendo. Solo necesito un formulario para ingresar datos (Lo cual hice un invento para que funcione ya que no puedo utilizar Tablas y luego compartir el libro) pero se me está complicando la parte donde debo buscar a los pacientes para luego agregar información, les dejo el archivo para ver si me pueden tirar unas ideas. La idea del proyecto es la siguiente: Trabajo en un Consultorio Médico que tiene su parte de Od…

Hola y buenos días a todos; A ver si me podéis orientar un poco. Tengo una tabla donde se almacenan los datos de ventas por vendedor y necesito saber si dicho vendedor anualmente ha pasado de los 1000,55€ , si ese fuese el caso entonces sumar las ventas trimestre a trimestre y el resultado anotarlo en la hoja "Resultado". Los parámetros de fecha y tope de ventas serán introducidos desde un Formulario. He confeccionado una macro a modo de ejemplo. Saludos. MVentas.xlsm

Hola a Tod@s, Necesito de su ayuda para saber como logro visualizar el Numero de Linea donde esta el cursor en el Editor de VBA Excel, ya que el proyecto ya se hizo un poco largo y para pasar de un lado a otro y regresar me cuesta trabajo identificar la linea en la cual estaba. Ya Googlie y Webie y nada. De antemano mil gracias. Saludos.

Hola, gracias por siquiera leerlo. A ver si consigo seguir, que me estoy volviendo loco. Aunque parece una simple fórmula, es algo más complicado, creo. version 2013 España A grandes rasgos (especifico en el archivo), necesito separar el coste de un trabajador por centro de trabajo dependiendo de las ventas del centro, sabiendo que hay trabajadores que trabajan en varios centros y que quede de tal forma (separado por columnas) que me permita trabajar mas tarde en tabla dinamica con toda la info. y sabiendo también que el ejemplo es de 6 trabajadores pero esta muy muy simplificado y necesito automatizar el máximo posible del calculo Tengo los datos: tr…

Saludos amigos del foro, he tratado de realizar una importación acorde a los seleccionado en combobox dependientes. Es decir si selecciono solo en el combobox1 se mostrará todo lo relacionado a la selección pero si tambien selecciono en el combobox2 me gustaria que se con esa indicación y las columnas según lo mostrado en el archivo destino ejemplo. La macro esta funcionando solo cuando se selecciona el archivo y se pulsa el botón abrir, pero falla cuando se cancela he tratado de resolverlo pero no responde. Acudo al foro para alguna colaboración al respecto Agradezco anticipadamente el apoyo Subo los dos archivos para que lo vean Prueba8 ImportarDa…

Buenas, tengo una consulta, tengo una macro que manda los datos a una tabla que uso de base de datos, el tema es que ya se ha vuelto muy extensa y el archivo se puso muy "pesado". quisiera que la BD esté en otro archivo, es eso posible? De paso quisiera que le den un vistazo a la macro que se ha vuelto muy lenta en el archivo original, no se si tendrá que ver que la tabla está muy larga 130000 filas desde ya muchas gracias y perdón por lo desprolijo del ejemplo Saludos Ejemplo.xlsm

Buenos días ,Llevo días atascado en un problema relacionado con la función extraer datos. Tengo un nivel de excel muy básico así que cualquier ayuda será de mucho agredecer.La cuestión es que he creado una base de datos excel para gestionar las entradas y salidas de un párquing. El funcionamiento es simple pero eficaz. Se introduce el número de tarjeta o id del conductor y mediante la fórmula extraer se recuperan el resto de datos suyos que le identifican a él y su vehículo (fotografía, nombre, cargo, matrícula del vehículo, marca, modelo, etc), de modo que te indica que está autorizado. En caso contrario, aparece la indicación no autorizado.Estos datos a su vez se copian…

Tengo el error 13 en tiempo de ejecución no coinciden los tipos La verdad no se como puedo solucionarlo estoy apenas aprendiendo la programación VBA si alguien pudiera por favor se lo agradeceré mucho.

hola buenos dias algun codigo para eliminar repetidos, pero dejando un solo numero de ellos mi rango de datos es a1:cy42 de antemano gracias Libro1.xlsm

Buenas noches nuevamente a los Foristas. A sugerencia de JSD de los problemas que le planteaba sobre el formulario, abro un nuevo tema. Ofrezco disculpas porque realmente es así como debe ser. El tema es el siguiente: Tengo en este formulario otros problemas que quizás puedan ayudarme: realmente he tratado de ver dónde está el error, pero mis conocimientos no alcanzan y ustedes son los MAESTROS. 1.- En el FrmPersonal trabajo lo que es el listado de Personal con todos los datos y las Nóminas de Salario. En la parte de las nóminas (LstNomina) ya lo configuré de tal manera que con el evento DobleClick pueda traer cualquier trabajador y poder modific…

Buenos días Foristas. Una vez más por acá. Quizás más rápido de lo que yo hubiera querido, pero sigo teniendo problemas con los cálculos en VBA. Es algo que no acabo de aprender y necesito aprenderlo. Acá en mi país cuando un trabajador se enferma y el Médico le da Reposo, emite un Certificado Médico, donde entre otros datos consigna los días a Descansar y la fecha Inicial cuando comienza ese Reposo. Imagino que en todos lados sea parecido, quizás difiera en el cálculo. Yo quise automatizarle esto a mi esposa para que hiciera los cálculos de manera automática con sólo introducir los datos imprescindibles. Primero: Declara el Salario devengado por cada uno d…

Buenas amigos. Recurro a ustedes con la siguiente problema. Tengo iformacion en dos tablas que necesito cambiar masivamente, la idea es utilizar el formulario para buscar el valor que se repite y modificar los valores de las celdas adyacentes con informacion que se selecciona en dicho formulario. Ejemplo: Necesito buscar un balor en la columna D (Llamada Baul), y cambiar el o los valores de las celdas adyacentes a este valor en las columas B y C, y que estos se vean reflejados en el ListBox antes y despues del cambio. Adjunto archivo ejemplo Es posible hacerlo ¿? Agradecido de antemano por vuestra ayuda. Ejenplo-1.xlsm

Estimados, Buenos días, agradecería su apoyo con una macro que me permita insertar filas y copiar la cabecera según una condición: - En la hoja3 "Datos" la primera columna es Ciudad, lo que debería hacer la macro es identificar si el valor (ciudad) de la celda A3 es diferentes al de la celda A2, si son diferentes inserta 2 filas en blanco y copia la cabecera en la 2da fila en blanco, si son iguales pues repetir la validación hasta la ultima fila con valor. - Les pongo un ejemplo del resultado en base a la hoja3 para que se puedan guiar, la idea es que la macro modifique directamente en la hoja3 "Datos" y no tenga que crear otra hoja. * Las demás hoja…

With File>Opttions>Personalice Ribbon select the tabs I want to appear in the Ribbon but its imposible. They dont appear. Con MENU>ARCHIVO>OPCIONES>PERSONALIZAR LA CINTA DE OPCIONES elijo las que yo quiero: Fórmulas, Insertar... pero no hay forma de que salgan. En cambio si creo una nueva opción personalizada y la selecciono, entonces aparece enseguida. ¿porqué? Only if a create a new tab, a personalized tab, the it appears inmediatley. Any Help? Thanks Gonzalo

Buenos días a todos; -Necesito de vuestra ayuda. Para mejor comprensión adjunto enlace de un video y comentario. Saludos y gracias de antemano Adjunto también la macro. MEvento.zip

Estimados amigos del foro saludos cordiales luego de buscar algo parecido a lo que requiero encontre un ejemplo, al cual he tratado de adaptar y ya casi funciona. En el archivo de ejemplo que subo no estan todas las hoja para abreviarlo,... pero alli se encuentra una hoja de BD del mes de octubre en la que se acumularan los registros solo de ese mes para cualquier año... luego de una busqueda con los combobox del formulario para reporte se muestra el resultado en el listbox, el mismo que debera mostrarse tambien en la hoja Info_Temas, ..alli es donde surge el problema pues se borra el encabezado del cuadro y ademas la informacion no se ubica en la linea luego del enc…

Hola, Antes de nada agradecer al que me esté leyendo para intentar resolver la duda que tengo y solucionar la misma duda que pueda tener otra gente. Mi problema es que utilizando macros en Excel me sale el siguiente error: Se ha producido el error '1004' en tiempo de ejecución: Error en el método Insert de la clase Range Si entro en el Visual Basic me aparece resaltado: Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromRightOrBelow La verdad que no tengo ni idea de que significa, porque la macro funcionaba hasta que bloqueé las hojas y guarde el trabajo. Al volver a abrirlo ya me aparecía el error. No tengo ni idea de utilizar macros...lo fui consiguiendo po…

Que sentencia debo de realizar para preguntar si una Celda tiene Comentario. Gracias

Hola. Resumo un poco el archivo : Es una tabla donde en la Columna A se encuentra el codigo de barras. Si el codigo de barras que introduzco esta en dicha columna salta un segundo formulario para introducir el valor. El Enter_click se encuentra en un formulario donde permite poner un texto ( un codigo de barras ) y al hacer click ejecuta el codigo a continuacion. Cada X productos salta el error : "se ha producido el error '-2147417848 (80010108) en tiempo de ejecucion : Error de Automatizacion". Si pulsamos en depurar la fila que marca es la del Set. Si paro el programa y vuelvo a intentarlo salta un error diferente aunque lo marca en el mismo sitio :…

@Macro Antonio, Hola Macro Antonio, Con respecto al archivo del control itv, me surge una incidencia y quisiera pedirte ayuda para resolverla. Veras, en el adjunto (el control itv) tengo un vehículo que no ha pasado la revisión por defectos. En el libro; seria posible una columna en la cual al no pasar la revisión me quedara reflejado ?? como por ejemplo "negativo" o con un botón que puedas que te diga "ACTIVA" , "BAJA". y segundo, esos defectos serian lo suyo que me quedaran reflejados en el libro con una columna de "Observaciones"" Por favor, podrías echarme una mano. un saludo y gracias CONTROL ITV.xlsm

Hola a todos, he probado un montón de cosas para intentar conseguir la dependencia de tres combobox, en el archivo adjunto tengo la relación de los combox, pero no consigo hacerlo. Solo cargo el principal. Espero vuestra ayuda Gracias Combobox.xlsm

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…