buenos dias, me pueden colaborar indicándome como hacer lo siguiente, yo tengo una base de datos y a esta realizo una serie de informes con la ayuda de dos tablas dinamicas ubicadas en hojas diferentes y lo que quiero hacer es que el usuario pueda en una casilla seleccionar un rango de fecha las cuales deben ser de quincenas, es decir del 01 al 15 de julio o del 15 de julio al 15 de agosto y que automáticamente las tablas dinámicas carguen los datos de esas fechas. gracias por su ayuda:welcoming:

Hola tengo un problema estoy haciendo un macro para registrar las facturas, el problema es que todavia no lo tengo muy claro con los macros el tema es asi, tengo una factura que despues de imprimir tengo que generar un macro que me copie la informacion a otra hoja. el tema es que tengo varios productos para una sola factura entonces pasa que en una sola filas no queda todos los items sino que queda en maximo 10 filas entonces pasa 2 cosas si grabo el macro no se luego como hacer para que los nuevos datos los grabe abajo de los antiguos si alguien tiene alguna idea gracias dejo lo que tengo grabado en el macro Sub Macro4() ' ' Macro4 Macro ' ' ActiveCell.FormulaR…

Estoy trabajando en una macro de forma que me permita extraer de una pagina de ofertas de empleo americana la información de ofertas según el código postal y la zona. Creo que la macro está bien pero cuando intento ejecutarla, nada más empezar, en el módulo 2 me subraya en azul la linea Macro 1 y aparece un aviso diciendo "error de compilación, No se ha definido Sub o Funcioo" He revisado la hoja de excel y no sé donde puedo equivocarme. La macro del módulo 1 es la que tendría que activarse si funcionase bien la macro Aquí tenéis el codigo de programacion del módulo 2. Pongo en rojo la línea donde excel se detiene y aparece el mensaje antes indicado -----------------…

Hola he mirado de ocultar ciertas filas segun la informacion de una celda, pero ahora quiero que al cambiar de valor se vean de nuevo las celdas que no se refieren a la variable o que se vean todas si es un valor diferente a cualquiera declarado. Gracias por su ayuda oculta_celdas.zip

Hola, tengo un libro excel con varias hojas y quiero hacerlo atractivo. Quiero empezar por cambiar los botones sosos creados con vba, para eso estoy creando auto formas atractivas, mi problema viene al darle la orden a esa auto forma para que ejecute por ejemplo un formulario creado con VBA, pues le doy a asignar macro pero ya no se como continuar. si por ejemplo el botón que actualmente tiene esa misión tiene este código: Private Sub CommandButton1_Click() UserForm18.Show Worksheets("formulario").Select End Sub ¿Que deberia escribir en "asignar macro" de la auto forma creada para que funcione y pueda abrir el userform18? Gracias.

Estoy trabajando en una macro de forma que me permita extraer de una pagina de ofertas de empleo americana la información de ofertas según el código postal y la zona. Creo que la macro está bien pero cuando intento ejecutarla, nada más empezar, en el módulo 2 me subraya en azul la linea Macro 1 y aparece un aviso diciendo "error de compilación, No se ha definido Sub o Funcioo" He revisado la hoja de excel y no sé donde puedo equivocarme. Aquí tenéis el codigo de programacion del módulo 2. Pongo en rojo la línea donde creo que está el problema ---------------------------------------- Sub test() Dim eROW As Long Dim ELE As Object Set STH = Sheets("SHEET1") Ro…

Buenas. Vereis quiero realizar una macro que, cuando el usuario clickee el botón de guardar como aparezca en el diálogo un nombre de archivo, a modo de sugerencia, distinto al que posee el propio archivo. He intentado lo siguiente: Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Application.Dialogs(xlDialogSaveAs).show ("Nombre sugerido.xlsx") End Sub [/CODE] pero lo que obtengo es que, una vez guardado el archivo, me pide volverlo a guardar y me gustaría evitar eso. También había pensado en, por medio de la macro, guardar el archivo en alguna parte (windows/temp por ejemplo) con el nombre que yo sugiero y luego hacer aparecer …

Tengo 10 filas en las que quiero agrupar unos 1000 valores en grupos mas o menos uniformes de 100, pero no siempre va ser posible porque a veces un mismo valor se repite supongamos unas 200 veces. Yo tengo una macro para cada fila que es algo como esto los valores alto y bajo dependen si hay mas de 125 y menos de 75, pero si tengo 200 nunca va saltar "bien" y la macro se queda en el mismo punto Sub Porcentajes() Do If Range("af24").Value = "Bajo" Then Range("ao24").Copy Range("u24").PasteSpecial xlPasteValues End If If Range("af24").Value = "Alto" Then Range("an24").Copy Range("u24").PasteSpecial xlPasteValues End If Loop Until Range("af24").Value = "Bien" E…

(Solucionado)Copiar Filas en Respectiva Hoja Hola a todos , les escribo porque hace un tiempo que estoy buscando solucion a mi problema y no encuentro como solucionarlo. Estoy haciendo una planilla de Gastos y quiero q copie en otra Hoja de calculo toda la fila para sacar el total de "x" apartado. Ejemplo. Tenngo varios grupos . Uno de ellos es Cigarrillos , quiero que la fila cigarrilos se copie en la Hoja cigarrillo. Adjunto la planilla excel. Y a ver si alguno con mas conocimiento puede darme un poco mas de luz en este tema. Saludos y Gracias Jon julio.rar

Buenos Dias Esta es una consulta a todos, me gusta harto excel a nivel formulas y tablas dinamicas me manejo bien, se que estoy aun debil en entender la logica de como operan las macros, programarlas. mi consulta tiene relacion con que los que ya son kapos en macros , de a poquito den tips de como entender la programacion de macros. nose como ejemplo hoy aprenderemos como movernos uando comando de vb : ejemplo celda a1: moverse hasta celda j1 de a poco dar sub rutinas basicas para ir comprendiendo y explicando como se hace , que es lo que significa en mundo macros vb lo digo por que la idea no es hacer un copy paste de una duda, la idea es aprender y entender lo …

Buenas Tardes, mi consulta es la siguiente ,tengo una secuencia en macros para que realize una copia de una hoja en otro libro y la guarde en una determinada ruta, este me funciona perfectamente con el boton de Formulario, pero al realizar este mismo macros en un boton Activex me lanza un error de compilacion. Por favor su ayuda , no puedo subir el archivo porque es demasiado pesado , este es el macros... Sub Macro1() Application.ScreenUpdating = False Range("D8").Select Selection.Copy Sheets("Liquidacion").Select Range("F11").Select ActiveSheet.Paste Sheets("Detalle").Select Range("E8").Select Application.CutCopyMode = False …

Un placer saludarlos, estimados foristas. Estoy realizando un proyecto de un kardex y estoy buscando la forma de insertar formulas con una macro, he buscado en el foro y no encuentro algo que se ajuste a mi necesidad. Adjunto un archivo en donde hay una hoja con el nombre de EJEMPLO ahi en las columnas "H" y "N" hay formulas que estan resaltadas en rojo, cada formulas como podran ver se ajustan a los rangos de cada articulo. Tengo mas de mil articulos y necesito aplicar las formulas a cada articulo que son los costos promedios y los saldos de la cantidad. Cada articulo estan separados por dos filas en blanco y establecen rangos propios. En la hoja2 esta la hoja de tr…

Que tal: tengo este documento con un formulario que me carga datos de la hoja de calculo, lo que necesito es que el dato que seleccione en el listbox, al dar clic en eliminar se elimine de mi hoja de calculo. saludos!!!! Listbox.rar

Buenas Tardes, Soy nuevo en el foro y tengo una duda ojala me puedan echar la mano a reslver este lio que se me ha presentado o saber si hay solución, Tengo una macro para envío de correos electrónicos , es muy sencilla y me funciona perfectamente, solo que el día de hoy me pidieron que el cuerpo del correo que se esta enviando tenga un formato en algunas palabras que toma de unas celdas, les envío el código y señalo que celdas son las que se necesitan cambiar a negritas en el cuerpo del correo, ojala me puedan ayudar. Muchas gracias de ante mano. Sub enviar() Sheets("Envios_mail").Select ufila = Range("a" & Rows.Count).End(xlUp).Row For i = 1 To ufila If Cell…

Generar una hoja nueva con contenido de otras hojas en ella. Edito todo el post: Por fin he logrado introducir dos fechas y que cuente los dias entre una y otra atendiendo a los colores. Ahora necesito colocar en otra hoja un boton para generar una hoja nueva, esta hoja tiene que crear con diversos datos, entre ellos, una copia del archivo adjunto. A ver si me podeis ayudar, un saludo. Libro1.xlsm.zip

Buenos días, al realizar una macro con una tabla dinámica y un grafico dinámico y al segmentar el grafico me sale el error 1004 en la siguiente línea de mi macro: ActiveWorkbook.SlicerCaches.Add(ActiveSheet.PivotTables("Tabla dinámica1"), _ "PER").Slicers.Add ActiveSheet, , "PER", "PER", 9, 57.75, 144, 198.75, ustedes me podrían decir por que?

Estimados masters de masters: Queria preguntarles sobre una duda existencial que tengo con respecto a conexiones ADO: ¿Es posible conectar excel atravez de conexiones ADO a una base de datos que está en dropbox y que es pública? Por ejemplo cuando conecto una bd que esta en mi computador la conexión seria asi : With cnn .Provider = "microsoft.jet.oledb.4.0" .ConnectionString = "data source=" & ThisWorkbook.Path & "\base1.mdb" .Open End With he intentado cambiar el data source introduciendo un link de dropbox que es público pero no me conecta: With cnn .Provider = "microsoft.jet.oledb.4.0" .ConnectionString = "data source=https://dl.dropboxusercontent.c…

hola compañeros, soy nuevo en esto y quisiera su apoyo. Tengo una base de datos de contratistas, lo que sucede es que los mismos contratistas se repiten en varias ciudades, por decir: estos vienen a ser desrinatarios en la guia de remision: ciudad ruc contratistas ------------------------------- pisco 123 GyM chincha 123 GyM chincha 678 CGP pisco 678 CGP al momento que quiero generar una guia de remision y me pide el destinatario lo quiero jalar con un combobox, pero jala solo el primero de pisco o el primero de chincha. espero sus comentarios: LO ESTUVE HACIENDO ASI: ----------------------------------- Private Sub…

Escoger por medio de CHECKBOX que datos lleva mi tabla dinamica Buenos Días: No se como hacer para crear una macro que al realizar una tabla dinamica me permita escoger por medio de los CHECKBOX que campos y en donde va lo que escoja. Por favor necesito de sus conocimientos lo mas pronto posible

Estimados buenas tardes Necesito que a través de este archivo "buscar faltantes", su macro sea modificada y busque de las misma forma los duplicados de cualquier rango de la planilla y los arroje en otra hoja en la celda que uno desee. Necesito que sea de la misma forma del archivo adjunto Favor quedo atenta a sus comentarios. Les agradeceré cualquier tipo de ayuda Numeracion consecutiva2 -NVR (faltantes).rar

Hola soy nuevo en esto de los macros, intento guardar facturas y que su nombre dependa de 2 campos el problema es que cuando utilizo el macro creado a partir de una grabación funciona ahora cuando lo quiero modificar ya deja de funcionar, dejo el macro inicial para que me puedan ayudar, Sub Macro3() ' ' Macro3 Macro ' ' ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Users\gonwana\789.pdf", Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _ False End Sub yo necesitaría que el nombre que se guardara dependiera de la celda C8 y que ademas le colocara el día y hora …

Hola Foro. gracias por su ayuda, le cuento que he creado un formulario que ayuda a copiar los datos de una BD a otra hoja en función a un criterio(combobox2),este formulario esta en el archivo "Combo",sin embargo quiero mejorar este código , quiero incrementarle un nuevo criterio y para ello he creado el combobox3, que permite seleccionar ademas el segundo criterio. y cuando quiero ejecutarlo me indica "este argumento no es opcional por favor puden ayudarme el archivo a mejorar es el "Combo1". adjunto una carperta zipeada con los dos archivos. Consulta.zip

Hola quisiera que me ayudaran a primero que nada buscar un valor dentro de un rango y que despues de encontrarlo evalue la informacion que hay debajo y que se cumplan las condiciones para poder realizar una accion como insertar una fila con el error, lo que quiero es que se busque CW y el campo de la izquierda de route estara muy conectado con CW ya que tambien de ese campo depende ciertos errores y en la fecha tambien se usa por que eso filtrara para quitar cualquier fla que tenga fecha diferente en este caso queremos usar la fecha del dia 8 En el ejemplo de abajo para que sea la información correcta abajo de todos los CW que se encuentren tiene que haber una de las 7 e…

Hola compañeros, hace rato no ingresaba a participar del foro, pues las ultimas ayudas que tuve fueron de excelente utilidad; en esta ocacion vengo con otro interrogante: tengo un combobox con varios elementos (1-Acetaminofen, 2-Loperamida, 3-Omeprazol, 4-Timolol, 5-Loratadina, etc....) mi inquietud es, como puedo hacer para poder seleccionar dos o mas elementos de ese combobox??, o que otra herramienta puedo usar que me permita seleccionar dos o mas elementos??? Agradezco la colaboracion que me puedan brindar.

Buenos Dias: Les presento la siguiente inquietud: En una macro tengo una tabla dinamica la pregunta es, es posible que cuando contruya mi tabla dinamica me permita escoger los campos que van dentro de ella con unos optionbutton???, si tienen algun ejemplo se los agradezco