Compartir a través de

Método Document.SaveAs2 (Word)

  • Artículo

Guarda el documento especificado con un nuevo nombre o formato. Algunos argumentos de este método se corresponden con las opciones del cuadro de diálogo Guardar como (pestaña Archivo).

Sintaxis

expresión. SaveAs2( _FileName_ , _FileFormat_ , _LockComments_ , _Password_ , _AddToRecentFiles_ , _WritePassword_ , _ReadOnlyRecommended_ , _EmbedTrueTypeFonts_ , _SaveNativePictureFormat_ , _SaveFormsData_ , _SaveAsAOCELetter_ , _Encoding_ , _InsertLineBreaks_ , _AllowSubstitutions_ , _LineEnding_ , _AddBiDiMarks_ , _CompatibilityMode_ )

Expresión Expresión que devuelve un objeto Document .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
FileName Opcional Variant Nombre del documento. Los valores predeterminados son la carpeta y el nombre del archivo actuales. Si el documento no se ha guardado nunca, se utiliza el nombre predeterminado, por ejemplo Doc1.doc. Si ya hay un documento con el nombre de archivo especificado, el documento se sobrescribe sin solicitar confirmación al usuario.
FileFormat Opcional Variant Formato en que se guarda el documento. Puede ser cualquier constante WdSaveFormat . Para guardar un documento en otro formato, especifique el valor adecuado para la propiedad SaveFormat del objeto FileConverter.
LockComments Opcional Variant True para bloquear el documento contra comentarios. El valor predeterminado es False.
Password Opcional Variant Cadena de contraseña para abrir el documento. (vea el apartado Comentarios más adelante).
AddToRecentFiles Opcional Variant True para agregar el documento a la lista de archivos usados recientemente en el menú Archivo. El valor predeterminado es True.
WritePassword Opcional Variant Una contraseña para guardar los cambios del documento. (vea el apartado Comentarios más adelante).
ReadOnlyRecommended Opcional Variant True para que Microsoft Word sugiera el estado de solo lectura cada vez que se abra el documento. El valor predeterminado es False.
EmbedTrueTypeFonts Opcional Variant True para guardar las fuentes TrueType con el documento. Si se omite, el argumento EmbedTrueTypeFonts presupone el valor de la propiedad EmbedTrueTypeFonts.
SaveNativePictureFormat Opcional Variant Si se importaron gráficos desde otra plataforma (por ejemplo, Macintosh), True para guardar solo la versión de Microsoft Windows de los gráficos importados.
SaveFormsData Opcional Variant True para guardar como registro los datos que especifique un usuario en un formulario.
SaveAsAOCELetter Opcional Variant Si el documento tiene un formulario adjunto, True para guardar el documento como una carta AOCE (se guarda el formulario).
Encoding Opcional Variant Página de código o conjunto de caracteres que se debe usar para los documentos que se guardan como archivos de texto codificado. El valor predeterminado es la página de código del sistema. No se pueden usar todas las constantes MsoEncoding con este parámetro.
InsertLineBreaks Opcional Variant Si el documento se guarda como archivo de texto, True para insertar saltos de línea al final de cada línea de texto.
AllowSubstitutions Opcional Variant Si el documento se guarda como archivo de texto, True permite a Word reemplazar algunos símbolos con texto de aspecto similar. Por ejemplo, mostrar el símbolo de copyright como (c). El valor predeterminado es False.
LineEnding Opcional Variant La manera en que Word marca los saltos de línea y párrafo de los documentos que se guardan como archivos de texto. Puede ser una de las siguientes constantes WdLineEndingType : wdCRLF (valor predeterminado) o wdCROnly.
AddBiDiMarks Opcional Variant True agrega caracteres de control al archivo de salida para conservar el diseño bidireccional del texto del documento original.
CompatibilityMode Opcional Variant Modo de compatibilidad que Word usa al abrir el documento. Constante WdCompatibilityMode.
Importante
De manera predeterminada, si no se especifica ningún valor para este parámetro, Word indica un valor de 0, que especifica que se debe conservar el modo de compatibilidad actual del documento.

Valor devuelto

Nada

Ejemplo

En el código de ejemplo siguiente, el documento activo se guarda como Test.rtf en formato de texto enriquecido (RTF).

Sub SaveAsRTF() 
    ActiveDocument.SaveAs2 FileName:="Text.rtf", _ 
        FileFormat:=wdFormatRTF 
End Sub

En el código de ejemplo siguiente, el documento activo se guarda en el formato de archivo de texto con la extensión ".txt".

Sub SaveAsTextFile() 
    Dim strDocName As String 
    Dim intPos As Integer 
 
    ' Find position of extension in file name 
    strDocName = ActiveDocument.Name 
    intPos = InStrRev(strDocName, ".") 
 
    If intPos = 0 Then 
 
        ' If the document has not yet been saved 
        ' Ask the user to provide a file name 
        strDocName = InputBox("Please enter the name " & _ 
            "of your document.") 
    Else 
 
        ' Strip off extension and add ".txt" extension 
        strDocName = Left(strDocName, intPos - 1) 
        strDocName = strDocName & ".txt" 
    End If 
 
    ' Save file with new extension 
    ActiveDocument.SaveAs2 FileName:=strDocName, _ 
        FileFormat:=wdFormatText 
End Sub

En el ejemplo de código siguiente se recorren en bucle todos los convertidores instalados y, si encuentra el convertidor WordPerfect 6.0, guarda el documento activo mediante el convertidor.

Sub SaveWithConverter() 
 
    Dim cnvWrdPrf As FileConverter 
 
    ' Look for WordPerfect file converter 
    ' And save document using the converter 
    ' For the FileFormat converter value 
    For Each cnvWrdPrf In Application.FileConverters 
        If cnvWrdPrf.ClassName = "WrdPrfctWin" Then 
            ActiveDocument.SaveAs2 FileName:="MyWP.doc", _ 
                FileFormat:=cnvWrdPrf.SaveFormat 
        End If 
    Next cnvWrdPrf 
 
End Sub

En el código de ejemplo siguiente, se muestra un procedimiento que guarda un documento con una contraseña.

Sub SaveWithPassword(docCurrent As Document, strPWD As String) 
    With docCurrent 
        .SaveAs2 WritePassword:=strPWD 
    End With 
End Sub

Vea también

Objeto Document

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.