Hola, En un formulario tengo el textbox txtcomercial.Text de forma que cada vez se introduce el código WAC13T8250N00 aparece en el textbox txtcalidad.Text la calidad ST52-3, la cuestión es que tengo que repetir hasta 370 veces el código para completar todas las opciones posibles. Se podría utilizar la formula BuscarV en el textbox txtcomercial para que buscara en una tabla y pusiera el resultado en el textbox txtcalidad.Text el código que utilizo es el siguiente : Private Sub txtcomercial_Change() If= "WAC13T8250N00" Then txtcalidad.Text = "ST52-3" End If End sub

Buenas Tardes a todos mi tema a tratar es el siguiente estoy iniciándome en el uso de las Macros para Excel requiero mandar correos a varios usuarios de un listado desde outlook he checado varios ejemplos de este tema sin embargo solo hacen mención de seleccionar las celdas para insertar la información para el tema y el cuerpo del correo, sólo que yo manejo una libro de excel con 6 hojas las cuales están vinculadas con fórmulas y en una de ellas ya tengo trabajando una macro la cual inserta la hora y día en que se realizan las capturas de los registros, en otra tengo varias tablas dinámicas. Mi pregunta o duda es como indico en la macro de que hoja tomará la informac…

Buenas: Resulta que no he dado con la solucion he probado con el Select Case para ir comparando tres columnas y si una fila tiene valor los copie . Ej en la columna 10 no hay valor pasa a la columna 14 tampoco hay valor en la columna 15 si hay valor ahi tiene que copiar esos valores y copiarlos en la hoja1 en la columna C de C8 a C13.. Y asi para cualquier caso de esas tres columnas que tengan datos los copie en el rango de la hoja1 Gracias de antemano prueba.zip

Hola a todos, de nuevo un problema. Llevo tiempo mirando y leyendo y no acabo de ver donde está el error. Tengo un formulario donde lleno los Combobox y Textbox con una consulta SQL y la fuente es un Access. Hasta aquí bien, he conseguido que lo haga bien. Pero le he puesto un botón para actualizar el registro Access con los datos del formulario. He probado solo actualizando un registro y funciona pero ahora que ya he puesto todos los campos a actualizar y me da un error en sintaxis en la instrucción UPDATE. Hay datos que son números en el Access y los formate a moneda en los Textbox, y por eso he utilizado unas variables por si eso daba problemas, lo mismo…

Hola buenas, Necesito lo siguiente: Cada dia me envian una hoja con datos y yo tengo que sacar todas las combinaciones posibles haciendo filtros. Un ejemplo seria algo asi: Elijo el primer dato de la columna HTP de la hoja datos quedan 14 datos en la columna Line, elijo el primero quedan 4 datos en location, elijo el primero quedan 9 datos en la columna Piping class, elijo el primero quedan 4 en la columna train, elijo el primero, queda 1 en la columna join nº. (voy haciendo filtros siguiendo el orden de la hoja ejemplo (saltandome la columna Material Group) hasta que quede una sola fila) De esa fila cojo los datos para rellenar los campos que se piden en la …

Lo que pretendo es que al darle al boton guardar, me pase los datos de esta hoja a la hoja ACUMULADO respetando las lineas en blanco y asi sucesibamente cada vez que pulse el boton guardar. Tal y como lo tengo me lo pasa, pero cuando le doy otra vez me machaca parte de lo que habia anterior mente. PRUEBA.xls

Buenos días amigos Escribo nuevamente a petición de una consulta o ayuda, manejo una base de datos la cual es usada por varios usuarios novatos en la empresa, a esta base le quiero adaptar una macro que guarde una copia del mismo archivo al momento de aperturar y al momento de cerrarlo, debe tener dos condiciones como indique al momento de su apertura este guarde una copia con su "nombre original, el dia y la escritura de apertura", y lo mismo al momento de cerrar. estos en una ruta especifica, esto por si algun cambio guardado debo reversar saber cual archivo usar. Private Sub Workbook_Open() ThisWorkbook.SaveCopyAs "Z:\Relacion laboral\GUARDERIA\copia-apertu…

estimados compañeros del foro, si son tan amables de darme sugerencias con una macro,a la cual para mi gusto no le falta nada mas que al copiar a otra carpeta,esta no pierda el ancho de las columnas. esta es mi macro: Sub Salvar() mio = ActiveWorkbook.Name ruta = ActiveWorkbook.Path Workbooks.Add otro = ActiveWorkbook.Name Workbooks(mio).Activate nombre = Range("E4").Value Range("A1:K63").Copy Workbooks(otro).Activate Sheets(3).Select Range("a1").Select ActiveSheet.Paste ActiveWorkbook.SaveAs ruta & "\" & nombre ActiveWorkbook.Close False MsgBox "proceso terminado. El archivo se ha guardado en la carpeta: " & ruta &a…

Hola necesito armar una macro en un Excel que consta de 2 hojas: Primera Hoja ( carga/copiado de datos): En esta hoja al seleccionar en la columna selección con una "X" que copie y pegue este tema en la segunda hoja en la referencia identificada con el mismo nombre ej: al seleccionar con una "X el nombre del participante lo copie y lo pegue en la hoja 2 en la referencia participantes. Y así sucesivamente que cargue los datos seleccionados con una "x" en los objetivos, Temas tratados y Conclusiones y Empresa. Siempre solo si se marca con una "X" el tema que se quiere pegar en la segunda hoja. Aclaración: obviamente la idea es marcar en un mismo tema eJ. Parti…

como estamos compañeros del foro, veran tengo un problema desearia su preciada ayuda. tengo un formato de 5 hojas que las mando a imprimir por medio de un macro, la cuestion es que tengo que imprimir en orden las hojas 1(hoja de exel) 2(hoja de exel) 3(archivo pdf) 4(hoja de exel) 5(hoja de exel) no logro implementar un codigo ( o no se si sea posible) que desde exel pueda imprimir ese archivo pdf, el macro en cuestion es este: Sub IMPRIMIR_EXPEDIENTE_Y_SOLICITUD() ' ' IMPRIMIR_EXPEDIENTE_Y_SOLICITUD Macro ' Sheets("CARATULA").Select Range("A1:AC65").Select Range("AC65").Activate ActiveWorkbook.RefreshAll Selection.Pri…

Estoy haciendo una macro para un pc de windows XP y office 2003 y al utilizar esta estructura Private Sub Adodc3_MoveComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset) Adodc3.Caption = Adodc3.Recordset.AbsolutePosition If BLOQUEO_ADODC3 = 0 Or adReason = 13 Then If Adodc3.Recordset.AbsolutePosition > 0 Then Call Rellenar End If End If End Sub[/CODE] Me devuelve el siguiente error [CODE]Error de compilacion: La declaracion del procedimiento no coincide con la descripcion del evento o el procedimiento que tiene el mismo nombre[/CODE] …

Hola a todos Estoy tratando de hacer una macro que imprima varias hojas de un solo documento, ademas que me guarde el archivo con el mismo nombre, pero con el consecutivo que sigue. ejemplo yo quiero imprimir 50 hojas, entonces que el consecutivo sea 1,2,3,4,5...48,49,50. Que me guarde el archivo, pero que la próxima vez que utilice el archivo comience en 51 y poder imprimir de nuevo # cantidad de hojas de la misma forma. Ya he intentado varias formas pero sin lograr conseguir lo que busco, se que en este foro hay personas expertas y me pueden ayudar con este tema Adjunto la hoja que deseo imprimir en forma consecutiva el # a ser tratado se encuentre en la celda AX5 …

Hola buenas noches! Espero que me puedan apoyar con el siguiente tema: Tengo una base de datos de mas de 2500 registros de los cuales quiero depurar de acuerdo a su RFC Emisor y sumar las cantidades que contenga en sus registros de acuerdo a las demás columnas, es decir que si un registro aparece 500 veces que me sume en general el contenido de su registro, todo esto mediante una macro, anexo un archivo con algo de información, espero puedan apoyarme, de ante mano mil gracias acumulado 2020.xlsx

buenas tardes no soy capaz de solucionarlo esta casi pero no encuentro el final en el adjunto tengo un fron de facturas bien si pongo el cmd buscar con el txt como esta ahora me busca un listbox pero no los otros 3 y si lo pongo buscar por los txt me rellena solo los txt ayuda por favor el txt busca por nº factura gracias de antemano facturacion.rar

hola a todos soy un completo novato y estoy tratando de hacer un programita para administrar un condominio pero me trabe, la idea es que al capturar un pago de mensualidad en la pestaña de ingresos, se registre que mensualidad cubrió es decir cada pago es de $600 y la idea es que si se registra un pago de por ejemplo $1000 se registren $600 a Enero y $400 a febrero y si el proximo pago es de 800 pues completar los 600 de febrero y el resto a marzo en la pestaña de base de datos, ademas no se como generar un archivo temporal con un registro de todos los ingresos y egreso del mes así como personas con pagos atrasados y adelantados. agradezco su ayuda les anexo el avance qu…

Hola a todos, no se si puedan ayudarme. Necesito una macro que me extraiga con un botón desde un archivo de texto externo a Excel, los datos de las columnas CODIGO, NOMBRE, USUARIO, ESTADO, F.INGRESO, F.CESE, F.FIN EMAIL y adicionalmente me extraiga las lineas DEPENDENCIA ANTERIOR y DEPENDENCIA ACTUAL.El archivo de texto es un reporte 1000 lineas aproximadamente, también debería limpiar las celdas, cada vez que se pida un nuevo reporte, los datos a extraer en la columna CODIGO sería: 20839, NOMBRE seria: GALVEZ/ARAUJO/ROSA JESUS, USUARIO seria: RGLAVEZ, ESTADO seria: A, F.INGRESO seria: 1984-10-09, F.CESE seria: Nulo, F.FIN EMAIL seria: nulo todo esto de la linea 1, 2009…

Buenas Tardes, Por acá nuevamente solicitando respetuosamente y humildemente vuestra ayuda. Estoy trabajando en el siguiente rango de celdas: (A3:AL54), al seleccionar una celda (celda activa) se puede destacar la fila y columna asociada a esta celda (favor ver el archivol que ya tiene una macro) ¿ Es posible destacar las celdas sólo en el rango de (A3:AL54), dar borde a las celdas de este rango y destacar la celda activa ?. Sé que ustedes entenderán al ver el archivo. la macro la encontre y la aplique a este archivo. saludos cordiales Winnerclip 09-Inventario_Septiembre_2012.xls 09-Inventario_Septiembre_2012.xls

Este es mi primer post aquí... Je je. Tengo un archivo en Excel: A1: Fecha | B1: ID | C1: Nombre | D1: Líder | E1: Correo. | F1: Adjunto Generé una macro para enviar correos a distintos destinatarios almacenados en la columna E1 pero solo envía el correo al primero de la lista y no a los demás. Y no he logrado que el texto del mensaje se acomode a los campos que necesito. El texto del correo debería ser: Estimado (Líder), le informo que (Nombre) con el ID número (ID) ha recibido la documentación la fecha (Fecha). Adjunto copia del documento. (Firma) ¿Cuál sería el código para realizar esto? ¿Cómo coloco mi firma de Outlook? Envio de correos (Plantilla).xls

Hola a todos, ocupo de su ayuda, lo que pasa es que tengo una matriz con datos, ejemplo: Producto Cliente cafe 255 cafe 125 cafe 201 azucar 300 azucar 125 leche 255 leche 125 Y deberia quedarme asi: cafe 255 125 201 azucar 300 125 leche 255 125 Adjunto un xls donde explico mejor. Intente con el transponer pero mi matriz es muy grande y tengo que hacer este proceso muy seguido, agradeceria que me orientaran un poco y agradezco anticipadamente a todos. Transponer si se cumple condicion.xls

He aquí un código para abrir tu cuenta Hotmail sin necesidad de escribir el usuario y contraseña continuamente. Es obra de Cacho R. Saludos. Hotmail.rar

buenos días, quería saber si alguien me podría indicar como mover una base de datos en excel de 30 columnas y 6500 filas a acces??esto debido a que donde laboro esta base de datos de excel se actualiza cada 15 días y requiero moverla a acces para uso estadístico.esta macro debería cada vez sobre-escribir lo que exista en la tabla de acces llamada empleados.cabe destacar que el excel y el acces ambos estan en la siguiente ruta:Z:\Relación laboral\MILI\CONSTANCIAS\pruebas\la clave del acces es " rrhh "gracias de antemano por su colaboración.

hola me estoy iniciando en excel con el tema de macros y vba asi que estoy diseñando una planilla deportiva en donde hago doble clik a un casillero y me suma 1 al valor anterior, ahora quiero hacer un registro de actividades que realizo cuando hago doble click pero no se como hacerlo, intente algo pero estoy trabado, lo que necesito es por ejemplo jug 1 lanzo jug 2 paso jug 3 lanzo desde ya muchas gracias Libro1 - 14-07-13.zip

Hola Cracks! De nuevo necesitando de su apoyo, Tengo una tabla que me muestra el Fill Rate de ordenes de venta que obtengo por la siguiente formula: Cantidad facturada/Cantidad de Pedido Cuando en una misma fila esta toda la cantidad facturada por toda la cantidad del pedido la formula corre bien y nos da el 100% ,el problema está cuando una cantidad de pedido se divide entre varias cantidades facturadas se debe dividir todas por la misma cantidad de pedido, se vería de esta forma: Cantidad de Pedido | Cantidad Facturada | Fill Rate 858 396 46% 0 …

Buenas Tardes Señores/as, Espero se encuentren muy bien junto a sus familias en relación al Virus que bastante nos ha afectado. Quisiera pedirles una orientación u ayuda por favor. Esta es una empresa de cobranza la cual soy el el que distribuye la deuda a cada cobrador. adjunto archivo el cual ocupo, son 25 cobradores , debo distribuir el total de la deuda a estas 25 personas, el cual tengo que tratar que el MONTO y la CANTIDAD sean lo mas parecido parecidos y parejo posible. Cualquiera orientación y/o ayuda se agradece (busque en todo el foro y no encontré algo similar, y si hay, busque mal) Espero tenga una buena tarde, …

Hola, me gustaría poder colocar un UserForm en vez de MsgBox, pero en todos los sitios consultados son formularios, no encuentro ningún ejemplo de un UserForm solo para informar (como MsgBox) como puedo hacerlo ? y como se ejecute dentro de un programa ? (en vez de usar "F5" ? Gracias a todos