De antemano Gracias, bueno lo que quiero hacer es que cuando cierre excel, se oculte la hoja que estaba activa al momento de salir, y se desoculte la hoja1 (por ejemplo). Les agradezco su tiempo y espero haberme explicado correctamente.

En lenguaje VBA : Seleccionar un excel por el usuario y buscar una palabra Facturas en la primera hoja excel 2. Hacer una busqueda desde la celda inferior donde esta Facturas hasta encontrar varios directorios de varios .pdf 3. Copie todos esos archivos .pdf en un directorio C:\facturas de manera automática Necesitaría modificar el ultimo bucle porque no para de hacer copias hasta que llega un punto de colapso total. Edito: Ya he podido hacerlo para dos pdfs , pero necesitaria hacerlo para un numero generico de archivos .pdf Edito 2: Ya lo he conseguido para un numero de veces n pero solo para un determinado de extensión . pdf o…

Hola compañeros, Me preguntaba si existía la manera de modificar el tema de la cinta de opciones para que aparezca en color negro (u otro color) utilizando código VBA. Adjunto imagen para mayor aclaración... Ya sé que se puede realizar simplemente haciendo click desde "Archivo > Cuenta > Tema de Office..." Pero me preguntaba si se podía realizar desde el código VBA con algún método del objeto "Application" o algo así. La grabadora de macros además, no graba esta opción. Gracias por cualquier tipo de aporte. Un saludo.

Hola a todos, Me gustaría preguntar si alguien tiene desarrollada una función tal que cuando el usuario introduzca un número cualquiera, entonces la función devuelva la referencia de la columna asociada a ese número. Algo así, por ejemplo: Function ReferenciarColumnas(numero As Integer) As String Application.ScreenUpdating = False ' Limpiamos los errores anteriores (por si acaso)... Err.Clear ' Tratamos los errores de la función... On Error Resume Next ' Si el número introducido no es válido, entonces... If numero <= 0 Or numero > 16384 Then ' Notificamos al usuario con un mensaje de error... MsgBox "El nú…

Hola a todos, Me gustaría saber si es posible lo siguiente. Tengo una hoja de cálculo con algunas casillas que son valores numéricos obtenidos mediante fórmulas estándar de Excel y quisiera mediante una subrutina generar un archivo de texto que tuviera un formato muy concreto de modo que los números tendrán el formato del tipo 0000000000E+0. (El número 25 por ejemplo sería 2500000000E-8). Es decir, todos los números tendrán 10 dígitos sin puntos decimales y acompañados del correspondiente exponencial, que a su vez tendrá un solo dígito. La verdad es que no tengo ni idea de cómo hacer esto ya que creo el programa pero los valores que escribe tienen el formato General de…

Hola a toda la gente de Ayuda Excel . Hoy traigo una duda con respecto a los complementos. Tengo un complemento con una función que armé llamada "CARGAR_COMBOBOX", que llena un combobox con los datos de una columna de la plantilla de excel. Ahora, el problema es que desde el formulario no logro llamar a la función que se encuentra en el complemento, me tira error. Quizás alguien sepa el por que. Dejo un adjunto con el archivo de excel, el complemento y la función .bas por las dudas. Desde ya muchas gracias a todos. Saludos! Libreria.rar

Buenas noches, Estoy intentando utilizar esta macro pero no me responde y desconozco porqué. Además el navegador que uso suele ser chrome. ¿Alguien puede ayudarme a saber porque no se ejecuta bien? Gracias adjunto código --- Sub scrapeHyperlinksWebsite() Dim ie As InternetExplorer Dim html As HTMLDocument Dim Link As Object Dim ElementCol As Object Dim erow As Long Application.ScreenUpdating = False Set ie = New InternetExplorer ie.Visible = False ‘ie.navigate “http://www.rondebruin.nl/contact.htm” ‘ie.navigate “http://info.mathxlforschool.com/contact-us” ie.navigate “http://www.iberia.es” Do While ie.readyState <> READYSTATE_COMPLETE Application.…

Buenas tardes, por favor podrían ayudarme con la siguiente macro que no he podido lograr dar una solución. Esta macro lo acabo de copiar de la web ya que tiene todo lo que necesito, sin embargo tiene un pequeño detalle lo cual requiero me puedan ayudar. La macro marcha bien cuando realiza la primera copia, sin embargo, cuando se importa una segunda información la macro no logra copiar los datos en la fila continua... por favor podrían ayudarme a corregir ese detalle. Gracias. Dim Q& Set ws1 = ActiveSheet On Error Resume Next ws2 = "Selecciona el libro a procesar." MsgBox ws2, vbOKOnly ws2 = Application.GetOpenFilename(Title:=ws2) If…

Hola Gente estoy intentando llevar un libro de productos solicitados por médicos y necesito de su ayuda quiero copiar todo lo que escriba en los campos de color en la hoja historial médico, la macro que realice la hice con la grabadora y no puedo hacer que funcione bien. Y despues necesitaria que otra macro me permita obtener un informe con todos los datos dependiendo del medico. Desde ya muchas gracias https://dl.dropboxusercontent.com/u/50012368/FICHA%20PEDIDO%20MEDICO.xls

Buen día!! Estaría necesitando ayuda para crear una macro que haga lo siguiente: *Estando en la columna AB de la hoja "Control", vaya hasta la columna C, copie ese número y lo pegue en la hoja "Documentación" para realizar un filtro automático (necesito el filtro automático ya que debo ingresar datos en esas celdas que filtro). *Repetir este procedimiento en todas las filas al ejecutar la macro. Yo logré copiar el dato y desplazarme por la columna pero mi macro solo pega el dato de la primer celda que copio. Espero haberme explicado bien y desde ya agradezco mucho vuestra ayuda. Saludos!! Verónica Control.zip

Buen dia, antes que nada agradezco a todos los que colaboran en esta pagina, ya que me han ayudado bastante, en esta ocacion he decidido abrir un teme debido a que no lo he encontrado en el buscador, bien la duda y/o solicitud es para que me ayuden con lo siguiente, tengo una carpeta con mas de 100 archivos en excel (no todos tienen macros) y necesito buscar una macro en un archivo que guarde en esta carpeta hace tiempo pero no recuerdo el nombre del archivo, lo que quiero es para evitar abrir todos los archivos, hacer una lista solo de los archivos que contienen macros y asi ahorrar un poco de tiempo, agrdezco su ayuda u orientacion que me puedan brindar, gracias.

Buenos dias a todos. Nuevamente recurro a ustedes para pedir ayuda. Les explico, tengo un archivo con varias hojas las cuales son mis Ordenes de Compra otra hoja que se llama "Explosion de Materiales". Lo que quiero es que de las hojas que son mis "ordenes de compra" tomar el valor de la celda "J10" y pegarlo en la hoja explosion de materiales en la columna "G" siempre y cuando el nombre que esta en "A12" de la hoja que seleccione (Cualquier Orden de Compra) coincida con los nombres que estan en la hoja "Explosion de materiales" Anexo archivo y ahi tengo el ejemplo de como deseo y quede. Gracias y desde ya agradezco por su ayuda. Libro2.xls

Hola a todos! Tengo una base de datos en donde se relacionan un número de reporte, un número de identificación de clientes y el nombre de los clientes. Quiero con esto crear un buscador que tenga relacionadas dos combobox, uno con la identificación del cliente y otra con el nombre del cliente, además de un tercer combobox que me lance la información del o los números del reporte según el cliente, teniendo en cuenta las siguientes características: 1. Existen varios registros del mismo cliente, al seleccionarlo debe aparecer únicamente los reportes referentes a él. 2. Permitir también buscar por el número de identificación. Para dar mayor claridad a mi consulta, adjunto…

hola expertos buenas tardes mi idea es como puedo expandir el codigo que se ejecuta entre la columna "y:af" a las columnas "ah:by" y ademas se ejecute en la hoja 1 al mismo tiempo gracias de antemano

hola expertos como puedo modificar el principio de este codigo con la idea de transpasar no solamente los dato de la columa B sino tambien los datos de la columna A,B,C Sub zero() Dim ultimaCeldaDatos As String 'hallar la ultima celda con datos de la columna B de la hoja estadistica ultimaCeldaDatos = Sheets("analisis").Cells(Rows.Count, 2).End(xlUp).Row 'copiando datos de columna B Sheets("analisis").Range("b5:b" & ultimaCeldaDatos).Copy Sheets("archivo").Select 'posicionando en la celda donde pegare los datos en la hoja archivo Sheets("archivo").Cells(2, Columns.Count).End(xlToLeft).Offset(0, 2).Select Selection.PasteSpecial Application.CutCopyMode = False …

Buenas, Hay alguna razon por la cual cuando se ejecuta una Macro, se genere un archvio de solo lectura alterno al original? El codigo que uso es este: Sub TrapasarTrimestre2() 'Leyendo cadena de texto Dim Anio%, Trimes As Variant Dim Conn As Object, rst As Object, SQL$ Dim Ruta$, Datos As Worksheet, RELACION As Worksheet, Rubro$, Tabla$, Campos$, RutaTriAnt$ Dim LibroDestino As Workbook, Z As Long, Condicion$, Cm%, Columnas As Variant, CamposRecord As Variant Dim FIni As Date, FFinal As Date ', UltFila As Double Dim HojaActual As Worksheet, Uf As Double, x As Long, y As Long Dim LibroTriAnt As Workbook With Application .ScreenUpdating = False .EnableEve…

Buenos dias Tengo una rutina que me guarda los datos de un formulario a dos hojas excel dentro del mismo libro y necesitaría que en esa misma rutina me creara un archivo pdf con el nombre del label "lb_parte" Private Sub Imprimirparte2() Dim final As Long Dim fila As Integer With ThisWorkbook .Sheets("PARTE DE TRABAJO").Range("r2").ClearContents .Sheets("PARTE DE TRABAJO").Range("d2").ClearContents .Sheets("PARTE DE TRABAJO").Range("g2").ClearContents .Sheets("PARTE DE TRABAJO").Range("l2").ClearContents .Sheets("PARTE DE TRABAJO").Range("c3:o4").ClearContents .Sheets("PARTE DE TRABAJO").Range("b8").…

Muy buenas¡ soy nueva y novata :S, no se si me podréis echar una mano. Veréis, me acabo de meter con el tema de los macros y estoy empezando. he estado haciendo con excel un mapa a base de trazo libre, para hacer un mapa interactivo, cada país que he dibujado le he asignado una macro con unos datos, pero no se que pasa, que cuando asigno la macro y clikeo en el país, me salen todos los datos descolocados, cuando los quiero colocados en dos celdas determinadas. No sé si me he explicado. Decirme, si sois tan amables, que pasos tengo k daros para indicaros mejor, si tengo que subiros el VBA o a lo mejor alguien sabe lo k tngo k hacer. En cualquier caso muxisimas gra…

Estimados Amigos, necesto saber como hacer una macro para que al seleccionar un dato de una Lista Desplegable se ejecute una formula y el resultado se muestre en una celda

buenas noches, tenga una duda y necesito saber como crear una archivo mediante un userform y que todos mis datos se vallan una base de datos en access. si hay ejemplos indicar los link.

Hola, tengo una coluna (a) que contiene el nombre de un producto, en la columna (E) tengo un texto de la direccion de la web donde se encuentra y quisiera hacer una macro para que el tecto contenido en la columna e pase a ser un hipervinculo de la columna (A) que es donde tengo el nombre para que cuando le pulsen al nombre les lleve a la web donde esta el produscto pero no se como hacer esta macro gracias

Hola buenas a todos, me gustaría saber si me pueden ayudar con esta idea ya que no controlo mucho de macros. Mi intención sería la creación de un "Calendario de Ausencias y retrasos" (adjunto prototipo abajo) en el cual tenemos en la primera columna: o un código o un nombre del alumno (añadí las dos pues no se si hay diferencia) y en la primera fila los meses ( debajo de los cuales están los días, laborales). Encima del calendario iría una "cajita" con los apartado Alumno, Fecha y 2 "botones" (casillas con "Ausencia" y "Retraso" escrito"). La idea sería que al escribir el nombre del Alumno (o el Código, como prefieran ustedes) junto con la fecha, Excel localizase la c…

Hola a todos un gran FORO y gracias de antemano Tengo una BD Excel con aprox. 16.000 referencias de articulos y necesito introducir cada una estas el una celda de una pagina WEB para que esta pagina WEB muestre la foto correspondiente a esa referencia; gurdar la foto en una carpeta e insertar el nombre de la foto en la tabla de Excel. Puedo hacerlo con un macro? Gracias y feliz año .-

Buen día a todos. Que instrucción debo de incluir en mi formulario para que cuando este se active haga el setfocus en la pagina1 del Multipage1. Sucede que si en la consulta anterior a este formulario me quedé en la pagina 3, lo cierro y lo vuelvo a abrir se queda es la pagina 3 Gracias.

Buenas tardes,Estoy haciendo una macro en excel, que entre otras cosas, se encarga de mandar un email en el que pongo una tabla de una ppt.El problema que tengo, es que no consigo copiar la tabla de la ppt a un email de outlook. La opción que se me ha ocurrido es copiarla en un excel y de ahí al email pero resulta que no me mantiene los tamaños de la tabla, por lo que no me soluciona nada, dado que tengo que ajustarla a mano¿Alguien me puede decir cómo lo puedo hacer?.Un saludo y muchas gracias,