Evitar que eliminen carpeta y archivo (s) en Excel

Preguntas y respuestas relacionadas

Obtener el nombre de un archivo de acuerdo a una ruta ya obtenida en variable

Mi pregunta es la como puedo obtener el nombre de un aechivo que acabo de abrir con un opendialog. Lo que quiero hacer es copiar distintos rangos de celdas de un archivo a otro por medio de una macro este es el código: Sub copiar() Dim Filename As...
2 respuestas

Fecha en inputbox Excel VBA

Una vez más tengo una pregunta... Estoy solicitando por medio de un inputbox una fecha para hacer unos cálculos, luego la fecha la coloco en una celda... Así es como solicito la fecha... Dim x x = InputBox("Escribe la fecha de vencimiento") Do While...
1 respuesta

Hojas desaparecidas

Tengo un libro de trabajo compartido compuesto de varias hojas de cálculo. De repente desaparecen hojas y no soy capaz de recuperarlas. He hecho pruebas para ver si las he ocultado sin darme cuenta pero he podido comprobar que no puedo eliminarlas.
2 respuestas

Error al guardar libro compartido

Tengo una macro en un "pc1" que en un momento guarda un libro que a su vez lo consulta un segundo pc (pc2) de la red, funciona bien pero existen ocasiones en que la macro guarda el el libro en el pc 1 justo en el momento que el pc2 lo esta...
1 respuesta

Implementar Progress Bar en macro para generar efecto visual

Sub Buscar() 'Mod.Por.DAM Application.ScreenUpdating = False Set h1 = Sheets("Estados de cuenta") Set h2 = Sheets("Cartera.") ' h1.Range("A18:E6000").ClearContents j = 18 Set r = h2.Columns("G") Set b = r.Find(h1.Range("A6"), LookIn:=xlValues,...
1 respuesta

Macro no se ejecuta bien y no abre los libros xls

Tengo esta macro que no la ejecuta correctamente cuando llega a Workbooks. Open archi se brinca y no abre ninguno Sub AbreLibros() libro1 = ActiveWorkbook.Name 'se abren todos los libros de extensión xlsm de la carpeta indicada ChDir...
1 respuesta

MACRO nombre de libro en "X" celda del mismo

Tengo esta macro el cual me muestra el cuadro de dialogo para crear libros.. Sub CREAR_INVENTARIOS() On Error Resume Next MsgBox "Puedes Crear Hasta 7 inventarios", vbInformation, "INVENTARIOS 2015 J.E.U" MsgBox "PRIMERO", , "INVENTARIOS 2015"...
1 respuesta

Por qué estas dos macros muestran error si están juntas?

En continuación a la otra conversación te respondo lo siguiente: El conflicto es que esas dos macros no funcionan si están en un mismo libro en módulos diferentes, yo las he probado por separado y funcionan perfectamente. El error que muestra es:...
1 respuesta

¿Enviar mail automático en access?

Tengo una tabla con una serie de campos en Access 2010. Y Quisiera saber cómo seleccionar 5 ó 6 campos (de los 15 que tiene) y para que fueran enviados por mail de forma automática. En una de las columnas se encuentran los correos electrónicos de los...
1 respuesta

Macro exportar hoja excel a texto plano

Necesito un código para exportar el total de una hoja excel a texto plano. He encontrado por ahí una rutina que exporta una celda de la hoja creando un fichero txt : Sub exportar() Dim FileSysObj As Object Dim ArchivoTxt As Object Dim AreaTexto As...
1 respuesta
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas del tema