Buenas tardes, Estoy a punto de finalizar el proyecto y tengo 2 pequeñas problemas que nos soy capaz de resolverlos. Os comento: 1ª - No consigo de evitar el parpadeo en la hoja "LISTADO" aun que para evitar el parpadeo debo de poner: Application.ScreenUpdating = False y al final Application.ScreenUpdating = True. 2º - Al ejecutar la macro introduciendo la fecha en la celda "K3" me tien que devolver los totale en la ultima fila como en la imagen adjunta. Adjunto el documento Muchas gracias por vuestra ayuda y perdonarme por ser pesado.. Saludios, Jose BREAKFAST LIST - evitar parpadeo y alinear suma total en fila unica - cop…

Hola, tengo el siguiente caso, espero me puedan ayudar; de antemano gracias. En una forma predefinida (rectangulo) de excel he creado un hipervinculo y desde éste llamo a la siguiente macro "hoja excel.xls#Genera_Ficha("V19")", como podran dilucidar el nombre de la macro se llama "Genera_Ficha" y en él va el mando le dato "V19" que me servirá de pivote para realizar busquedas en otro archivo. La situación es que al momento de ejecutarse la macro al parecer queda algo en memoria que no deja ejecutar otras instrucciones y esta macro se ejecuta dos veces. Adjunto rutina de la macro. Sub Genera_Ficha(xNombre As String) 'Dimensionando variables Dim wHoja1, wHoja2…

Buenos días, Quiero copiar datos de ciertas columnas de una tabla del LibroOrigen a un nuevo libro ( LibroDestino) He conseguido crear una macro que funciona cuando están todas las celdas completadas (hoja 2 del archivo adjunto) pero si hay vacío da error (hoja1) Para seleccionar el rango de celdas origen he seleccionado esto: 'Seleccionar rango de celdas origen rngOrigen.Select Set a = Range("K1", Range("K1").End(xlDown)) Set b = Range("L1", Range("L1").End(xlDown)) Set c = Range("O1", Range("O1").End(xlDown)) Set d = Range("P1", Range("P1").End(xlDown)) Set e = Range("Q1", Range("Q1").End(xlDown)) Set f = Range("R1", Range("R1").End…

Buenas foreros: Gracias por vuestra colaboración de antemano, este es mi primer mensaje y me habéis ayudado mucho sin necesidad de haberme registrado. Resulta que tengo un libro y un formulario que alimenta al mismo, y desde el cual directamente se emite la orden de impresión. Todo está ideado para que el excel no se visualice, con Application.Visible = False, y funciona correctamente hasta que se abre cualquier otro libro de excel, momento en el cual, junto con el nuevo libro abierto, se muestra la hoja que alimenta el formulario (no modal por cierto, por si eso ayuda). La pregunta es: ¿Habría alguna forma de conseguir que al abrir cualquier otro excel, mi excel y su …

Hola. Tengo una macro que inserta un archivo PDF como attached file. Lo que ncesito es que además al final del cuerpo del correo agregue una magen jpg que hará las veces de firma. Ya buqué en el foro y no encontré como hacerlo. Anexo el archivo de Excel con las direcciones ejemplo y que también incluye la macro y una imagen que sería la firma. Mil gracias de antemano por la ayuda. Saludos. Directorio De Patitas.xls

Buen Dia A todos Necesito crear una macro para transponer datos que tengo en filas a columnas pero manteniendo el dato que tengo en la primera celda, esta es la data [TABLE=width: 50] [TR] [TD]1[/TD] [TD]A[/TD] [TD]B[/TD] [TD]C[/TD] [TD]D[/TD] [TD]E[/TD] [TD]F[/TD] [TD]G[/TD] [/TR] [TR] [TD]2[/TD] [TD][/TD] [TD][/TD] [TD]local1[/TD] [TD]local2[/TD] [TD]local3[/TD] [TD]local4[/TD] [TD]local5[/TD] [/TR] [TR] [TD]3[/TD] [TD]EAN[/TD] [TD]Descripcion[/TD] [TD]id_3[/TD] [TD]id_4[/TD] [TD]id_5[/TD] [TD]id_6[/TD] [TD]id_7[/TD] [/TR] [TR] [TD]4[/TD] [TD]11111[/TD] [TD]camisa xl[/TD] [TD]x[/TD] [TD][/TD] [TD]x[/TD] [TD][/TD] [TD]x[/TD] [/…

Buenos dias, Tengo unas CHECK BOX en cuando las marco me muestra una fila en concreto y cuando lo desmarco me esconde la misma fila. Me funciona muy bien pero tengo un problema en cuando quiero proteger la hoja. He protegida la hoja con el codigo "1234", el problema que tengo es de no poder acceder a las calillas CHECK BOX para marcarlas/desmarcarlas. Quiero poder marca o demarcar los CHECK BOX con la hoja protegida y una vez que se ha enviado el correo se desmarquen los CHECK BOX al igual que las celdas seleccionadas a limpiarse. Pues no se como hacerlo para poder utilizar los CHECK BOX tambien con la hoja protegida. He intentado varias cos…

Buen día a todos. De antemano agradecer sus aportes por apoyarme en mi consulta. En el Rango (A1:A50) de Mediante la herramienta de Formato Condicional - Escala de Color se resalto datos duplicados y luego con la similar manera de ir a Formato Condicional - Resaltar reglas de celdas - Duplicar valores se coloreo de color blanco los "datos únicos". Solamente se necesita que en el rango (A1:A50) , se mantenga el mismo formato (color de fondo y datos) PERO sin la configuración del FOMARTO CONDICIONAL. Espero haberme hecho entender con claridad.

Hola a todos Estoy intentando automatizar un proceso y que los registros que hay en excel exportarlo a SQL espero que los espertos del gripo me puedan ayudar. El archicho que adjunto me funciona cuando es solo un registro en la fila 7, sin embargo requiero: 1 Que me consulte si los datos de la fila B (que peuden ser una o muchas filas con información ), en caso de ya estar el registro en la base de datos que mande la leyenda. 2 Que si los datos de la fila B no existen en la base de datos que exprote todos los datos con el macro ingesarDatos. El archivo adjunto lo he estado trabajando, sin embargo se me han complicado los p…

Hola de nuevo, estoy haciendo una agenda (que he copiado de Internet) el caso es que me funciona todo menos lo de búsqueda por palabra o nombre, el código me he asegurado, es idéntico que el original (de Internet) pero me da error, podéis ayudarme ? me gustaría que la búsqueda la hiciese por "nombre" Mando un ejemplo del programa Muchas gracias Teléfonos.xlsm

Buenas, necesito de nuevo se su ayuda. Se me plantea un problema al querer automatizar una acciones en excel. Tengo una hoja de excel en la que voy añadiendo una serie de datos, pero al introducirlos por primera vez quisiera poder seleccionar un rango de filas y crear una carpeta por fila con subcarpetas nombradas segun unos datos de la misma fila pero diferente columna. y una vez creada en la carpeta final me copiase unas carpetas fijas que tengo en otra ubicacion. les adjunto el excel donde tengo los datos y deberia quedar D:\gestion\A-"valor celda ARBOL"\prepara\"valor celda ACT"\ y una vez conseguida esta ruta copiar el contenido de una carpeta "PLANTILLAS" dentro…

Hola a todos me gustaría automatizar una función con un formulario, de tal manera que cuando le meta un variable, me la introduzca en una fórmula y la pegue en una celda en particular. La variable será una fecha, para que haga la siguiente fórmula: =SUMAR.SI.CONJUNTO(DIARIO[HORAS VUELO];DIARIO[FECHA];"<="&FECHA(AÑO($A$2);MES($A$2);DIA($A$2));DIARIO[AVION];73) en negritas y subrayado he puesto lo que la variable modificará. Esta variable la meteré en un textbox de un formulario. La fecha que meta en este textbox será la que busque la fórmula que acabo de poner... Para cada avión le pondré una fórmula similar, pero c…

Buenas, Estoy intentando realizar un macros que me lea los registros que cumplan una condición y me los pegue en otra hoja en la celda que le marco. He probado con esta macro, pero no me lo hace correcto me da error Sub Copiar_datos()

Tengo un formulario form aplicativo excel , que se habre ejecuta el formregistration y pide algunos datos para registrar un usuario lo tipico , luego se da click en camera y se habre otro userform que muestra la webcam en vivo para luego darle en capture y tomar la foto al usuario que se carga en el userformregistration como vista previa , y luego regresar y darle click en salve al formulario userformregistration, donde la imagen del usuario se guarda en una carpeta donde se tiene este excel form, guardado y los datos se guardan en las celdas del libro sheets1 junto con un dato de la foto en letras, en la celda GAMBAR,, necesito que este aplicativo me deje tomar 2 …

Estimados, soy nuevo en el foro y estoy empezando a experimentar la utilizacion de macros y vba, la verdad me a servirdo mucho y me parece muy interesante. Ahora mismo estoy con un problema en la configuracion de una macro. La cuestion es que esta macro me importa de una carpeta ( que contiene varios archivos ".txt", los cuales dia a dia van cambiando de nombre) pero solamento me los importa si los tengo en mi maquina, lo que necesito es que me importe estos datos desde un servidor en comun que usamos en el trabajo. Por lo que tngo entendido el codigo "chdir" no sirve para importar datos desde una red o servidor. Me podrian ayudar con este problemita. Aca les dejo la mac…

Buenas noches, por motivos de trabajo estoy intentando utilizar excel para abrir toda una serie de archivos para mi trabajo. Aquí adjunto un zip con una hoja excel en la que se incluye una macro para abrir un documento de word. Creo que es correcta pero no sé si falla alguna linea de codigo. Me podeis ayudar? Tb quería plantear la duda de como abrir accesos directos de aplicaciones con introducción de usuario y contraseña de modo que se pueda programar en vba la introduccion de estos datos de forma automática, si es posible. Espero vuestra ayuda. Gracias abrir_documentos_word.zip

Hola amigos, muy buenas tardes. Excel 2003 – SP3 El maestro Macro-Antonio, me ayudó hace algunos días a solucionar un problema que tenía, y para ello, me creó este código que me funciona de maravillas. Private Sub CMBPorcentaje_Click() On Error Resume Next pct = InputBox("Introduce el %", , 0) For Each celda In Selection celda.Value = Round(celda.Value * (1 + pct / 100), 2) Next End Sub[/CODE] Como se puede comprobar, este código lo que hace es sumar un tanto por ciento optativo a las celdas seleccionadas. Bien, ahora me he dado cuenta de un detalle, es necesario que ese tanto por ciento se muestre. Con esto, conseguimos saber qué cantidades han sido i…

Macro para convertir en número sólo en una columna Buenas a todos: Ante todo felicitar por tan excelente foro que contribuye mucho para usuarios como yo, ávidos de aprender cada día. Tengo este código que hace que desde la hoja “Formulario_pantalla”copie algunas celdas y rango a otra hoja llamada “Kardex”. En realidad lo hace todo bien a excepción del copiado de la celda AJ5 (=TEXTO(AF3,"000000") de la primera hoja mencionada a la otra hoja a partir de la celda A4 donde aparece el icono de advertencia “El número de esta celda tiene formato de texto o va precedido por un apóstrofo” y luego manualmente tengo que convertir en número. Entonces por favor necesito el código…

¡Hola a tod@s! Tengo la siguiente macro: [CODE][CODE]ConstceldaInicial = "A1" Const celdaFinal = "IR29" Dim miRango As Range Set miRango = ActiveSheet.Range(celdaInicial &amp; ":" &amp; celdaFinal) [/CODE] [/code] pero necesitaría que me recorriera el rango desde la celda A1 hasta la última celda que no esté vacía en la fila 29 celdaInicial:(ultima celda no vacía)29 Agradecería mucho cualquier ayuda que pudiérais ofrecerme.

Hola amigos por aca de nuevo pidiendo de su apoyo, ten mun userform donde tengo un ComboBox como buscador este funciona bien pero ahora quisiera que al seleccionar o buscar un articulo de la lista del ComboBox1 aparesca la imagen en un control Image1 la cual esta en una carpeta llamada imagenes donde esta el archivo, la imagenes tienen el nombre que aparece en textbox1 Private Sub ComboBox1_Change() If ComboBox1 <> "" Then TextBox1 = Empty TextBox2 = Empty TextBox3 = Empty TextBox4 = Empty ComboBox2 = Empty End If Dim c As Range With Worksheets("Inventario").Range("B2:B1000000") Set c = .Find(ComboBox1, , LookIn:=xlValues, LookAt:=xlWhole) If Not c Is Nothing…

Hola, estoy realizando un buscador de productos pero el problema que tengo ahora es que no busca todos los registros, solo busca en la primera fila o solo por la primera letra. Por favor si alguien pudiera ayudarme con este problema estaria muy agradecido... Adjunto el archivo para que tengan una idea clara... Formulario_Buscador.xls

Saludos. El caso es el siguiente: yo comparo el valor de dos celdas y el resultado lo coloco en otra celda. Ejemplo D1=A1-C1. Si el resultado es negativo (por ejemplo -300), quiero que emita una alerta sonora con un mensaje de voz "producción baja". Gracias!

Estimados foristas, Requiero su acostumbrado apoyo para lo siguiente. En el adjunto verán tres hojas. Lo que necesito es que conforme se vayan registrando datos en las hojas "COMPAS" o "VENTAS" las filas ingresadas se copien automáticamente en la hoja "KARDEX". Además, de ser posible, que se pueda ordenar por fechas, de la más antigua a la más reciente. Será posible este desarrollo? Muchas gracias por su soporte, Saludos. José. PRUEBAN.xls PRUEBAN.xls

Macro guarda filas sin articulos ingresados Tengo este código que me graba datos de un formulario. El problema que tengo es que me graba los campos vacios de la columna articulos. Ej: Pongo el numero de presupuesto , le cargo 2 o 3 articulos y cuando lo grabo. Me guarda esos 3 articulos mas las 17 filas mas vacias sin articulos. Me explico? Y en la hoja de reportes me quedan muchas filas vacias y se hace muy extenso. Hay alguna forma de no guardar filas que no carguen articulos? Abrazoss pd_ Adjunto captura para ver como guarda la informacion. Sub CONFIRMARIMPRIMIRGRABAR() ' ' CONFIRMARIMPRIMIRGRABAR Macro ' ' ActiveWindow.SmallScroll Down:=-9 Shee…

Hola Masters, Soy nuevo en este foro y primero que nada los quiero felicitar por que ayudan muchísimo a las personas que vamos comenzando en este mundo de excel avanzado. Estoy construyendo una interfaz tomando como base algunos ejemplos que han subido al foro pero me he atorado en querer editar datos de mi listbox y que se actualice en la base de datos al dar clic en el botón "Guardar", espero que me puedan ayudar, les dejo mi excel. Saludos a todos y de nuevo GRACIAS!! Matriz KPI´s OK.xlsm