Guardar Hoja

hola, Danilo !

... macro que grabe con el grabador
Sub guardarplano()
ActiveWorkbook.SaveAs FileName:="C:\Excel\plano.prn", FileFormat:= _
xlTextPrinter, CreateBackup:=False
End Sub
... no me funciona si tengo el proyecto BLOQUEADO... por que esto, o de que otra forma puedo hacerlo

1.- por que???
porque la siguiente ocasion que se abra el archivo 'plano' generado... NO 'podra' contener macros...
y cuando la aplicacion 'intenta' eliminar los modulos... el proyecto esta 'bloqueado' :((
2.- alternativas para hacerlo???
a) asegurate que el archivo 'activo'... NO tenga macros [al menos... 'bloqueadas'] o...
b) 'permite' que la aplicacion elimine las macros ->quita la proteccion al proyecto vba<- ;)

saludos,
hector.

HOLA HECTOR M.

El libro activo sobre el cual ejecuto la macro contiene muchas macros, estos
codigos lo bloquie por seguridad por que lo utilizan otras personas tambien.

O dame un consejo que hago, ¿ o hay alguna manera de por codigo desbloquear
el proyecto antes de ejecutar la macro que guarda?

Muchas gracias
Saludos
Danilo

hola, Danilo !

El libro activo... contiene muchas macros... lo bloquie por seguridad... lo utilizan otras personas
O ... alguna manera de... desbloquear el proyecto antes de ejecutar la macro [...]

una alternativa pudiera ser 'generar' una hoja nueva [en un libro nuevo] que sea el que se 'haga plano' :))
[p.e. la 'simple' instruccion: ActiveSheet.Copy... crea una hoja y libro nuevos y los deja como 'activos']
si la 'antepones' a la instruccion que genera el archivo 'plano'... :D [p.e.]
Sub Aplanar()
ActieSheet.Copy
ActiveWorkbook.SaveAs _
FileName:="C:\Excel\plano.prn", _
FileFormat:=xlTextPrinter
End Sub

[ya el proceso que utilices 'normalmente' para cerrar 'este' archivo -y los otros-... dependera de... ???]

saludos,
hector.

GRACIAS HECTOR M. POR TU AYUDA!!!!!!!
ME SIRVIO MUCHO