Error: ".... No tiene el permiso necesario"

Hola a todos.

Cuando ejecuto una macro para intentar guardar un archivo adjunto a
un correo, me aparece este error:

"Se ha producido el error '-2009661435(88370005)' en tiempo de
ejecucion. No se pueden guardar los datos adjuntos. No tiene permiso para
ello."

La maquina es mia y yo soy el usuario permitido. ¿Sabe alguien como
solucionarlo?. Supongo que tendra que ver con la seguridad en macros, pero
la tengo establecida en baja (en excel, en outlook no lo he mirado, pero
me imagino que no debe ser muy conveniente). Adjunto la macro por si es
util.

Public Sub ActualizarCambios()
Dim OutlookApp As New Outlook.Application
Dim crpEntrada As Outlook.MAPIFolder
Dim indMsj As Outlook.Items
Dim msjMensaje As Outlook.MailItem
Dim msjTitulo As String
Dim iIt As Integer
Set crpEntrada = OutlookApp.GetNamespace("MAPI") _
.GetDefaultFolder(olFolderInbox)
Set indMsj = crpEntrada.Items
msjTitulo = "Copiar BIBLIOTECA"
For iIt = 1 To crpEntrada.Items.Count
Set msjMensaje = indMsj.Item(iIt)
With msjMensaje
If .Attachments.Count > 0 Then
If Left(.Subject, 17) = msjMensaje Then _
.Attachments.Item(iIt).SaveAsFile _
"C:\Documents and Settings\Ivan\Mis documentos\" & _
"Librería de Manuel Morales\Copias libreria"
End If
End With
Next
OutlookApp.Quit
Set OutlookApp = Nothing
End Sub

Lo dicho, si alguien me puede echar una mano se lo agradezco.

un saludo y hasta pronto
Ivan