Buenas, necesito una macro que me permita abrir un cuadro de dialogo, seleccionar una carpeta y copiar todos los archivos que hay dentro a otro destino. Gracias de antemano Saludos!

Buenos dias tengo 200 archivos con extencion xlsm y necesito pasar cada uno a formato csv esto lo estoy haciendo manualmente con cada archivo desde la barra de herramientas de excel asi archivo guardar como csv, por lo tanto me demanda mucho hacerlo entonces lo ideal seria una macro que se ejecute en los 200 libros abiertos me convierta todo a formato csv, pongo los dos formatos el original xlsm y el csv como debe de quedar ya qye he probado varias macros que estan en la web pero me desordena la estructura del encabezado entonces pido por favor su ayuda de alguien que sepa de esto. gracias Archi.rar

Hola estimados. Tengo una tabla en la cual realizo diferentes acciones desde un formulario, en este punto pretendo filtrar a travez de un CheckBox desde un formulario 3 campos de una columna, esto lo he logrado con el siguiente código Private Sub rojo_Click() If rojo.Value = True Then ActiveSheet.Range("$A$4:$Q$19").AutoFilter Field:=3, Criteria1:="rojo" Else ActiveSheet.Range("$A$4:$Q$19").AutoFilter Field:=3 End If End Sub Private Sub CheckBox29_Click() If CheckBox29.Value = True Then ActiveSheet.Range("$A$4:$Q$19").AutoFilter Field:=3, Criteria1:="amarillo" Else ActiveSheet.Range("$A$4:$Q$19").AutoFilter Field:=3 End…

Hola a todos, he probado un montón de cosas para intentar conseguir la dependencia de tres combobox, en el archivo adjunto tengo la relación de los combox, pero no consigo hacerlo. Solo cargo el principal. Espero vuestra ayuda Gracias Combobox.xlsm

Estimados, Necesito extraer datos de la web del SII; mi idea es obtener una macro que haga la tarea en forma automática. Tengo una lista de RUT que debo ingresar al SII para obtener la "actividad económica vigente". Sé que el enlace al cual tengo que ir es: https://zeus.sii.cl/cvc_cgi/stc/getstc?RUT=96659460&DV=8&ACEPTAR=Efectuar+Consulta&PRG=STC&OPC=NOR Y que lo que variaría en cada consulta es el rut y el dv. Nosé como hacer una macro que consulte en forma automática el sitio, saque el rut de una lista e imprima o extraiga sólo el dato de "actividad económica vigente". Son como 150 RUT que debo consultar ... Cualquier guía se agradece, Saludos, …

Buenas Tardes Tengo un formulario, que contiene unos 10 textbox, para los cuales quiero configurar las siguientes propiedades Private Sub TextBox_Enter() TextBox4.BackColor = RGB(245, 245, 245) End Sub Private Sub TextBox_Exit(ByVal Cancel As MSForms.ReturnBoolean) TextBox4.BackColor = RGB(255, 255, 255) End Sub Quisiera saber si hay alguna forma de configurar esto para todos los textbox con un solo código, y no tener que hacerlo para cada textbox..

Buenas tardes, tengo un libro con pedidos( cada pedido es una hoja) todos exactamente igual con el mismo formato , y quiero llevar una relacion de estos pedidos ( para eso la macro) , esta hoja la llamo resumen y siempre es la ultima. he creado esta macro con ayuda, pero no me funciona. Me pone que no se puede ejecutar codigo en modo interrupcion. ¿ que es eso? Ademas solo me saca 5 registros Sub alfredo() Application.ScreenUpdating = False destino = ActiveSheet.Name primvac = 100 For Each pestaña In Worksheets If pestaña.Name = destino Then GoTo otra: pestaña.Activate pedido = Range("q3").Value fecha = Range("q4").Value cantidad = Range("p29").Value importe …

verán, estoy haciendo un programa en el cual debo insertar una imagen (algo así como una base de datos) y lo que quisiera hacer y no me sale es que en otra celda me ponga el nombre de la imagen seleccionada. adjunto un ejemplo del archivo que estoy haciendo a ver si alguien me puede ayudar. desde ya muchas gracias! ejemplo.rar

Hola muchachos, quería solicitarles una ayuda con lo siguiente: Tengo que filtrar 50 tablas dinámicas desde un listado, estas tablas se filtran por "Zona" (Lo primero que hice fue copiar 50 veces el código y cambiar el valor manualmente, pero ya siendo esta la 3era vez que debo cambiar valores, consideré que un array es mucho mejor). Sub arreglo() Dim miArra(0 To , 0 To 3) As String miArra(0, 0) = "Las condes" miArra(0, 1) = "San Bernardo" miArra(0, 2) = "Talagante" For Cont = 0 To 3 ' División de Tablas Dinamicas Sheets("Hoja1").Select Range("Tabla1[#All]").Select 'Sheets.Add ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, Source…

Hola a todos mi consulta es como cambiar la ruta para cargar las imagenes desde la hoja fotos del libro ,que actualmete lo hacen a travez de un vinculo a una carpeta de escritorio. adjunto proyecto copia.xlsm

Hola, estaba intentando hacer una macro en el libro inventario que al ejecutarla me abra el libro datos2 y vaya recorriendo la columna producto y comparando cada dato de dicha columna con el que hay en la columna producto del libro inventario, si lo encuentra me copie en el libro inventario el dato que ha encontrado siete columnas a la derecha en la columna cantidad (.offset (0,7)), y si no lo encuentra copie el código, producto y cantidad al final del todo, en la primera fila vacía del libro inventario, pero me estoy liando un poco.... El libro datos2 cambia todos los meses, por eso quiero copiar los datos del mismo en el libro inventario gracias por la …

Hola. Tengo el siguiente inconveniente, necesito abrir una nueva ventana con un libro distinto y requiero que lo haga en una hoja en especifico. Como podría hacer. Yo tengo la macro para abrir la ventana nueva con el libro que deseo pero me falta solo la linea de codigo que me haga que el libro se abra en la hoja deseada. Esto es lo que tengo: Sub llevar () Workbooks.Open ("C:\Mis documentos\CARPETA\Ficha.xlsm") Application.WindowState = xlmaximized End Sub Gracias a los que me puedan ayudar.

Estimada Comunidad: Recurro a ustedes esperando que se encuentren muy bien: Les escribo para hacer consulta sobre como podría generar números aleatorios con VBA, los cuales se vayan enlistando a medida que vayan saliendo. Mi idea es simular un sorteo aleatorio de las personas que se deberán encargar de la limpieza de un lugar y que, una vez les haya tocado limpiar, quede registrado en una hoja excel el día que les ha tocado. Además, lo ideal es que no se repitan hasta que todos hayan pasado por 1 día de limpieza. De lo anterior desprendo que lo necesario es lo siguiente: 1) Generar 3 números aleatorios que no se repitan entre sí. 2) Verificar si ya han limpiado …

Buenas tardes, Ante todo, muchas gracias por vuestra página Web, que me ha permitido avanzar bastante en el fascinante mundo de la programación VBA, pero no lo suficiente, ya que no fui capaz de resolverla esta duda que les envío a continuación: Tengo una serie de datos de diferentes respuestas, agrupados por columnas (a partir de la D) y quisiera obtener sus modas, es decir el valor que más se repite, en función de que la clase a la que pertenecen, la cual la tengo definida en la columna D. [TABLE] [TR] [TD]Columna [/TD] [TD] D [/TD] [TD]E [/TD] [TD]F [/TD] [TD]G [/TD] [TD]H [/TD] [TD]I [/TD] [TD]J [/TD] [TD]K [/TD] [TD]L [/TD] [/TR] [TR]…

Hola a todos. tengo un problemilla, es que tengo para insertar una imagen cuando cambio una celda pero resulta que pongo para que antes elimine la anterior y no lo hace, la imagen la insera una encima de otra sin borrar nada. tambien me gustaria saber como poder poner la imagen con la orden de que se inserte por debajo, ya que son de unas graficas y tapan las lineas que uso para las graficas. este el codigo que tengo: Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next Select Case Target.Column Case 1 ActiveSheet.Shapes(Target.Address).Delete 'con esto se deberia borrar la imagen de antes pero no lo hace For x = 1 To 7 'Rang…

Buenos días, Tengo un problema con un archivo de excel al que quiero mediante un botón ocultar las columnas cuyas celdas estén vacías, es un inventario de productos por almacen que muestra las cantidades del mismo de acuerdo al código de cada producto. Me oculta las columnas del rango que estoy usando sin tomar en cuenta si están vacías o no. En una archivo con menos datos lo he probado y si funciona. Adjunto el archivo para que lo miren. También tiene programado un buscador para que muestre solo la referencia del producto requerida, entonces la mecánica del archivo sería mostrar solo una referencia de producto y poder ocultar las columnas (almacenes) que no te…

Tengo el error 13 en tiempo de ejecución no coinciden los tipos La verdad no se como puedo solucionarlo estoy apenas aprendiendo la programación VBA si alguien pudiera por favor se lo agradeceré mucho.

Buen dia, Quisiera ver si es posible alguien me ayude con lo siguiente: En la empresa donde trabajo todo es muy manual y quisiera automatizar algunos reportes, para realizar conteos ciclicos actualmente se realiza lo siguiente: Se corre un Queri de Access y se exporta a Excel. Desde excel se filtra y selecciona numeros de parte que se pretende contar se valoran precios y usos. Todo esto manualmente. Por lo que quisiera que sea automatico, que sea un archivo de Excel y se este actualizando con el queri de Access, ademas dependiendo del valor de la parte $, puedan existir categorias ejemplo ABC. Algo que me puedan aconsejar? Agradesco la atencion prestada…

Hola a todos, Tengo el clásico formulario de Log In con una dirección de correo electrónico y una contraseña para acceder a la aplicación ofimática. Sin embargo, me gustaría conseguir lo siguiente: Cuando el usuario haga click en el icono del ojo , entones que se le muestre / oculte la contraseña que haya introducido. Pues bien, eso (más o menos) lo he conseguido con el siguiente código: Private Sub cbContraseña_Click() If tbContraseña.PasswordChar = "*" Then tbContraseña.PasswordChar = "" Else tbContraseña.PasswordChar = "*" End If End Sub Sin embargo, me gustaría modificar al mismo tiempo el icono del ojo en funci…

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…

buenas alquien que me pueda ayudar , necesito bloquear un rango de celdas con una casilla de verificacion o al cerrar excel gracias

esto quiero en vba pero no logro interpretar para traducir Leer un QR desde Windows con la webcam - Developers, developers, developers.... alguien me puede ayudar a leer un codigo qr desde un textbox del form?

Buenos días escribo en esta ocasión para que me guíen puesto que deseo extraer la información de 400 informes, pero solo algunas celdas, la celda en este caso es C18 de todos los archivos, en este momento solo necesito esa celda, pero pronto necesitare sacar la información de otras que aun no conozco. Todos los informes tienen la misma estructura, necesito saber como luego de tener el codigo macro VBA, como irlo modificando de acuerdo a la necesidad de celda. Saludos PD: vi un post muy parecido en el cual tratan lo mismo pero no se como modificar el codigo. el codigo que sale en el post es el siguiente: Option Explicit Sub RecuperaDatoA2_y_I2_Opcion_1() 'Usando …

Buenas compañeros, un gran placer saludarles. Les escribo una duda que tengo, ojalá me puedan ayudar. ¿Cómo podría filtrar el valor de una variable que tengo definida en el código y a su vez tengo indicado su nombre en una celda de excel? Por ejemplo: La variable a=12 (en el código) Si escribo "a" en una celda como puedo poner el filtro para que filtre el valor "12" y no el valor "a". Es decir, que el criterio de filtro sea el valor de la variable a, que he indicado en la celda. .Range("A1:D200").AutoFilter field:=1, Criteria1:=(El valor de la variable a) Muchas gracias a todos por su valiosa ayuda. Un abrazo

buenas tardes amigos! En esta ocacion preciso de su ayuda para resolver esta macro. Tengo dudas respecto a como hacer una sumatoria por rangos... Tengo mi hoja con varias columnas, algunas vacias, algunas con informacion, me gustaria que buscara en la columna B y cada que encuentre un NA aplicar la sumatoria en esa fila y que sume el rango comprendido. Despues se vaya por cada NA y sume lo que esta en ese rango. Nunca tengo el mismo numero de columnas ni de filas, unicamente se delimitaran los datos por cada NA que encuetre. Anexo ejemplo para que quede un poco mas claro, de antemano muchas gracias por su tiempo y esfuerzo. Saludos Gerardo Sumatoria.xls