Geopend Worddocument opslaan onder een nieuwe naam zonder Opslaan Als menu.

Status
Niet open voor verdere reacties.

Roncancio

Meubilair
Lid geworden
24 mei 2005
Berichten
8.257
Ik ben bezig om vanuit Excel dmv VBA een Wordbestand te openen, aan te passen en nu komt het hernoemen zonder dat het Opslaan Als menu verschijnt.
Hoe kan ik het Opslaan Als menu omzeilen zodat het Worddocument direct opgeslagen wordt onder de nieuwe naam?
Code:
Sub Hernoemen()
    Dim objWrd As Object
    
    Set objWrd = GetObject("C:\blax.docx")
        objWrd.Parent.Visible = True

' mijn handelingen

        objWrd.SaveAs "C:\testje.docx"

End Sub

In het origineel staan ook de aanpassingen maar die zijn hier niet van belang.

Bij voorbaat dank.

Met vriendelijke groet,


Roncancio
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan