-
Borrado de datos
tengo el siguiente procedimiento que trabaja bien, ( el borrado del rango ), pero al cerrar el archivo pide confirmacion si se desea guardar los cambios,? hay manera de que los cambios se guarden en automatico, tal que no se pida confirmacion?
Sub Auto_Open()
Dim deadline As Date
deadline = "05/31/07"
If Date > deadline Then
With Activesheet.Range("Mi Rango")
.Clear
End With
End If
End Sub
Last edited by ojmv30; 04-14-2007 at 04:32 PM.
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules