Método Document. SaveAs2 (Word)Document.SaveAs2 method (Word)

Salva o documento especificado com um novo nome ou formato.Saves the specified document with a new name or format. Alguns dos argumentos desse método correspondem às opções da caixa de diálogo salvar como (guiaarquivo ).Some of the arguments for this method correspond to the options in the Save As dialog box (File tab).

SintaxeSyntax

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

expressão Uma expressão que retorna um objeto Document .expression An expression that returns a Document object.

ParâmetrosParameters

NomeName Obrigatório/OpcionalRequired/Optional Tipo de dadosData type DescriçãoDescription
FileNameFileName OpcionalOptional VariantVariant O nome do documento.The name for the document. O padrão é a pasta atual e o nome de arquivo.The default is the current folder and file name. Se o documento nunca foi salvo, o nome padrão será usado (por exemplo, Doc1.doc).If the document has never been saved, the default name is used (for example, Doc1.doc). Se já existir um documento com o FileName especificado, o documento será substituído sem que o usuário seja alertado antes.If a document with the specified file name already exists, the document is overwritten without prompting the user.
FileFormatFileFormat OpcionalOptional VariantVariant O formato no qual o documento é salvo.The format in which the document is saved. Pode ser qualquer constante WdSaveFormat .Can be any WdSaveFormat constant. Para salvar um documento em outro formato, especifique o valor apropriado para a propriedade SaveFormat do objeto FileConverter.To save a document in another format, specify the appropriate value for the SaveFormat property of the FileConverter object.
LockCommentsLockComments OpcionalOptional VariantVariant True para bloquear o documento para comentários.True to lock the document for comments. O padrão é False.The default is False.
PasswordPassword OpcionalOptional VariantVariant Uma cadeia de caracteres de senha para abrir o documento.A password string for opening the document. (Consulte os Comentários abaixo.)(See Remarks below.)
AddToRecentFilesAddToRecentFiles OpcionalOptional VariantVariant True para adicionar o documento à lista de arquivos recentemente usados no menu Arquivo.True to add the document to the list of recently used files on the File menu. O padrão é True.The default is True.
WritePasswordWritePassword OpcionalOptional VariantVariant Uma cadeia de caracteres de senha para salvar as alterações no documento.A password string for saving changes to the document. (Consulte os Comentários abaixo.)(See Remarks below.)
ReadOnlyRecommendedReadOnlyRecommended OpcionalOptional VariantVariant True para que o Microsoft Word sugira o status somente leitura sempre que um documento for aberto.True to have Microsoft Word suggest read-only status whenever the document is opened. O padrão é False.The default is False.
EmbedTrueTypeFontsEmbedTrueTypeFonts OpcionalOptional VariantVariant True para salvar fontes TrueType com o documento.True to save TrueType fonts with the document. Se for omitido, o argumento EmbedTrueTypeFonts assumirá o valor da propriedade EmbedTrueTypeFonts .If omitted, the EmbedTrueTypeFonts argument assumes the value of the EmbedTrueTypeFonts property.
SaveNativePictureFormatSaveNativePictureFormat OpcionalOptional VariantVariant Se os gráficos foram importados de outra plataforma (por exemplo, Macintosh), true para salvar somente a versão do Microsoft Windows dos elementos gráficos importados.If graphics were imported from another platform (for example, Macintosh), True to save only the Microsoft Windows version of the imported graphics.
SaveFormsDataSaveFormsData OpcionalOptional VariantVariant True para salvar os dados inseridos por um usuário em um formulário como um registro.True to save the data entered by a user in a form as a record.
SaveAsAOCELetterSaveAsAOCELetter OpcionalOptional VariantVariant Se o documento tiver um mensageiro anexado, true para salvar o documento como uma carta AOCE (o mensageiro é salvo).If the document has an attached mailer, True to save the document as an AOCE letter (the mailer is saved).
EncodingEncoding OptionalOptional VariantVariant A página de código ou o conjunto de caracteres a ser usado no caso de documentos salvos como arquivos de texto codificados.The code page, or character set, to use for documents saved as encoded text files. O padrão é a página de código do sistema.The default is the system code page. Você não pode usar todas as constantes MsoEncoding com esse parâmetro.You cannot use all MsoEncoding constants with this parameter.
InsertLineBreaksInsertLineBreaks OpcionalOptional VariantVariant Se o documento for salvo como um arquivo de texto, true para inserir quebras de linha no final de cada linha de texto.If the document is saved as a text file, True to insert line breaks at the end of each line of text.
AllowSubstitutionsAllowSubstitutions OpcionalOptional VariantVariant Se o documento for salvo como um arquivo de texto, true permite que o Word substitua alguns símbolos por texto parecido com o que parece.If the document is saved as a text file, True allows Word to replace some symbols with text that looks similar. Por exemplo, exibindo o símbolo de direito autoral como (c).For example, displaying the copyright symbol as (c). O padrão é False.The default is False.
LineEndingLineEnding OpcionalOptional VariantVariant O modo como o Word assinala as quebras de linha e parágrafo em documentos salvos como arquivos de texto.The way Word marks the line and paragraph breaks in documents saved as text files. Pode ser uma das seguintes constantes WdLineEndingType : wdCRLF (default) ou wdCROnly.Can be one of the following WdLineEndingType constants: wdCRLF (default) or wdCROnly.
AddBiDiMarksAddBiDiMarks OpcionalOptional VariantVariant True adiciona caracteres de controle ao arquivo de saída para preservar o layout bidirecional do texto no documento original.True adds control characters to the output file to preserve bi-directional layout of the text in the original document.
CompatibilityModeCompatibilityMode OpcionalOptional VariantVariant O modo de compatibilidade que Word usa ao abrir o documento.The compatibility mode that Word uses when opening the document. Constante WdCompatibilityMode .WdCompatibilityMode constant.
ImportanteImportant
Por padrão, se nenhum valor for especificado para esse parâmetro, o Word inserirá um valor de 0, que especifica que o modo de compatibilidade atual do documento deve ser mantido.By default, if no value is specified for this parameter, Word enters a value of 0, which specifies that the current compatibility mode of the document should be retained.

Valor de retornoReturn value

NadaNothing

ExemploExample

O exemplo de código a seguir salva o documento ativo como Test.rtf no formato rich text (RTF).The following code example saves the active document as Test.rtf in rich-text format (RTF).

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

O exemplo de código a seguir salva o documento ativo no formato de arquivo texto, com a extensão ".txt".The following code example saves the active document in text-file format with the extension ".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

O exemplo de código a seguir faz um loop por todos os conversores instalados e, se encontrar o conversor WordPerfect 6,0, ele salva o documento ativo usando o conversor.The following code example loops through all the installed converters, and if it finds the WordPerfect 6.0 converter, it saves the active document using the converter.

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

O exemplo de código a seguir mostra um procedimento que salva um documento com uma senha.The following code example shows a procedure that saves a document with a password.

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

Confira tambémSee also

Objeto DocumentDocument Object

Suporte e comentáriosSupport and feedback

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação?Have questions or feedback about Office VBA or this documentation? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.