Método Document.SaveAs2 (Word)
Salva o documento especificado com um novo nome ou formato. Alguns argumentos para esse método correspondem às opções da caixa de diálogo Salvar como (guia Arquivo).
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 .
Nome | Obrigatório/Opcional | Tipo de dados | Descrição | ||
---|---|---|---|---|---|
FileName | Opcional | Variantes | O nome do documento. O padrão é a pasta atual e o nome de arquivo. Se o documento nunca foi salvo, o nome padrão será usado (por exemplo, Doc1.doc). Se já existir um documento com o FileName especificado, o documento será substituído sem que o usuário seja alertado antes. | ||
FileFormat | Opcional | Variantes | O formato no qual o documento é salvo. Pode ser qualquer constante WdSaveFormat . Para salvar um documento em outro formato, especifique o valor apropriado para a propriedade SaveFormat do objeto FileConverter . | ||
LockComments | Opcional | Variantes | True para bloquear o documento para comentários. O padrão é False. | ||
Password | Opcional | Variantes | Uma cadeia de caracteres de senha para abrir o documento. (Consulte os Comentários abaixo.) | ||
AddToRecentFiles | Opcional | Variantes | True para adicionar o documento à lista de arquivos recentemente usados no menu Arquivo. O padrão é True. | ||
WritePassword | Opcional | Variantes | Uma cadeia de caracteres de senha para salvar as alterações no documento. (Consulte os Comentários abaixo.) | ||
ReadOnlyRecommended | Opcional | Variantes | True para que o Microsoft Word sugira o status somente leitura sempre que um documento for aberto. O padrão é False. | ||
EmbedTrueTypeFonts | Opcional | Variantes | True para salvar fontes TrueType com o documento. Se omitido, o argumento EmbedTrueTypeFonts assume o valor da propriedade EmbedTrueTypeFonts . | ||
SaveNativePictureFormat | Opcional | Variantes | Se foram importados elementos gráficos de outra plataforma (por exemplo, do Macintosh), True para salvar somente a versão para Microsoft Windows dos elementos gráficos importados. | ||
SaveFormsData | Opcional | Variantes | True para salvar os dados inseridos por um usuário em um formulário como um registro. | ||
SaveAsAOCELetter | Opcional | Variantes | Se um documento tiver um mensageiro anexado, True para salvar o documento como uma carta AOCE (o mensageiro é salvo). | ||
Encoding | Optional | Variantes | A página de código ou o conjunto de caracteres a ser usado no caso de documentos salvos como arquivos de texto codificados. O padrão é a página de código do sistema. Você não pode usar todas as constantes MsoEncoding com esse parâmetro. | ||
InsertLineBreaks | Opcional | Variantes | Se o documento foi salvo como um arquivo de texto, True para inserir quebras de linha no final de cada linha de texto. | ||
AllowSubstitutions | Opcional | Variantes | Se o documento foi salvo como um arquivo de texto, True permite ao Word substituir alguns símbolos por texto que pareça semelhante. Por exemplo, exibindo o símbolo de direito autoral como (c). O padrão é False. | ||
LineEnding | Opcional | Variantes | O modo como o Word assinala as quebras de linha e parágrafo em documentos salvos como arquivos de texto. Pode ser uma das seguintes constantes WdLineEndingType : wdCRLF (padrão) ou wdCROnly. | ||
AddBiDiMarks | Opcional | Variantes | True adiciona caracteres de controle ao arquivo de saída para preservar o layout bidirecional do texto no documento original. | ||
CompatibilityMode | Opcional | Variantes | O modo de compatibilidade que o Word usa ao abrir o documento. Constante WdCompatibilityMode .
|
Nada
O exemplo de código a seguir salva o documento ativo como Test.rtf no formato rich text (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".
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 passa por todos os conversores instalados e, se ele encontrar o conversor do WordPerfect 6.0, salvará o documento ativo usando o conversor.
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.
Sub SaveWithPassword(docCurrent As Document, strPWD As String)
With docCurrent
.SaveAs2 WritePassword:=strPWD
End With
End Sub
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? 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.