Tengo un archivo con muchas (realmente muchas) tablas dinamicas (que voy a llamar dashboard.xlsb), cuyo origen de datos esta en otro archivo de excel con multiples hojas (que voy a llamar basededatos.xlsx). El tema es que el archivo de datos creció tanto que se hizo practicamente inmajejable. Para sortear este problema, decidí convertir este archivo en binario (lo cambie de .xlsx a .xlsb). Por supuesto, ahora las tablas dinamicas están buscando los datos en el archivo basededatos.xlsx y no lo encuentran, pues decidi cambiarlo a basededatos.xlsb. Hay alguna forma mediante VBA de cambiarle la ruta o el nombre del archivo con el origen de datos a TODAS las tablas dinamica…

Soy nuevo en lo que es programacion VBA a macros,tengo un gran problema en el cual me he quedado estancado,quisiera que el valor de mis columnas puede ser dividido entre 10 y 100 ,adjunto mi excel para un mayor entendimiento. Gracias de Antemano DATOS DE EXAMENES.rar

Hola!! Desarrollé un libro de excel con algunas formulas de uso común para mi y lo grabe en mi computadora como "COMPLEMENTO DE EXCEL" dejé que excel lo colocara en la carpeta por default que utiliza. Para trabajar ocupo el equipo de mi oficina, un equipo de escritorio en casa y una laptop, los tres con Excel 2016 MSO. Actualmente estoy desarrollando una solución utilizando VBA y dentro del código hago referencia a un par de formulas de las que contiene mi complemento utilizando la función Application.Run llamando al archivo mediante la ruta completa hasta la carpeta donde Excel guardó el complemento, en la computadora. El archivo de trabajo que estoy des…

buenas tardes, necesito cerrar un userform desde un botton de otro userform por ejemplo algo como esto que pense pero no me funcion userform1 unload muchas gracias por la ayuda

Hola a todos en el foro, quisiera resolver un problema q tengo... de antemano gracias....explico: quiero copiar una hoja de registro para un nuevo libro pero que el nuevo libro se guarde automaticamente con el nombre del empleado ej..... c:pedro.xlt

Tengo una problema, he creado un formulario de una tabla de mas de 10 columnas, y he creado un listbox para buscar, el codigo que adjunto ( busca correctamente), pero cuando pincho encima de del listbox, no trae correctamente los datos a los cuadros de texto del formulario, ¿alguien me puede ayudar? NUMERODEDATOS = Hoja7.Range("B" & Rows.Count).End(xlUp).Row LISTA = Clear LISTA.RowSource = Clear y = 0 For FILA = 4 To NUMERODEDATOS nombre = Hoja7.Cells(FILA, 83).Value If UCase(nombre) Like "*" & UCase(Me.txt_buscar_cliente.Value) & "*" Then …

Buen día para todos encontré un archivo en la web que permite hacer facturas y poder manejar una base de datos de inventario, mi problema es que soy novato para VBA y no comprendo muchas cosas y quiero hacer unos ajustes en el programa; necesito que el programa me genere automáticamente un consecutivo cada vez que le doy nueva factura también necesito que la factura cuando me genere el subtotal de la compra no me sume el iva sino lo me reste ya que el valor del producto de la lista es con iva incluido y por ultimo no se como cambiar el formato de impresión la idea es que el recibo salga en formato colilla. De verdad agradecería la ayuda no es para fines lucrativos sim…

Buenos días chicos , He revisado que mi consulta no estuviera resuelta y no la he encontrado.He visto algunas parecidas pero lo que necesito concretamente. 1-OBJETIVO Tengo un archivo excel donde llevo el control economico de proyectos de inevrsión y quiero que desde el excel me baje los archivos adjuntos de los emails seleccionados en el outlook y me los guarde en la carpeta OFERTAS.Estos archivos son ofertas relacionadas con el proyecto de inversión y quiero ahorrar tiempo en la acción de bajar estos archivos adjuntos. Lo que me interesa es que me baje los archivos del email seleccionado o emails que yo seleccione , y no de los emails marcados como …

Hice una macro en Excel 2007 que copia un rango de celdas, las pega y centra como metarchivo mejorado en una presentación de PowerPoint, esto lo repite varias veces y en varias presentaciones. Si ejecuto el código con F8 lo hace sin problemas, pero al momento de ejecutarlo con F5, me envía un error en la línea donde pega la selección, pero si depuro y presiono F8, sigue el código sin problemas, incluso si presiono F5 pega las tablas en todas las diapositivas. Ejecute el mismo código en Excel 2013, y se traba en la misma línea con el mensaje "se requiere un objeto", pero en esta ocasión no sigue el código incluso si depuro. En ambos casos aun con el error, siempre pega l…

Estoy haciendo un formulario, y deseo que cuando yo de click en el boton agregar me copie los campos llenados y me genere un folio consecutivo al ultimo generado, pero realmente no se como poder hacerlo espero me puedan ayudar. ya adjunte mi archivo, acabro de hacer una macro que lo que hace es que copia todos los campos que yo llene y los pone en la hoja de "Base", pero el unico campo que me hace falta que genere y copie es el de folio, y no se como hacerlo. Ejemplo.xls

Hola, estimados amigos De nuevo por aqui con un trabajo que me lleva todo el dia pero no doy con la formula, tengo varios tex que quiero rellenar dependiendo del valor de la venta, si vendo el 10 % que me indique el total en color rojo y asi sucesivamente hasta llegar al estimado que seria el 100 % en verde, he dejado dentro una breve explicacion, el trabajo esta funcionando, pero no lo hace como deberia, y no encuentro el error, por que ponga la cantidad que ponga, se llenan todos los text Les agradezco su colaboracion Cordiales saludos prueba.xlsm

Hola intento guardar el documento en Sharepoint como compartirlo en una carpeta que otras personas puedan ver, pero no sé cómo hacerlo. Es posible hacer un código que guarde mi documento excel en Sharepoint.. osea estar trabajando en este documento y luego de dar click en un botón o antes de cerrar el archivo que este se guarde en Sharepoint o en la nube?.. les agradezco si alguien me puede guiar.

Hola, estoy intentando modificar esta macro para poder obtener una ruta del archivo excel del forma automatica. Cambiar HostFolder = "C:\TestFolder" por la ruta que obtengo de concatenar 2 celdas Sub startIt() Dim FileSystem As Object Dim HostFolder As String HostFolder = "C:\TestFolder" Set FileSystem = CreateObject("Scripting.FileSystemObject") DoFolder FileSystem.GetFolder(HostFolder) End Sub Sub DoFolder(Folder) Dim SubFolder For Each SubFolder In Folder.SubFolders DoFolder SubFolder Next i = Cells(Rows.Count, 1).End(xlUp).Row + 1 Dim File For Each File In Folder.Files Active…

Hola, tengo un formulario donde puedo abrir archivos pero antes de abrirlo debo verificar que no esté abierto con anterioridad. Estoy tratando de implementar : If FileAlreadyOpen(nomb_archivo) Then Pero me manda error.

Buenas noches, tengo un problemilla y he estado buscando por internet pero no encontre nada, espero que me puedan ayudar en el foro de la misma forma con la que yo espero ayudar. El problema es el siguiente. Tengo un libro con varias hojas, entre ellas las siguiente: Empleados con los Nombre de empleado y el turno en el que trabaja , Mañana Tarde o Noche, con cada uno de los dias del mes (vamos un cuadrante de turnos) Cuadrante con una lista desplegable que coge el nombre del empleado y después en cada una de las celdas pone de los dias de la semana todo cogido de Empleados. Con esto consigo ver en la hoja Cuadrantes, el cuadrante individual de ca…

Estimados Compañeros Ante todo agradecer por la ayuda que me brindan, ase poco abri un post con este tema (control de stock de productos perecibles) pero lo cerraron por que ya no pude responder los comentarios, uno de los expertos me respondio y me ayudo en el problema (adjunto archivo), en resumen la macro consiste en actualizar una base de datos de productos pero que cuentan con fechas de vencimiento distintas, el problema que tengo ahora es que cuando son varios lotes no actualiza la ultima fecha, por ejemplo: Tengo el siguiente stock del siguiente producto con sus respectivas fechas de vencimiento Poppers 400 Cajas 150 cajas 10-02-15 100 cajas 20-04…

Hola: Necesito eliminar estas columnas ("A:E, G:G, I:J, L:M, O:Q, S:T, V:W, Y:Z, AB:AC, AE:AF"), pero no lo consigo con ninguna de las macros que he visto. Por ahora he conseguido una que funcione que aquí adjunto: Sub Eliminar_Col() Range("A:E").Select Selection.Delete End Sub pero solo elimina, lógicamente, las primeras 5 columnas porque no sé cómo se pueden añadir las otras. He intentado múltiples formatos para añadirlos a "Range" pero siempre me da error. Muchas gracias

Amigos, la siguiente macro se ejecuta perfectamente, pero al terminar de ejecutarse aparece Error 13 "No coinciden los tipos", no he podido encontrar la solución. Alguien me puede ayudar? (Ya probé instalando el Hotfix KB983246). Saludos......................................................................................................................................................................Sub Tramos() 'Borrar Datos Anteriores '**************************************************** Range("L4:M175").Select Selection.ClearContents Range("L4").Select '**************************************************** Dim m, j As Double Dim p, n, u, r, t, k, w…

Hola amigos, Estoy intentando que el color de fondo de un ToggleButton cambie de color según si está pulsado (verde) o no (rojo). He probado varios código que he encontrado en la red, pero no lo he conseguido. Además de eso se me produce un efecto no deseado con el contenido. Si pulso el botón en el formulario me muestra "Alta" y si no lo pulso muestra "Baja". Hasta ahí correcto, el problema es al grabar cambios, en la correspondiente columna de la hoja de cálculo guarda "VERDADERO" y "FALSO" y al volver a ejecutar el formulario me muestra precisamente eso, en lugar de "Alta" "Baja". Agradezco vuestro tiempo!! Trabajadores.xlsm

Hola a todos. Tengo un problema. Estoy intentando hacer un archivo en Excel donde a través de un cuadro de diálogo abro un archivo Excel y quiero importar esos datos a Access. Como estoy haciendo pruebas solo intento importar varios campos, pero no consigo hacerlo. Me da este error: El código que estoy intentando hacer funcionar es este, que no es obra mía, he encontrado en la Red y he intentado adaptarlo. Option Explicit ' Public Conn, Sql$, rs_AV, Rs2 As Object, Rst As Recordset ' Sub Conexión() ' On Error Resume Next: Rst.Close: rs_AV.Close: Rs2.Close: Conn.Close: On Error GoTo 0 Set Conn = CreateObject("adodb.Connection") Conn.Open "Provider=…

¡Saludos nuevamente amigos de AyudaExcel! En esta oportunidad les solicito su colaboración para realizar una tabla filtrada con las siguientes características el cual ejemplificaré fácilmente: En mi país (Venezuela), la organización territorial es de mayor a menor en 24 Estados, cada estado se divide en Municipios q son en total 355, los municipios se dividen en unas cuantas Parroquias y estas a su vez en otro tanto de Sectores El caso es que quiero filtrar datos los cuales están contenidos en Sectores, pero para eso primero tendría q seleccionar en una celda, tipo lista desplegable (la cual ya se hacer este paso por "Datos--->Validación de Datos"), Estados, para qu…

Saludos a todos, tengo una base de dato bastante extensa de cuentas por cobrar clientes y me gustaría eliminar los subtotales que tengan saldo en cero para efecto de análisis de dicha data, alguien que me preste el apoyo de una macro que pueda agilizar dicho trabajo; adjunto ejemplo. Saludos; Ejemplo.xls

Pues eso amigos, al agregar cliente nuevo, al pasar al TextBox2 me dice eso (OCURRO UNA EXCEPCION) y no puedo seguir. Ya di vueltas al codigo pero como praticamente nada entiendo pues, quisiera una ayuda de algun experto en la materia. Estuve con F3, averiguando los nombres y algunos hacian referencia a un directorio y libro no se el porque, ni libro ni directorio existen, elimine esos nombres Agradecido. Fiesta0.part1.rar Fiesta0.part3.rar Fiesta0.part2.rar

Hola comunidad de excel! Les vengo con un reto interesante. Estoy tratando de hacer un excel el cual rellene los mismos datos en 3 planillas diferentes de word, esto supe como hacerlo con una macro que usa las funciones buscar y reemplazar de excel. Pero ademas de eso quiero que guarde las planillas de word bajo un nombre que contiene un codigo que tambien es parte de los datos que ingreso en la hoja de excel. La verdad no tengo ni idea de como hacer eso. Para que entiendan bien a que me refiero les pondre un ejemplo: Los datos a ingresar son: Nombre Telefono Email Codigo de compra Quiero que una vez todos los datos hayan sido sustituidos en la planilla …

Buenos días; Me acaba de surgir un problema en la macro que estoy haciendo y por mas que lo he dado vueltas no he conseguido solucionarlo, a ver quién me puede echar una mano. Tengo varios datos que tengo que transformar en fecha los datos son como el siguiente " 18/04/13/ 0", primero reemplazo “/ 0” por nada y luego quito el espacio que tiene al principio, una vez realizado esos 2 pasos ya tiene el formato de fecha, si lo hago sin macro el Excel solo me pone “18/04/20132, pero si lo hago desde la macro se me queda así “18/04/13” y con el símbolo de error para que elija entre convertir en xx en 20xx o en xx en 19xx. Como podría hacerlo con una macro??. Muchas gracia…