hola resulta que con este codigo se crea una tabla dinamica en macros Sub PivotTable() Dim PTCache As PivotCache Dim PT As PivotTable Set PTCache = ActiveWorkbook.PivotCaches.Create _ (SourceType:=xlDatabase, SourceData:=Range("A1").CurrentRegion) Set PT = ActiveSheet.PivotTables.Add(PivotCache:=PTCache, _ TableDestination:=Range("F1"), TableName:="Ventas") With PT .PivotFields("Zona").Orientation = xlPageField .PivotFields("Mes").Orientation = xlColumnField .PivotFields("Nombre").Orientation = xlRowField .PivotFields("Ventas").Orientation = xlDataField .DisplayFieldCaptions = False End With End Sub [/CODE] y en mi excel cree u…

Hola a todos, Adjunto mi archivo el cual trabaja muy bien, solo que lo que ahora requiero es me apoyen con que al momento de copiar no se abra un nuevo libro sino se mantenga en el original esto se genera de un botón que dice Generar Reporte según cuando selecciono la fila que deseo copie la información. Espero puedan ayudarme. Saludos, EJEMPLO FACT_ORD115.zip

Estimados amig@s me sale el siguiente mensaje cuando llamo a un formulario: "Se ha producido el error '404' en tiempo de ejecución: No se puede mostrar un formulario modal cuando se muestra un formulario modal " Este formulario lo llamo desde otro formularioque lo uso como "MENU" el cual tiene un pagina múltiple y en una de las paginas tiene tres commandbutton un commandbutton funciona bien porque lo uso para llamar a otro formulario pero el segundo commandbutton le di la orden para llamar a otro formulario pero me sale el mensaje de arriba. Com pudo solucionarlo? Saludos Jesús

Hola, Me gustaría crear una macro que me actualice los datos de determinadas URL. Los datos son tablas de las que se pueden tomar los datos, y se encuentran en el código fuente. Creo que se podría hacer sin problema pero la verdad es que no tengo mucha idea. La URL en concreto es esta (quiero hacerla de varias): Central de datos en MARCA.com La idea es tener la tabla de clasificación y que se actualice según lo haga la web. Creo que se puede hacer una macro importando datos web (y seleccionando la tabla que deseas), pero me gustaría aprender a hacerlo desde el código fuente. Muchas gracias de antemano! Saludos.

Buenas noches estimados Acá modifique un aporte que había realizado Macro Antonio ; después de tanta modificación en el archivo adjunto no me deja modificar ni eliminar los datos. Agradezco su ayuda en verificar el código y si es posible arreglarlo. Muchas gracias y Saludos desde Costa Rica Registro.rar

hols tengo una macro que convierte a rtf masivo desde una carpeta. ¿quien sabe como poder modificarlo para que tome todos los documentos que estan dentro de un directorio incluyendo los subdirectorios y ualquier carpeta que haya dentro? Sub guachito() ' ' guachito Macro ' ' strRuta = "C:\Documents and Settings\is documentos\COMPILADO\" Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFolder = objFSO.GetFolder(strRuta) Set objFiles = objFolder.Files Set WordApp = CreateObject("Word.Application") For Each objFile In objFiles If (objFile.Type = "Documento de Microsoft Office Word 97-2003") Then MsgBox ("Convirtiendo el archivo " + obj…

Hola, necesito ayuda, ya que mi nivel de excel todavia es un poco bajo. Tengo un documento con varias hojas, sobre el control anual de gastos/ingresos. Tengo varias hojas, la primera, es la anual con todos los meses, y luego una hoja por mes donde escribo los datos y la ultima una B.D donde están todas los datos de cada mes con su respectivo año. En 1a hoja (AÑO ACTUAL) en la casilla A2 tengo una lista desplegable con los años, me gustaría que al escribir los datos en las hojas de cada mes y con la celda A2 del año correspondiente me salieran en la 1a hoja los datos de todo el año guardados en la hoja (B.D.), ya que ahora mismo se me borra al escribir algo por encima y…

Saludos amigos, Tengo un archivo que fue generado por el Seniat, y el tema esta en que cuando trato de correr el archivo en mi maquina este me genera un error en el codigo que es el siguiente, me gustaria saber como puedo solucionar esto. "Open XMLFileName For Output As #1"

Estimados compañeros: Estoy generando una macro que me servirá en el trabajo y tengo una duda acerca con el guardado de nuevos libros desde el VBA. Pues lo que sucede es que desde un Listbox1 exporto su contenido en un nuevo libro, he podido realizarlo (pueden verlo en el archivo adjunto) pero para lograrlo he ingresando una constante llamada "Extracto" dentro del código VBA creado, para que cuando exporte se guarde con ese nombre. Como verán por defecto este file se guarda con este nombre y en la carpeta "Mis Documentos". Lo que quiero es que al momento de apretar el boton "Exportar" me pregunte la ubicación del archivo y el nombre con que lo quiero guardar (que en v…

Hola a todos. Estoy creando una tabla que me permita filtrar su contenido utilizando una lista desplegable para seleccionar la columna a filtrar y una caja de texto para el criterio. Hh logrado que funcione para todo menos para fechas y números. Lo de las fechas entiendo que puede deberse a la forma que excel las almacena, pero lo de los números me tiene confundido. He intentado definir la variable para el criterio (crit) como variant o sencillamente no definirla, pero el problema persiste. Este es el código que tengo para filtrar (Corre cuando se le da a enter en la caja de texto) Private Sub TextBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Inte…

Estimados, Buen día. Un favor, estoy trabajando con una aplicación en la cual al exportar datos a formato Excel, me arroja las fechas con formato mm/dd/yyyy hh:mm AM/PMson muchos registros y quisiera que a través de una macro convertir los datos al formato dd/mm/yyyy hh:mm AM/PM, ya que de este último formato dependo para hacer otros cálculos............. Ejemplo: 1/2/2013 8:22:44 AM - 02/01/2013 08:22:44 a.m. Anexo dejo archivo con los datos. Gracias. CambiarFormatoFecha.rar

Hola a todos! Gracias por su tiempo, mi duda es la siguiente. Tengo archivos de imagenes *.xps en la carpeta c:\ y quiero imprimirlos todos con una macro, hay alguna manera de poder imprimir el archivo desde excel? Gracias!

Buenas noches, una solucion a mi problema necesito una macro para cruzar informacion, es decir coger dos o 3 archivos y compararlos por las columnas especificadas es decir que me de como resultado tantos archivos no coinciden. espero haberme echo entender de antemano agradezco su gentil ayuda

Hola tengo un archivo de macros de office 2013 y al abrirlo en 2007 me tira error asi aal grabar macros que hago que filtre los 10 mejores la tabla dinamica al corrrerlo de nuevo en office 2007 me tira error dice algo de pivot table será por la version de windows? la gran cantidad de datos? por favor prueben el archivo en 2007 y 2013 y diganme que ocurre Libro1.rar

Hola, Tengo un problema pero para explicarlo debo plantear lo que deseo hacer. Una macro que cree una nueva hoja con el nombre de un texto(APELLIDOS) de celda de excel, acto seguido que copie de B22 hasta F22 y que los pegue en la hoja recien creada o en una hoja que seleccione , o que aparezca formulario pidiendome el nombre de la hoja que deseo copiar, que no me permita crearla si esta repetida y si no existe que me vuelva a preguntar.También que el pegado sea de en la celda c22. Dicho esto solo tengo una macro que crea una nueva hoja con el nombre de la celda que yo necesito: Sub Nuevopaciente() Dim i As Long ' Si el nombre ya existe, genere un mensaje y no cree …

Hola, Estoy haciendo una macro en Excel 2007 y me he atascado en lo siguiente. Tengo un bucle que recorre el rango A1:D50 de la hoja1 y va copiando y pegando en base a diferentes condiciones en el rango A1:D50 de la hoja2. La fila C de la hoja1 contiene cadenas de caracteres de la forma "0.000,00 EUR" y otros en la forma "0.000,00" . ¿Cómo puedo extraer sólo la parte numérica (esto es 0.000,00) y pegarlo en la columna C de la hoja 2 convertido a formato número en lugar de texto? Muchas gracias

Hola amigos de #Ayuda Excel Aquí traigo unas inquietudes que quisiera me ayuden a resolverlas, que a continuación detallo: 1.- Necesito agregar un procedimiento en la macro "LLENADO" del botón "Grabar e Imprimir" que me informe que faltan llenar datos en las celdas con color y que no se ejecute la misma, hasta cumplir esa condición. 2.- Necesito agregar un procedimiento en la macro "LLENADO" del botón "Grabar e Imprimir" que al grabar los datos del comprobante en los registros respectivos, me informe que el comprobante esta repetido tomando en consideración los 10 primeros datos registrados y que no se ejecute. 3.- Necesito agregar un procedimiento o modificar mi macr…

Hola a todos, Es posible que un boton que cumpla una función también de una señal de alerta para que indique "No Olvides Reportar tu Factura" este botón esta en la plantilla de excel seria el de Guardar factura, adjunto el ejemplo. Un Saludo FACTURA Y GUIA MODEL OK 61.zip

Estimados, Segun el archivo adjunto lo que requiero saber es si es posible que con un textbox se pueda cargar la información (de modo multiline) pero en varias celdas , ya que si ingreso de este modo lo que hace es ir a la misma celda y no una debajo de otra. Muchas Gracias por su apoyo y tiempo. Saludos factura.zip

Buenas, soy nuevo en el foro y desde ya agradezco por el tiempo que se dan en leer mi pregunta…. Tengo el siguiente problema, llevo varios meses realizando un proyecto en Excel, donde e invertido varias horas de mi tiempo en la generación de macros y código vb en la misma planilla… El tema es que simplemente quiero proteger mi trabajo, para esto protegí las hojas…. Pero me encontré con que agregando una macro puedes desproteger la hoja… bueno agrega password al proyecto de vb y con eso no se puede ni ver el código, ni ver las macros ni agregar macros, perfecto dije…. Pero al buscar en Internet me di cuenta que de igual manera se pueden “Violar” los proyectos para sacar …

Buenas compañeros, espero que me ayuden con mi problema... estoy desarrollando una app, en el cual me genere aleatoriamente números y luego esos números generados me traiga una repuesta con la función buscar. PERO ME SALE UN ERROR #n/a La funcion que aplico es: 1. Funcion: =elegir(aleatorio.entre(1;2);"221";"223").. y el resultado es un numero pero del tipo texto. 2. Funcion =buscar(resultado de la función anterior;comparación y resultado). PERO NO ME BUSCA NINGUN VALOR, ME SALE EL ERROR MENCIONADO.. porfa alguien sabe la respuesta!

hola amigos, a cabo de crear un control de facturas en excel con unas macros ,todo parece estar bien,solo al momento de estar creando mi factura (en la hoja facturacion, oprimir ctrl+m para facturar, empezar a registar unos productos, despues dejar en blanco toda la factura para poder dar clic en el boton agregar/cobrar ) al momento de cobrar en total de factura me aparece puros ceros (0) le doy cobrar(boton de abajo) y me sale un mensaje se ha producido el error "13" en tiempo de ejecución: No coinciden los tipos. por favor colaboremos con la solución a este problema. gracias CONTROL FACTURA new 1.rar

Estimados, Un gusto saludarlos, tal vez el titulo ya les parecerá repetitivo, y hasta la parte del To creo que lo es, porque me he navegado todo en internet y no logro dar con algo para incluirle un Cc. Me explico. Tengo una planilla de clientes con su Correo, y el de su vendedor. El envio al cliente con un archivo adjunto ya lo tengo resuelto. (Hay mucho material sobre esto) Mi problema es enviarlo con copia al supervisor, esto porque además cada supervisor tiene diferentes clientes. Logre enviar con copia, pero solo al primer correo, al segundo y los siguientes no lo hace y solo envía Para. Adjunto el código y archivo. Intente modificando el campo Cc con los sigu…

hola como lo dice el titulo tengo la siguiente duda tengo un botón que busca y modifica registros que tengo en una hoja buscando por el numero de referencia, quiero preguntarles como podría hacer un botón que me exporte los datos que encontró el buscador a una nueva hoja y que el nombre de la hoja sea el numero de la orden de producción, y me gustaria si adicional a eso me pueden explicar como hacer un buscador igual que el que tengo pero para buscar no el numero de orden sino el nombre de varias hojas que tenga abiertas. Libro1.xls

Buenas tardes, tengo la macro para Copia datos, abre otro libro pega datos, guarda y lo cierra, pero me falta lo que esta en rojo. Un saludo