Bucle para eliminar ficheros y carpetas

Preguntas y respuestas relacionadas

¿Alguien sabe macro para guardar en .XLSX?

Estoy diseñando una macro que copie mi libro (con macros) a un formato .xlsx con el objetivo que la nueva copia no contenga las macros. Pues bien, implementé esta macro Dim Copia As String ' CREAMOS UNA COPIA DEL ARCHIVO PROGRAMA INFORME SIN FORMULAS...
1 respuesta

Como copio de 3 diferentes rangos de celdas, en una misma hoja, de diferentes hojas, las celdas no vacías en otro libro.

Tengo un libro de excel por cada mes, con tantas hojas como días del mes, las cuales tienen el mismo formato y necesito copiar los datos de tres diferentes rangos de celdas en un libro diferente y que cada hoja de cada día, se vaya agregando a la...
1 respuesta

Filtrar tabla dinámica por valor de celda

Tengo la siguiente macro, que la vi en otro blog; Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("F1")) Is Nothing Then Dim hoja As Worksheet Dim td As PivotTable 'Recorrer todas las hojas del libro For Each hoja...
1 respuesta

¿Cómo encontrar un item en un listview?

Tengo dos listview con dos botones, uno para asignar y otro para desasignar. Cuando selección desasignar, tiene dos opciones, el recorre el lvw para encontrar el seleccionado en lvw1, cuando lo encuentra realiza ciertas acciones, lo que no se, es...
1 respuesta

Marcar automáticamente datos iguales en celdas excel y contar datos iguales por línea

Pregunta dirigida a Dante Amor, Tras el uso de la macro que me facilitaste: ( la cual copio y pego). Private Sub Worksheet_Change(ByVal Target As Range) 'Por.Dante Amor If Not Intersect(Target, Range("A:E")) Is Nothing Then...
1 respuesta

Error CurrentDb.OpenRecordset pocos parametros se esperaba x

Ando con problemas en las sintaxis... El trabajo es más extenso, pero específicamente me esta dando problemas lo siguiente: Public Sub Campos() Dim db As DAO.Database, tdf As DAO.TableDef, fld As DAO.Field Dim i As Integer Dim SQLstr As String Set db...
1 respuesta

Conectar access por modbus tcp

Tengo este código creado para access, para leer datos por modbus tcp, pero me da un error que no puedo reparar. Este es el código: Sub LeerDatosModbusTCP() Dim modbusClient As Object Set modbusClient = CreateObject("EasyModbus.ModbusClient")...
1 respuesta

Macro para enviar correo automático desde Lotus Notes

Necesito crear una macro en excel que al momento de ejecutarla envíe mails a "n" usuarios siempre y cuando cumpla la condición de una fecha. El mensaje a enviar tendrá una estructura predifinida. Una de las utilidades que le quiero dar a esta macro...
1 respuesta

Macro para bloquear celdas escritas en Excel

Tengo la siguiente macro, pero yo quiero que solo se aplique a la Hoja1. ¿Es posible? Private Sub Workbook_BeforePrint(Cancel As Boolean) 'Proteger celdas con información 'Por.Dam Application.ScreenUpdating = False ActiveSheet.Unprotect...
2 respuestas

Estilos de Word Macro para sacar listado y seleccionar

Quería una macro en Word que me sacase un listado de los estilos que hay aplicados en un documento de Word y el numero de veces que se repiten en el documento. Este listado lo precisaria en un nuevo documento de Word o en un Excel también me sirve....
1 respuesta
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas del tema