Hola, veréis tengo una idea para ejecutar una macro que no se como resolverla. Me explico, tengo un libro con siete hojas de las que necesito eliminar, en cuatro de esas hojas, las filas en la que al menos una de sus celdas no tenga contenido. Hasta el momento lo vengo realizando con la macro: Sub EliminarRegVacios() ActiveSheet.Columns(ActiveCell.Column).SpecialCells(xlBlanks).EntireRow.Delete End Sub Pero el problema que me encuentro con esta macro es que tengo que ir hoja por hoja ejecutando la macro y mi idea es poder realizarlo en todas las hojas automáticamente de una sola vez. Además se da la circunstancia que una de las hojas no cumple la condición de …

Buenas tardes, Quisiera que me ayuden con un problema que tengo lo que pasa es que tengo una base de datos de algo de 2000 correos a los cuales quiero enviarles mi publicidad pero todos los correos estan en un cuadro de texto y asi no los puedo importar a outlook adjunto una muestra de como estan los correos a ver si alguien puede ayudarme con una macro ya que estoy en 0 de como hacerlo. Gracias anticipadas. otro.rar

Buenas días, tengo un Libro de excel "nuevos_datos" cuyos datos actualizan otras personas y me lo pasan a mi. Lo que tengo que hacer es pegar en mi libro "referencia" aquellos datos que son distintos del libro "nuevos_datos" y todas las celdas que se actualizan en "referencia" cambiar el color de la celda a Amarillo. Necesitaría una macro que hiciera las siguientes órdenes (o algo similar): Si Referencia.(A1) =nuevos_datos.(A1) 'comparar celda a celda los dos libros entonces Referencia.(A1); 'el valor de la celda se mantiene sino Copiar nuevos_datos.(A1) 'copiar el valor de la celda Pegar en referencia.(A1) Formato= amarillo 'tras pegar el valor tiene que cambiar e…

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

Hola, Estoy intentando de adaptar una macro que tengo de otro proyecto y me da error "run-time 424 se requiere un objeto". He buscado información sobre el error en causa pero no me aclaro. Lo que pretendo, en la hoja "LISTADO" atraves de un TEXTBOX en cuanto voy escribiendo un nombre completo o parte de un nombre se me muestra solo la/las fila/s que se aproximan o contienen el nombre completo de la lista de base de datos que tengo en los rangos "B7:H10000". Tal como lo tengo ahora escribo en la celda "C4" el nombre completo y me marca en amarillo la parte de la fila que contiene dicho nombre. Si la lista es demasiado larga costara mucho en localizar la…

Buenos días amigos. Mi duda es la siguiente, necesitaría que en mi libro todas las filas de la derecha a las que he llamado salida se me ordenaran en base a las filas de la izquierda que son fijas, a las que he llamado entrada. Adjunto archivo 1 que es como se me cargan los datos y el archivo 2 que es como deberían quedar. Lo he intentado ordenando la parte de salida primero por MAT y luego por STD, pero no se como relacionarlo con la parte de entrada. Agradecería vuestra ayuda. Un saludo Lillo SABANA ORIGINAL1.xlsm SABANA ORIGINAL2.xlsm

en un formulario he colocado un webbrowser el cual es controlado por unos botones los cuales abren ciertas paginas de internet, el problema consiste en que las paginas web que se abren tienen un botón para cerrarlas, al hacer clic en este cierra el webbrowser del formulario, y al dar clic en otro botón manda un mensaje de error en el método 'Navigate' de objeto 'IwebBrowser2', como se le puede hacer para que el formulario se actualice y asi vuelva aparecer el webbrowser en el mismo. Gracias por la ayuda.

Buen día foro, espero todos se encuentren de maravilla. La cuestión es la siguiente, estoy tratando de resaltar algunas palabras en un archivo en excel que tengo para usar de referencia para los usuarios. Como forma de entrenamiento tenemos en formato excel la norma ISO y para entrenamiento estoy tratando de darle un color diferente a todos los "debe" que encuentre en el texto, pero no he logrado identificar como puedo hacerlo, creen que sea posible? Por ejemplo si en una celda tengo lo siguiente: "La organización debe planificar, implementar y controlar los procesos (véase 4.4) necesarios para cumplir los requisitos para la provisión de productos y serv…

hola Gente, gracias por la respuesta antes que nada.. yo utilizo el citrix para las descargas y tránsitos marítimos.. encontré en el vba un controlador llamado ica client para citrix lo cual en teoría debería conectarme con el servidor citrix desde mi excel gracias a la ayuda de un userform... el tema que no puedo hacer que funcione me dice error del protocolo.. mi pregunta es como lo debería configurar para que me funcione? alguien posee alguna idea al respecto?? muchas gracias

Hola amig@s... Quiero hacer una macro en la que a partir de una seleccion de archivos de una lista, al precionar un botón localice un archivo, lo abrá, copie cierta información y lo pegue en una hoja de trabajo del mismo libro donde esta el botón. Si no encuentra el archivo, lo que quiero es que dé un mensaje que diga que el "Archivo no existe". Inicie con el siguiente código en casa y si funciona, pero en la oficina no abre el archivo, aun que la ruta sea correcta: Sub IMPORTAR_EDO_CTA() ' ' IMPORTAR EL ESTADO DE CUENTA DE UN CLIENTE DETERMINADO X = Range("M6").Value Nota: esta es la ubicación de la lista en la hoja de excel On Local Error Resume Next Workboo…

Hola amigos. Les adjunto mi trabajo. Al pulsar el botón de la Hoja1 se abre un formulario que contiene un inkedit con bastante texto. Al pulsar sobre el botón del Formulario "Pasar a la celda F2", ese texto pasa a la celda F2, cuyos atributos ya he modificado por macro para que se ajuste a la altura del texto de que debe contener. Todo funciona bien, excepto que la celda llega a alcanzar su altura máxima permitida por las limitaciones de Excel, por lo que hay una cantidad de texto del formulario que no se ve en la celda. No quiero tocar el ancho de la celda, porque luego la imprimiré y tiene que tener esa anchura. Así que me gustaría conseguir rea…

Buenas, me encuentro con el siguiente inconveniente: Tengo un archivo con diferentes hojas, las cuales quiero imprimir en PDF es un orden diferente, por lo cual cree un codigo para ello, donde puedo definir el orden de impresion segun se requiera, y asi mismo, seleccionar el rango de impresion. El problema que cuentro que es quiero que se genere un solo archivo PDF, con el codigo que desarrolle imprime N cantidad de archivos en PDF. Sub Imprimir() Dim Hoja As String Dim Rango As String Dim i As Integer Application.Dialogs(xlDialogPrinterSetup).Show For i = 1 To 5 Hoja = Worksheets("Print").Range("A" & i) Rango = Worksheets("Print").Range("B" & i) Workshe…

Hola buenas, tengo una consulta alguien sabe algún código para crear una variable dentro de un for cambiando los nombres seria algo asi como col = 0 y = 10 For cell = 10 To 16 If Cells(y, 29) = True Then col = col + 1 ####criterio + col = dalomismo ## la idea es que se cree una variable llamada criterio1, criterio2, criterio3, hasta que termine el for End If y = y + 1 Next cell siento fallar en algo así pero no pude hacerlo se agradece cualquier ayuda, de antemano gracias

buenas tardes amigos¡¡¡ tengo un libro que diseñe en el que no ocupo las herramientas de excel ni la ventana solo las pestañas. hay manera de aplicar una macro para eliminar esta ventana. de manera que aparente un programa y no una hoja de excel. de antemano agradezco su ayuda.

Muy buen día, Tengo una macro la cual busca datos de una columna y concatena todos los números, exceptuando el "6011". El problema es que los concatena desde abajo hacia arriba, necesito que sea al veres. Adjunto el archivo, dentro hay un cuadro explicando como funciona.Plani.xlsm Si existe una formula que simplemente tome ese concatenado y lo haga al revés, seria perfecto! Saludos.

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, necesitaria si se puede eliminar el excel que contiene la macro en uso. Si no se introduce bien la clave y para que no generen copia Lo que pense es que se cierre el libro y se elimine, puede ser con la instruccion: ThisWookbook.close y luego kill mas el Path en donde esta? pero no me lo toma, como podria hacerlo?

Estimados. Por favor agradecere su ayuda en lo siguiente, tengo una tabla con ventas de articulos, necesito saber cuales son los articulos que tienen movimiento y si no tienen movimiento durante los ultimos 5 meses deberia agregarse el signo "X" al final de la tabla, por favor su apoyo al respecto. Subo el archivo Ayuda.zip

Cordial saludo, Señores, necesito de su valiosa ayuda para sacar adelante el siguiente proyecto. Trabajo en una empresa de vidrio en donde llevo el programa de producción en Excel y quisiera que en este archivo pudiera realizar lo siguiente. 1. Hacer simulación de corte. Una de las variables que manejo en la línea es realizar como mínimo 450 mt2 diarios, este metraje sale del producto que se lamina en la línea. 2. Al correr la macro que me simule los lotes que tengo que mandar a cortar para cumplir con el metraje obligatorio. 3. Que me sume por color las ordenes de serigrafía ( vidrio pintado) 4. Que me sume por color las ordenes con trabajo 5. Que me sume p…

En el archivo que envío, son cuentas que llevo de una banco, en ellas llevo diferentes obras. Lo que deseo es crear un macro que copie una rango de celdas, con una condición que verifique en la columna "J" si dice EBYSA, entonces que copie el rango de celdas. Por ejemplo: si encuentra en la columna J, EBYSA entonces copia la fila pero desde la columna A hasta la columna G de la misma fila que encuentra EBYSA, y ponerlo en una nueva hoja que se llame EBYSA. Y esto seria repetitivo con los diferentes datos que tengo.(CK, EBYSA, QRO, TORIB, PRESTAMO, PTEKIMB., PEDESA, SHAP) - Ademas que cada vez que ejecuto la macro se limpie la hoja donde se pegan las celdas. (Esto me s…

Hola a todos, tengo una macro que elabora una tabla dinámica con algunos datos, el problema que me surgió es que por ejemplo necesitaría copiar un rango de datos que es variable es decir siempre mi tabla dinámica comienza la hoja1 del libro1 en la celda A4 en adelante, eh visto códigos que muestran la ultima fila con datos : Range("A65536").Select Selection.End(xlUp).Select Yo necesito copiar de la antepenúltima celda hacia A4, y pegarla en otro libro2, hoja2, especificándole a que celda ira la información. Trate de hacer algo asi: Range("A65536").Select if Selection.End(xlUp).Select = "Total general" then selection.end(xlup).select - 1 selection.pasteSpec…

Buenas tardes, me pueden ayudar con una macreo tengo un archivo txt necesito abrirlo en excel, el archivo txt es el siguiente REPORTE DE COLABORACIONES GERENAL TIENDA 0003 SECTOR|PROVEEDOR|DESCRIPCION|FECHA INIC|FECHA FINA|PERIOD|CONCEPTO|%| 1 0|147.0|CASA VINICOLA LOS FRAYLES S.A.|01/01/2012|12/31/2012|M|DCO|4.0| 1 0|147.0|CASA VINICOLA LOS FRAYLES S.A.|01/01/2012|12/31/2012|M|PUB|4.0| 1 0|165.0|COLDECOM LTDA CIA S.C.A.|01/01/2012|12/31/2012|M|CAB|7.0| 1 0|165.0|COLDECOM LTDA CIA S.C.A.|01/01/2012|12/31/2012|M|DCO|1.0| 1 165.0|COLDECOM LTDA CIA S.C.A.|01/01/2012|12/31/2012|M|PUB|2.0| 1 0|166.0|COLOMA LTDA|02/01/2012|12/31/2012|M|DC…

Buenas, les comento : Necesitaria filtrar mediante textbox, tablas completas. *un textbox para buscar mediante legajo y uno para buscar mediante nombre, o sea la misma tabla pero con estas 2 opciones , y tenia en mente hacerlo estilo el Buscador GoogleII, que se encuentra en el foro, adjunto direccion . Les agregue nombre a cada tabla, usuario_01, usuario_02, usuario_03, y seguiria asi hasta con 80 tablas mas o menos. https://www.ayudaexcel.com/foro/macros-programacion-vba-10/solucionado-buscador-estilo-google-21519/. ADJUNTO ARCHIVO. Gracias de antemano Filtrar tabla completa.xls

Buenas tardes amigos. Tengo que corregir cerca de 12 mil registros, y a pesar de tener una fabulosa herramienta de modificacion, se me ha hecho tedioso por el tamaño de la data. Por lo que me preguntaba si seria posible actualizar tres de las columnas de estas dos tablas (Tablas Salidas y Entradas), con la informacion de otra tabla (Tabla Maestra), la cual posee toda la informacion necesaria. Las columnas a actualizar son Ubicacion, Lado y Baul. Se que lo puedo hacer con formula, pero no quiero mezclar datos con formulas. Agradecio por la ayuda que me puedan brindar. Archivo

Buenas gente, a ver si me podéis ayudar. Tengo un código con el cual creo una barra de progreso para ver el estado de la macro en ejecución. Hasta aquí todo perfecto. El caso es que la primera vez que ejecuto la macro una vez abierta la excel, todo funciona correctamente, es en las ejecuciones posteriores que la macro va excesivamente lenta. Este es el código que da problemas: Do While LineaActual < UltimaLinea ContadorEscalones = ContadorEscalones + 1 Me.Caption = "Calculando precio " & ContadorEscalones & " de " & NumeroEscalonesPrecios frm_Progreso.lbl_ProgressBar.Width = frm_Progreso.lbl_ProgressBar.Width + PixelesPo…