Buenas tardes a todos, quisiera que me dieran una ayuda porfavor les explicare mi duda, gracias ante todo: Tengo mi aplicación multi páginas, la cual en la pagina 1 se encarga de filtrar datos: La página 1 cuenta con 1 combobox el cual me filtra el tipo de personas que hacen una función determinada, y me lo lista en la pagina 2 . En la página 2 tengo 2 Listbox la primera es donde he filtrado anteriormente el personal encargado de hacer la función determinada y la 2nda lista es para pasar los items seleccionados de la primera lista a esta segunda lista. Lo que deseo es filtrar lo siguiente: En la página 3 tengo una BD de Insumos la cual deseo filtrar la primera column…

Hola, hasta ahora me habeis ayudado gracias a las solicitudes de otros. Ahora tengo un problema. Tengo un libro con datos entrelazados y necesito una macro que me copie solo los datos de dos de las hojas y me cree un libro nuevo con el nombre de una de las celdas. Solo necesito que copie los datos, no las formulas, ni macros, solo los valores que contiene. Esto es lo que he probado para una de las hojas pero me da error. Sub Copiar_Y_Guardar() Sheets("FACTURAS").Copy ActiveWorkbook.SaveAs "C:\Users\Desktop\cliente\" & Range("J2") & ".xls" ActiveWorkbook.Close False End Sub[/CODE] Esto lo tengo que hacer con dos hojas del libro a la vez y guardarlas …

como puedo poner la ubicacion de donde debe aparecer el userform, es decir; en que parte de la pantalla quiero que aparesca, resulta que redimensiono las medidas del userform pero al redimensionarlas la posicion en la que aparece en la pantalla se vuelve invisible (a los ojos humanos no a nivel de programacion). por ejemplo quiero que aparesca con la esquina superior izquiera del userform en la esquina superior izquierda de la pantalla. ¿como lo logro? anexo archivo Dardimensiones_a_Userform.xls

Buen día, tengo un problema con un formulario la primera vez que lo ejecute lo hizo adecuadamente, pero lo volvi a utilizar y al cambiar el combobox ya no me copiaba las celdas a los textbox (lo he hecho con la ayuda de varios tutoriales), subo el archivo que consta de 2 combobox 1 para seleccionar al sujeto y en base a ello buscar la hoja en que se almacenan los datos y el segundo, el cual necesito para rellenar los txtbox. De ante mano gracias Copiar datos a un textbox.rar

Hola, como estan? estoy tratando de utilizar una macro para realizar búsquedas en internet (google específicamente), pero no logro dar con el texto del código fuente para insertarlo en la linea de código. agradecería mucho que me dieran una mano, gracias Sub LoginGOOGLE() Dim IE As Object Set IE = CreateObject("InternetExplorer.Application") With IE .Top = 0 .Left = 0 .Height = 1000 .Width = 1250 .Visible = True .Navigate "https://www.google.com/" Do While .Busy Or Not .ReadyState = 4: DoEvents: Loop .Document.getelementbyid("gLFyf gsfi").Value = "buscar lo que sea en goog…

Estimados amigos. Me surge una duda, existe una forma de saber si se ha deseleccionado un Item de un ListBox ¿? Es decir, si tengo el primer item de un ListBox seleccionado, y lo destildo, hay manera de registrar esta acción para poder ejecutar una macro ¿? Agradecido de antemano por vuestra ayuda.

Buenas noches de nuevo!! Tengo un formulario donde quiero filtrar unos datos y que los traiga a un listbox pero cuando ejecuto la búsqueda me da el error siguiente: "Se ha producido el error 381 en tiempo de ejecución: Could not set the list property. Invalid property array index" Describo el código que tengo por si me podéis ayudar a dar con el problema (lo tengo hecho en otra base de datos y me funciona perfectamente..... no entiendo porque en esta no...) Private Sub cmbEncabezado_Change() Me.lblFiltro = "Filtro por " & Me.cmbEncabezado.Value End Sub 'Mostrar resultado en ListBox Private Sub CommandButton5_Click() Set h1 = Sheets("ENT…

Hola foro Otra vez solicitando su ayuda Recién me han ayudado a colocar fecha hora y minutos en celdas separadas, pero al estar utilizando la solución dada, me percate de que me falta una linea de código que, al borrar el contenido de la columna A, también se borren los contenidos del las celdas B, C y D. Subo el archivo con el código que me ayudaron a modificar, esperando me puedan ayudar a insertar el código para borrar como he dicho antes. Gracias de antemano pegar fecha 2.xls

Expertos saludos a todo de esta comunidad informática, mi duda es que no logro ubicar si fuera un error o desbordamientos de código, lo que pasa es que me funciona muy bien la macro realizar los reportes por cada alumno, el detalle es que cuando en algunos reportes los criterio evaluación no coinciden cada criterio no lo esta tomando bien para sacar el total, tengo mas de 30 alumnos por cada archivo, me tomado el afán de revisar cada reporte en algunos reportes del alumno lo cuadra muy bien la sumatoria pero en algunos reportes no los toma bien el total sale mas a en otros casos menos no lo generando la sumatoria de acuerdo a los criterios eso es el único detalle que me…

estoy por crear un userform de busqueda y navegando por alli e podido ir paso a paso pero me tope con el siguiente problema. el usuario debe de teclear el nombre del archivo con su extencion ( ejemplo: nuevo.xlsx) y el buscador busca todos los archivos con ese nombre incluso aun si llevan otro nombre ademas del que tecleamos en el textbox (ejemplo: nuevo documento.xlsx) en practica encuentra todos los archivos que se lleven al principio el nombre de nuevo y sean de la extencion especificada todo marcha bien pero e decidido que para la comodida del usuario elijan de un combobox la extencion dejando asi que solo necesitan teclear el nombre...... pregunta: como le hago par…

Hola a todos, mi nombre es Maurizio No saber cómo hacerte un homenaje a tu habilidad y siempre estar dispuesto a ayudarme a llevar a cabo mis proyectos. Deseo agradecerte infinitamente y te ofrezco todo mi último trabajo. Este es el enlace para descargar todo Hola y gracias de nuevo. Saludos sinceros a Tutti de A. Maurizio. ######################################################## Hi everyone, my name is Maurizio Not Knowing how to make you a tribute to your skill and always willingness to help me carry out my projects. I wish to tell you infinitely thank you and I offer you all my latest work This is the link to download everything Hello and Thanks…

Buenos días, intento borrar filas metiendo varios criterios (texto) situados en una sóla columna mediante este código pero no consigo meter varios. Agradecería cualquier ayuda. Muchas Gracias de antemano: Sub ElimarFilaxCriterio() u = Cells(Rows.Count, 1).End(xlUp).Row qColumna = "x" qCriterio = "XXX", "YYY", "ZZZ" For i = u To 2 Step -1 Cells(i, qColumna).Select If Cells(i, qColumna) = qCriterio Then ActiveCell.EntireRow.Select Selection.Delete End If Next End Sub

Hola amigos de AE. tengo un problema con una macro que antes funcionaba bien. La macro es para eliminar la hoja activa. Hay 2 msgbox para confirmar la decisión de eliminar. Antes funcionaba bien pero ahora me da un error y cierra excel. En el archivo anexo. la macro funciona bien Y las 4 figuras que incluyo en el archivo corresponden al mensaje que me da en el archivo original. Alguna idea de cual puede ser el problema u otro comando que haga la misma operación. Gracias!1 eliminar hoja.xlsm

hola buenos dias, tengo una macro que copia una hoja( ingreso), me copia el contenido y renombra la hoja con fecha del informe pero el problema que se me genera es cuando no modifico la fecha sigue corriendo la macro me crea otra hoja pero no renombra la hoja con la fecha porque ya existe en otra. mi consulta es ¿ cómo puedo hacer para que se detenga la macro y que me avise en un mensaje que la fecha del informe ya existe y no se puede guardar ? para solucionar el problema adjunto la macro Sub guardar() Application.ScreenUpdating = False Sheets("ingreso").Copy After:=Sheets(1) ActiveSheet.Name = Range("d13") Sheets("ingreso…

El siguiente código que los estoy presentando funciona bien perfecto en Excel suma y saca el total y todo eso, pero esa misma cantidad lo sumo en la calculadora o manualmente me sale otra cantidad, por ejemplo cuando en la hoja rubrica pulso el botón generar me genera dos rubricas por que solo tengo dos alumnos registrado, bueno la rubrica3 la cantidad de sumatoria en el hoja esta bien pero cuando lo sumo en la calculadora sale otra cantidad y así comparo con las demás hojas , espero que me han entendido, de antemano muchas gracias expertos, adjunto el archivo. Sub correspondencia() Dim NumCriterios As Variant Dim nCantDatos As Double Dim nDatos As …

Hola buenas, Tengo la siguiente cuestión. Necesito poder filtrar con código VBA, para sacar los resultados únicos en una lista, para en el futuro hacer una lista validada con ella. Tengo la siguiente tabla con "Soporte" y "Espacio". En la celda E5 tengo una lista validada con mis soportes y me gustaría sacar en G5 una lista con los espacios dependiendo del soporte que elija en mi lista validada de E5. Es similar, por poner un ejemplo, a utilizar la función filtrar, como muestro en el ejemplo de F5 pero necesito hacerlo únicamente en VBA. En las capturas muestro como me gustaría que se viera utilizando la función filtrar, pero me gustaría rea…

Buen día Señores tengo una duda, actualmente tengo una macro que se ejecuta formularios al abrir un documento de Excel 2003, todos los formularios se ejecutan correctamente, pero acá es donde tengo la duda, ¿hay alguna forma que si al ejecutar el formulario modal este no me afecte el resto de libros abiertos? Me explico, si tengo los formularios configurados en forma modal, procedo a ejecutar la macro (prueba.xlsm) y luego de esto voy a abrir otros documentos (libro1.xlsx, libro2.xlsx... etc.) los abre pero no puedo acceder a ellos, es decir, todos los libros quedan bloqueados, ya probe igual en dejar el formulario en forma "no modal", me deja abrir los archivos e igual …

Buenas tardes, Estoy tratando de armar un archivo donde al escribir los códigos de ciertos productos este los busque en páginas web y me traiga los precios asociados, la macro funciona ahora como esta pero el problema ocurre cuando un código no lo encuentra en la página me escribe el precio del código anterior. Alguien me puede ayudar a que si no encuentra ese código en la página el valor quede en blanco? Este es el código que estoy usando. Sub test() Dim IE As New InternetExplorer Dim precio1, precio2 As Variant Dim doc As HTMLDocument Range("B2:C1000").Clear Cantfila = Sheets("Hoja1").Range("A" & Rows.Count).End(xlUp).Row For …

Hola compañeros, Me gustaría dejar desactivadas (o quitar, si es posible) las opciones que están marcadas dentro del cuadro rojo de la imagen adjunta, y dejarlas desactivadas tal y como aparecen en el cuadro azul. No he realizado nunca nada así, y toda la información que encuentro por Internet me aconseja realizarlo desde código XML. Pero estoy convencido de que debe de existir una sentencia algo parecido a la siguiente: ... Application.CommandBars.Controls("Eliminar").Enabled = False ... Un saludo, y muchas gracias por vuestro tiempo.

Buenos días: Ante todo saludados y agradeceros lo que, poco a poco he ido aprendiendo en este foro, aunque de forma anónima, Este es mi primer post y entro preguntando y con una consulta ya que me encuentro atascado en una hoja y no se como solucionar mi problema, os cuento: Tengo una hoja en la que dependiendo de la categoría profesional que se le ponga, permite poner dietas o no. La Categoría se coge de una lista desplegable y la celda dietas tiene una validación de datos personalizada con formula que "mira" en una celda que número hay, el número viene de una función "O" que analiza anteriormente las categorías que se han introducido y solo muestra "VERDADERO" si s…

Hola necesito saber como puedo hacer para insertar filas en el historico pero solamente segun la cantidad de filas que tengan datos en la hoja de la hoja (datos de entrada). Generalmente son 15 muestras pero en ocaciones son menos por eso quiero pasar solamente la cantidad que tengan datos ingresados. Adjunto Planilla. Muestra.xls

Adjunto ejemplo donde se ve claramente lo que quiero hacer. Gracias de antemano. ejemplo.rar

Hola a Todos, Tengo un archivo que hace la búsqueda correcta en una carpeta de un archivo en formato PDF, sin embargo lo que deseo es que este mismo haga búsqueda parciales, osea que me busque los tres dígitos de un archivo, en este caso lo deseo para que me busque números de boletas y no deseo escribir todo el nombre del archivo, porque es extenso. ¿Es posible hacer eso? Espero su pronta respuesta. ayuda_pdf_1.xlsm

Buenos días, expertos por favor me pueden dar una mano con una macro donde me debe mostrar un mensaje si la boleta fue impresa con anterioridad, para que me diga por lo menos se esta duplicando con la impresión de dicha boleta algo así, de lo contrario que me imprima normalmente, por favor los agradecería un montón. Adjunto el archivo Planilla-de-remuneraciones-y-boletas-de-pago-1-1.xlsm

Hola amigos... Motiva este tema me ayuden a resolver mi dilema... nececito lanzar una macro al pulsar enter sobre una celda seleccionada... Estoy realizano un formulario para cargar datos, que seran registrados en otra hoja.. la idea es que al llegar a la ultima celda de carga del formulario y darle enter, automaticamente ejecute la macro de registrar los datos cargados en el formulario en la otra hoja que contiene una planilla.. actualmento lo hago con un boton, pero para ello debo tomar el mouse y hacer click en el boton y deseo evitar ese paso y asi agilizar la carga... Agradecere muchisimo su ayuda como siempre.. Abrazos y exitos a todos.