Buenos Dias, el dia de ayer me arreglaron el siguiente código ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _ "Hoja1!R1C1:R" & Sheets("Hoja1").Range("A" & Rows.Count).End(xlUp).Row & "C28", _ Version:=xlPivotTableVersion14).CreatePivotTable _ TableDestination:="Hoja2!R4C1", TableName:="Tabla Dinamica2", _ DefaultVersion:=xlPivotTableVersion14 y funciono perfecto, ahora quiero remplazarlo en en otra macro y remplace algunos campos : …

Estimados! recurro nuevamente a ustedes, he estado averiguando y no he dado en el clavo, ya que la gran mayoria de usos de combobox son a traves de las propiedades del rango, y en mi caso no me sirve. en el adjunto subo un ejemplo de lo que quiero realizar, en donde básicamente en el formulario debo seleccionar un cliente y que en el segundo combobox(seleccione fecha) me muestre solo las fechas asociadas al cliente y en el textbox me muestre su resultado. y con el boton actualizar poder actualizar o cambiar este resultado. explico nuevamente. selecciono cliente1, combobox(seleccione fecha) me muestra la fecha de hoy y la de antes de ayer(en el caso de que tenga esos di…

Hola a todos Necesito pedirles un favor, tengo un archivo PST con los contactos de la Fuerza de Ventas y otro con los datos de un área particular de la empresa, en una misma ruta en la red, y necesito un código que vaya a buscar los archivos donde están, los copie a una ruta local, y los importe a los contactos de Outlook. Yo tengo solo una parte del código, pero necesito lo mas importante, que es importar el PST a los contactos del Outlook. No se como se hace y no he encontrado nada en internet que me sirva debido a mis conocimientos básicos sobre vbs. Desde ya, les doy las gracias a los que tengan un par de minutos para ayudarme con esto. Saludos Sebastian Rubio A…

Hola tengo aprox. 600 excel los cuales tienen 5 hojas y de los cuales necesito datos especificos los cuales provienen de las hojas 2 y 3 y necesito los datos de la tabal del numero 29 de la hoja 2 y los datos de la hoja 3 los cuales son VOL. CONCRETO CICLÓPEO VOL. GAVION VOL. SECO PIEDRA VOL. SACOS DE ARENA AREA TRINCHOS METALICOS les dejo el archivo de muestra ua que soy novato en el tema porfavor gracias T-076.xls

Buenas noches estimados tengo un pequeño problemita... debo imprimir un formato A6, pero a la vez con un option buton imprimo de acuerdo a un rango OPTIONBUTON1: AZUL = Range("B2:H28").Select OPTIONBUTON2: AZUL + VERDE = Range("B2:H43").Select OPTIONBUTON4: AZUL + VERDE + AMARILLO + NARANJA = Range("B2:O43").Select OPTIONBUTON3: AZUL + VERDE + AMARILLO = aqui esta mi problema lo he querido hacer asi: Range("B2:H43, I2:O22").Select pero me imprime en hojas separadas y deseo que salga en una sola hoja Espero me sepan entender y ayudar quedo muy agradecido

Buenas Tardes Señores del ForoNecesito una mano con una planilla, para la cual desearía que una macro me realice lo siguienteEn la columna "A" fila "1" podría tener datos hasta la "A" fila 460000" por decir asi, contiene la ruta de donde están ubicados mis archivos y,En la columna "B" fila "1" podría tener datos hasta la "B" fila 460000" por decir asi, contiene mis archivos propiamenteLa idea es seleccionar la matriz completa y que me las combine en la columna "A" fila por fila, o en otra columna, que podría ser la columna "C"Desde ya agradecido..Adjunto Planilla Ejemplo LISTADO-CONCAT-2.xlsm

Hola a todos, queria hacer una consulta, se puede cambiar el color de fondo de un TextBox que está situado en el UserForm1 desde el UserForm2

Hola a todos Necesito ayuda con un tema que me tiene de cabeza. Tengo varios archivos de excel con macros en mi PC. Estos básicamente lo que hacen es tomar datos de otros archivos excel para formar un reporte o análisis. Los otros excel están también en mi pc o se pueden bajar de un programa llamado sap. El problema es que como todos estos archivos se encuentran en mi pc, a la hora que yo ejecuto la macro se sale excelente todo. Pero estos archivos se encuentran en una carpeta compartida del trabajo y cuando otro usuario intenta ejecutar la macro esta le da un error por que no encuentra el excel especifico de donde tomar la información (pero toda la información esta en…

estimados compañeros del foro, si son tan amables de darme sugerencias con una macro,a la cual para mi gusto no le falta nada mas que al copiar a otra carpeta,esta no pierda el ancho de las columnas. esta es mi macro: Sub Salvar() mio = ActiveWorkbook.Name ruta = ActiveWorkbook.Path Workbooks.Add otro = ActiveWorkbook.Name Workbooks(mio).Activate nombre = Range("E4").Value Range("A1:K63").Copy Workbooks(otro).Activate Sheets(3).Select Range("a1").Select ActiveSheet.Paste ActiveWorkbook.SaveAs ruta & "\" & nombre ActiveWorkbook.Close False MsgBox "proceso terminado. El archivo se ha guardado en la carpeta: " & ruta &a…

Estimados, primero que nada mucho gusto, soy nuevo en el foro y llevo un par de años trabajando en Excel y hace poco empecé con VBA. Entiendo la estructura de programación ya que manejo un par de lenguajes pero aun no me atrevo a decir que lo domino. Estoy trabajando en un archivo que tiene como finalidad entregar una cotización en base a una combinación de productos, una tabla que asigna un límite de crédito y cantidad de productos a contratar (según políticas comerciales de mi empresa) y una tercera sección que corresponde a un checklist de documentación a solicitar según el tipo de empresa cotizante. Estas 3 secciones conviven armoniosamente en una sola hoja principal,…

Amigos tengo este pequeña consulta, veran tengo en excel undata bajada de mi DB la cual despues modifico poniendo un dato en la columna B, ahora quiere exporta eta informacion a la DB falta como este en el archivo adjunto. mediante macro se puede realizar esta tarea, subir la tabla y el dato que esta en b1. por favor me pueden dar una ayuda, como podría realizarlo. Adjunto archivo y imagen de la conexión que utilizo Saludos Muscaria Zonas.rar

Buenas tardes. Gracias de antemano por la ayuda. Os explico mi problema. En la hoja 4 (Datos 2), quiero poner un pequeño buscador, lo más simple posible. He insertado un cuadro de texto de ActiveX con lo siguiente (llamado BuscadorPrueba); Private Sub BuscadorPrueba_Change() Dim DatoConsultado As String If Hoja4.BuscadorPrueba.Value <> "" Then DatoConsultado = "*" & Hoja4.BuscadorPrueba.Value & "*" Range("C10").CurrentRegion.AutoFilter Field:=1, Criteria1:=DatoConsultado Else DatoConsultado = "" Range("C10").CurrentRegion.AutoFilter End If End Sub No necesit…

Buenos días,Estoy realizando unas tablas y tengo el siguiente problema,En la hoja 1 tengo unos nombres con unas notas (Columna A nombres y Columna B notas), en otra hoja del mismo libro tengo lo mismo y lo que quiero hacer es lo siguientes:Que las notas las pueda modificar tanto en la hoja 1 como en la otra y que siempre tenga en las dos hojas el último valor escrito.Espero me puedan ayudar.Gracias.

Hola buen día, tengo el siguiente libro con formulario de ejemplo, estoy tratando que por medio de un boton pueda mostrar un calendario, que en algun momento el maestro MacroAntonio nos lo compartió pero resulta que en mi ejemplo al inicializar el formulario el calendario se oculta y al momento de querer mostrarlo mediante un boton este no me aparece, adjunto dejo el archivo para que vean. Muchas gracias!!! Saludos!, Walter Libro1.xlsm

Estimados amigos del foro, planteo un tema respecto autocompletar texto en un control de vba. El autocompletado lo tengo resuelto para un textbox o combobox tomando en cuenta los datos de la hoja de excel. Me gustaría poder cargar el combobox con los datos que están en el listbox y allí aplicarle el autocompletado. Lo que sucede es que en realidad yo lleno al listbox con los nombres de los archivos que están en una carpeta (es decir los datos no están en una hoja). Espero que esto se pueda realizar. Agradezco su generosa colaboración Subo el archivo de ejemplo Autocompletar from Listbox.rar

Hola, buen dia soy nuevo en este foro espero su ayuda. tengo una hoja de excel donde realizo calculo de finiquitos por cada calculo le pertenece a una persona lo guardo, esos datos los quiero pasar copiandolo automaticamente a otro archivo de excel ya que al final del mes empiezo habrir archivo por archivo para concentrar la informacion en un solo archivo. ejemplo de lo que requiero: quiero abrir el archivo de calculo introduzco los datos para calcular y antes de guardar indicar que copie los datos de las celdad a un archivo que le tengo llamado captura. y asi sucesivamente. nota: los datos para el calculo estan por orden de columnas.. y al copiarlos deben estar por o…

Buenos dias, Gracias a los aportes que me han brindado e logrado avanzar con un proyecto en excel pero aun esta imcompleto y me falta un historico de compras x cliente de acuerdo a un intervalo de tiempo. El programa que tengo puede generar ventas, guardar el dato de las ventas generadas en una hojar de excel pero no logro hacer un userform que me permita chekear las compras que me ha realizado un cliente en un intervalo de tiempo o sus ultimas compras. Ojala alguien tenga idea de como puedo lograr hacerlo. Gracias de antemano

hola amigos, tengo un pequeño problema, con ayuda he logrado crear esta macro, que imprime y guarda en pdf, el problema esta en que si me olvido de cambiar el numero de remito me lo guarda arriba del anterior perdiendo el remito viejo. "tendria que notificarme que el numero de remito ya fue usado". espero que me puedan ayudar, gracias!! Dejo el codigo y el excel. Sub Print_save() ' ' Print_save Macro ' ' Range("D2:L56").Select Range("L2").Activate ActiveWindow.SmallScroll Down:=-21 Range("O35").Select ActiveWindow.SmallScroll Down:=-15 Range("C2:L56").Select Range("L2").Activate Selection.PrintOut Copies:=1 Range("L…

La primera Macro de Evaluación de proyectos con el Valor Presente Neto (VAN) me funcionó bién, pero la 2a parte con la TIR, me aparece ERROR. Favor colaborarme en generar los mensajes con MsgBOx Evaluación proyecto con VAN TIR con MsgBox.rar

Hola a todos, Soy bastante nuevo con el tema de macros y no consigo que la macro que os copio abajo me pegue solo valores. Se trata de crear una Pestaña Resumen en un libro que va recopilando datos de varias pestañas y poder ir actualizando esta información (estas pestañas están formuladas en base a otras pestañas ocultas para conseguir mantener la misma estructura) Muchas gracias por adelantado por vuestra ayuda. Saludos Sub pasar_datos_resumen() Application.ScreenUpdating = False origen = ActiveSheet.Name linea = 2 destino = "BBDD GENERAL" Sheets(destino).Activate With Sheets(destino).Range("A2:A65000") Set hasta = .Find("") limite = hasta.Row Rows("2:" &…

me pueden ayudar con una macro que sume de 1 a varios rangos en una misma columna ejemplo: debe sumar los valores de columnaB pero solo los que sean A, agregar una fila en blanco y ahi mostrar la suma y despues sumar los B, espero me puedan ayudar gracias ColumnaA ColumnaB A 1 A 5 A 8 B 2 B 4 B 3

Hola compañeros, Necesito que al pulsar sobre un botón y ejecutar una macro, se quede bloqueada toda la pantalla y no pueda acceder ni a la cinta de opciones ni al menú de acceso rápido, así como abrir las hojas del libro. He adjuntado una imagen, para ver si se puede apreciar mejor. Debe ser algún método de la clase application, pero no sé cuál... Sub BloquearLibro() application.(no sé qué método) = true End Sub Gracias.

Hola buenas tardes mi nombre es Victor M. es mi primera publicación, tengo tiempo buscando en temas anteriores un buscador pero los que encuentro no me ayudan y si existe me disculpo pero no lo encontré, tengo esta situación; Tengo una gran cantidad de datos alrededor de 12,000 actualmente lo realizo con una formula pero esto me hace lento ami macro busco la manera de buscar información dentro de un mismo libro en hojas diferentes con la diferencia de que necesito la información de una gran cantidad de datos sin UserForme, formulas, ni filtros avanzados ya los intente solo un buscador sencillo de información anexo el ejemplo espero que le sea mas claro lo que busco. G…

Hola. No se si logre explicarme bien pero el asunto es el siguiente: resulta que tengo una userform donde tengo varios combobox enlazados el problema es que cuando seleciono un dato en el combobox1 me lanza otras opciones combobox2 pero con datos duplicados. mi pregunta es como logro hacer que las opciones del combobox no sean duplicados. Adjunto libro. esto me pasas con los combobox2 , combobox4 y combobox5 Ayuda porfavor no domino mucho macros. new 1.rar

Hola buenas. Tengo este código y quisiera simplificarlo, con un bucle que me cargase lo mismo en los Combobox2 a Combobox8. No encuentro como hacerlo o no se como hacer la pregunta para encontrarlo, porque no lo encuentro. ¿me podéis ayudar? No es urgente, es simplemente que así son demasiadas líneas de código. Gracias. For Each celda2 In rango2 ComboBox2.AddItem celda2.Value ComboBox3.AddItem celda2.Value ComboBox4.AddItem celda2.Value ComboBox5.AddItem celda2.Value ComboBox6.AddItem celda2.Value ComboBox7.AddItem celda2.Value ComboBox8.AddItem celda2.Value Next celda2