Macros y programación VBA

Hola, vengo con un nuevo tema, esperando nuevamente me puedan ayudar... Adjunto un archivo con pocos registros que sirva como ejemplo, pero acoto que trabajo con datas más grandes. La idea es sustituir a través de macro "caracteres especiales" por sus respectivos equivalentes u otra solución que me puedan aconsejar hacer en esos casos. Cabe destacar que me estoy refiriendo especificamente a los caracteres reseñados en el archivo anexo, pero también debe abarcar solución a muchos otros caracteres especiales existentes. Dichas datas son importadas posteriormente a manejadores de bd que complican el tratamiento de errores respecto a los mencionados caracteres. Libro1.r…

Necesito me ayudan a: Hacer una macro que me permita hacer pegatinas autorrellenables ( tabla azul a la izquierda); celdas en roja); de tal modo que; rellenando a mano el código de una máquina (celda E2 amarilla, de la pestaña pegatina), autorrellena en la tabla verde, los equipos que forman parte de ella ( los busca en la pestaña equipos). Para este caso son 4 equipos, por tanto: 1:necesito que se me generen (tantas pegatinas, como equipos tenga la máquina (4 en este caso) y que se autorrellene el campo descripción e identificativo ( que corresponde con la columna P y Q, de la tabla verde). MACRO PEGATINAS v04 - autorrelleno.xls

Buenas, quiero hacer algo como lo siguiente: Al pulsar sobre A1, que en la celda C1 se esciba la palabra "Amarillo" y que si se pulsa sobre la celda B1 en C1 se escriba la palabra "Rojo". Y necesito que esto sea arrastrable, o sea que si puslo en A5327 en C5327 se escriba "Amarillo" etc... Esto es posible de hacer con formulas? o necesariamente hay que recurrir a VBA? Un saludo y desde ya, muchas gracias!

Hola, he grabado un macro de una lista de validación de datos con formula, me funciona perfectamente... Pero al reproducir el código que me devolvió el grabador de macros no corre me podrían ayudar por favor... Columns("C:C").Select With Selection.Validation .Delete .Add Type:=xlValidateCustom, AlertStyle:=xlValidAlertStop, Operator:= _ xlBetween, Formula1:="=contar.si(c:c,c1)=1" .IgnoreBlank = True .InCellDropdown = True .InputTitle = "1" .ErrorTitle = "1" .InputMessage = "1" .ErrorMessage = "2" .ShowInput = True .ShowError = True End With[/CODE] El prob…

hola a la comunidad....estoy armando un formulario pero esta incompleto....como es el código para insertar un calendar en el commandbbutton 7 y lo inserte en el textbox 1 la fecha que necesito , y cuando inserte el responsable de la atención del combox1 me ponga su dni y colegiatura automáticamente y lo bloquee , el frame registro hasta llegar al sexo tenga se ser obligatorio y mande una advertencia. y cuando llegue al combobox 3 al escoger uno de la lista me pongo en el textbox10 su código y lo bloquee y para antes pasar al combox4 me mande un msgbox y me diga quiere continuar con el registro o empezar con un nuevo registro y asi para los demás combobox . para el …

buenas tardes mi consulta es la siguiente alguien tendra algun ejemplo de consultar un registro en un formulario excel ,y devolver los datos de una database en access, al formulario de excel. saludos,

Hola, es mi primer mensaje en el foro. Mi nombre es Alejandro y soy estudiante de Ingenieria Civil Siguiendo un post anterior Macro ReSolver ecuaciones de una incógnita quise resolver el problema planteado en el ultimo mensaje, en el cual se llega a un error de la función cuando la ecuación presenta un cambio de tendencia. Mi idea fue la siguiente: En cada ciclo comprar el resultado obtenido de Q con el real y guardar la diferencia en una variable. Luego si la diferencia es menor que la anterior guardar el valor de Y en una variable Yb. Para evitar el error de la función en el cambio de variable, cambie la condición de comparación del ciclo Do por una que recorra t…

Buenos dias, ante todo deciros que manejo excel a nivel usuario, pero poco a poco voy aprendiendo más cosas al respecto. Me gustaria saber si podrias ayudarme con lo siguiente: Estoy haciendo un esquema de facturas del cual numera automaticamente cada vez que llama una nueva dejando copia en otra carpeta de la que se ha hecho, y tiene celdas con hipervinculos hacia los albaranes, copias de facturas, etc. El error que me da es que cuando hace la copia, la hoja inicial de la factura que se queda con nuevo número no tiene bien asignado el hipervinculo al archivo de albaranes. Por lo cual me toca insertarlo cada vez, cosa que no es práctica. Os agradecería si supierais de…

Buenas; Tengo un problema con este macro, a ver si alguien me puede ayudar. Quiero enviar citas a Outlook. Lo que me hace este macro es lo siguiente: Solo me genera la ultima cita con todos los contactos. Y lo que quiero es que me genere a cada contacto su cita. Gracias!! Citas Outlook.xls

Buenas A ver si me podéis echar un cable porque no hay manera >< tengo un combobox en una hoja el cual le meto una lista que esta el hoja7 "Tablas" y lo que quiero es que cuando seleccione un nombre me compare si existe ese nombre en la hoja7 "Tablas" en dos columnas columnas diferentes tengo dividida la lista del combobox es decir que si el nombre que le meto se encuentra en la columna O2 : O53 me active que se vea Imagen1 y si se encuentra en la columna P2 : P75 me active Imagen2 para asi diferenciarlas y si se da el caso de que el nombre no aparezca en ninguna de las columnas o el combobox no tenga ningun dato me desactive la aparición de las imagenes miran…

el archivo que estoy haciendo es para buscar extensiones y nombre completos,un ejemplo seria que Juan Alejandro Mata Ramirez tiene la extension 10000 pero me preguntan por Juan Mata y no aparecia,pero si la extension o de otro modo seria que si me perguntaban por la extension 10000 no me aparecia el dato,aqui estuve investigando y me encontre con un gran archivo de Gerson Pineda y lo quize modificar,el detalle es que no encuentro el error cuando en el listbox de nombre escribo la letra "E,g,h,m,o,p" me dice que hay un error ,quisiera saber a que se debe,les adjunto el archivo para que me oprienten en cual es el error ,gracias altos.zip

Estimados amigos del foro tengo dos formularios para una base de datos de preguntas. En el primer formulario selecciono las preguntas que al hacer click en el botón seleccionar aparecen en el segundo formulario. En este segundo pretendo usar el modo de selección único en el listbox pero deseo que al hacer click en cualquiera de las preguntas se vaya viendo las opciones y respuesta correcta en textbox. Actualmente las opciones están en listbox que cambian si uso un spinbutton pero eso es lo que deseo dejar de usar. Me gustaria usar solo textbox que cambia su contenido correspondiente al seleccionar en la pregunta en el listbox de arriba. Quedo muy agradecido por la co…

Buenos días, con la colaboración de ustedes desarrolle una planilla en Excel con Macros y Combobox las cuales me ha sido muy practica, pero veo que se puede mejorar muchísimo y que quede mas ágil y agradable al usuario, (Adjunto dicha Planilla) que en resumidas cuenta hace lo siguiente: Solicita Un Nombre (Celda en Combobox - Busqueda Inteligente) Solicita Un tratamiento Celda en Combobox - Busqueda Inteligente) Cantidad Valor Unitario (Lo trae de la tabla de Tratamientos cuando encuentra dicho Item) Trae otros campos adicionales como son Marca, Unidad, los cuales trabajo con "BUSCARV" Hay Otros campos que se llenan manualmente. La idea es que esta plan…

He estado trabajando en una base de datos de un pequeño sistema de mantenimiento el cual tome un archivo de esta pagina y la he estado adaptando a mis necesidades, hice un pestaña en la parte de maestro de fallas etc, llamado cerrar trabajos pero requiero que en el combobox solo me muestre los numero de ot el cual no tengan fecha de finalizacion con el fin de que no me muestre todos, y por consiguiente no engorde la base de datos, el usuario de mi archivo es jesus y la contraseña es martha, anexo vinculo del archivo... Nueva carpeta

Cordial saludo, adjunto el archivo donde requiero que al cargar el combobox2 me cargue las listas del combobox 3 y 4 (esto creo que ya esta listo con el código que tengo), ahora lo que no he podido es que si elijo un codigo del combobox3 me registre el combobox4 el insumo correspondiente a ese código y si lo que elijo es un insumo del combobox4 en el combobox 3 me registre el codigo de ese insumo. Adjunto el archivo con lo que tengo hasta ahora. Gracias por la ayuda Libro1.rar

Hola: Tengo una base de datos que contiene fechas (ej: 02-02-2016) y otros datos. Necesito filtrar todos los datos que están contenidos en un año seleccionado (ej: 2016). Si yo inserto una columna que entregue el año de cada fecha, la macros siguiente me sirve para filtrar los valores que necesito. ¿Es posible crear una macros que filtre los datos que necesito, sin tener que crear una columna nueva donde aparezca solo el año, sino que compare directamente con las fechas? Muchas gracias pd: adjunto excel y lo copio acá abajo también ------------------------------------------------------------------------------------------------------------- Dim añox 'Se escribe en …

Buenas noches. Tomando una macro autoespandible lo utilice para crear un calendario que me ayude a llevar el registro de entrada y salida de personal administratico con rangos de tolerancia y me muestre un semaforo. Sin embargo tengo la nececidad de insertar comentarios, todo funcionaba bien hasta que en la fila 160 inserte un comentario en la casilla H160 y al intentar contarer la 2da semana de febrero me marca el error 1004 en tiempo de ejecución: No se puede asignar la propiedad hidden de la clase de rango, pues al eliminarlo funciona correctamente. No se si es por el comentario pero he intentado arreglar el error y nadamas no queda. Si alguien me puede ayudar se l…

Estimados amigo, espero me puedan dar una ayudadita. El problema es que tengo un Listbox , que al grabar una modificacion se duplica el registro, por favor su ayuda, para terminar con este problemita Muchas gracias CEquipos.zip

Hola, Tengo la siguiente Macro: Sub enviar() Sheets("envios").Select ufila = Range("a" & Rows.Count).End(xlUp).Row For i = 1 To ufila If Cells(i, 7) = Cells(i, 1) Then Set parte1 = CreateObject("outlook.application") Set parte2 = parte1.createitem(olmailitem) parte2.To = Cells(i, 8) & ";" & Cells(i, 9) parte2.CC = Cells(i, 10) & ";" & Cells(i, 11) parte2.Subject = "Cumpleaños" '"Asunto" '"Cuerpo del mensaje" parte2.body = "Buenos días," & vbCrLf & vbCrLf & "Nos es grato comunicarles que es el cumpleaños de " & Cells(i, 5) & "." & vbCrLf & vbCrLf & "Un saludo." 'parte2. Attachments.Add Ruta &…

hola amigos de excel estoy realizando una pequeña macro para realizar la receta de l lugar donde trabajo, pero no he podido realizar una consulta múltiple de tablas para actualizar los saldos de los producto en la receta de acuerdo al mes y al año espero me puedan ayuda saludos. 1. Es validar las preparaciones que se van actualizar a. En la base de datos de Access hay una tabla que se llama “BDPREPARACIONES” b. se valida en las dos últimas columnas estén chechkeadas que son “RESETA” Y “RESETAESTANDAR”, si estas dos columnas están chekeadas se prosigue a la actualización. 2. Luego consulto la receta que esta asociada a la preparación de la siguiente manera: En l…

Hola a todos. Tengo una carpeta con archivos en fomato csv. Cada archivo tiene nombre de la forma "aaaammdd.csv" y son uno diario. Cada archivo tiene varias columnas que no necesariamente vienen en el mismo orden (no todos tienen TODAS las columnas, pero todos tienen las que necesito). El encabezado, o el nombre en la primera celda de cada columna coincide en todos los archivos (es decir, podría pedirle a la macro que busque el nombre de la columna y copie los datos). Necesito un archivo que me consolide las columnas que seleccione los datos en cada columna!

Buenos días, Buscando una solución a mi problema y no he encontrado ninguno con respuesta. Tengo 10 archivos para distintos usuarios, cada uno con su contraseña. Los archivos están vinculados entre si y lo que quiero es que cuando abra uno, no me pida las contraseñas del resto de usuarios. Estoy intentando programar la macro: Sub Abrir() Dim Libro As Workbook Set Libro = Workbooks.Open(Filename:="C:\Directorio\Libro.xls", UpdateLinks:=1, Password:="qaz", WriteResPassword:="qaz") End Sub He empezado con archivo 1 vinculado a archivo 2, para que cuando abra archivo 1 no me pida la contraseña del archivo 2 Tengo dos problemas Pero con este ejemplo, al abrir e…

Buen día, tarde, noche Quisiera solicitarles de su amable ayuda para solucionar un problemita que estoy teniendo en un archivo Dropbox - Chequeras.rar Quiero hacer un barrido de la Hoja que se llama ACSEL Q, y que me vaya a buscar el número de cheque en la hoja que se llama Listado de Cheques, y que me traiga ciertos datos hacia la hoja ACSEL Q Lo estoy haciendo a través del método Find, pero siempre me salta el error 91, y esto se debe porque no encuentra algún dato. Al código le agregué lo siguiente: On error resume Next . . . if err.number = 91 then goto Siguiente[/CODE] Esto me resuelve a medias el problema, pues lo que hace es que si existe el error 91 …

Buenas noches. Necesito ayuda con lo siguiente. Tengo una nómina en la que algunas personas pueden hacer 2 turnos en el día y en que además pueden tener recargos nocturnos, u horas extras diurnas y nocturnas. La jornada diurna sería desde las 6:00 am hasta las 10:00 pm. La jornada nocturna sería desde las 10:00 pm hasta las 6:00 am. Por ejemplo: Un empleado puede ingresar a laborar a las 2:00 am y terminar a las 2:00 pm El horario serían 9 horas contando con 1 hora de descanso, es decir, de 2:00 am hasta las 11:00 am. De 11:00 am hasta las 2:00 pm serian 3 horas extras diurnas. Además, de las 2:00 am hasta las 6:00 am tendrían 4 horas de recargo nocturno. Este m…

que tal buen dia, bueno queria saber si me pueden ayudar con la siguiente macro, lo que quiero que haga es que a determinada fecha se cree un archivo con un nombre especifico a una ruta especifica y cuando se quiera acceder a ese archivo cheque primero si no existe el archivo creado y si existe se elimine el archivo que se esta utilizando y si llegaran a tener otro archivo como el borrado y cambien la fecha se elimine igual porque seguira el archivo guardado...AQUI LES DEJO LA MACRO QUE ESTOY MODIFICANDO TIENE UN ERROR ES QUE SI YA SE GUARDO UN ARCHIVO Y LE CAMBIO LA FECHA NO APARECE EL MENSAJE Y SE SUPONE QUE SE DEBE DE APARECER EL MENSAJE AYUDA.rar