VBA Cerrar un word sin guardar cambios
Quisiera que la macro me cierre el archivo de word pero no guarde los cambios... Sin embargo, me sale el letrero antes de cerrar que me pide guardar, no guardar, o cancelar... Quisiera que solo cerrará y no guardará sin necesidad de la alerta.
Sub FORM()
Application.ScreenUpdating = False
'Abre word
Dim ruta As String
'
ruta = "C:\Users\Laura\Dropbox\DOCUMENTOS PERSONALES\\FORMULA.docx"
'
Set WordApp = CreateObject("word.Application")
'Abre archivo en la ruta y con el número
WordApp. Documents. Open ruta
WordApp.Visible = True
'Titulo fecha
Sheets("FORMULA"). Range("B6:H19"). Copy
'Se pegara en el documento lo copiado en la hoja de calculo
WordApp. Selection. PasteAndFormat 13
WordApp.ActiveDocument.PrintOut Range:=2 ' wdPrintCurrentPage
'Cerrar word
WordApp. Quit
Set WordApp = Nothing
Application.ScreenUpdating = True
End Sub
