Help me please
Premetto che sono un novello del VBA.
Ho creato in Word un file .docm che ho chiamato “Valuta2.docm”, ma ho un problema con il salvataggio che mi sta facendo impazzire.
Il file con la macro è contenuto in una cartella che ho chiamato “Valuta Word” e che posso spostare su qualsiasi computer. Dopo aver modificato il file “Valuta2” il file viene rinominato con il nome preso da una textbox, cliccando su un pulsante. Il file viene salvato con quel nome e contemporaneamente mi si apre un nuovo file “Valuta2.docm” contenuto sempre nella cartella “Valuta Word”.
Purtroppo i file rinominati vengono sempre salvati nella Cartella C:\Users\NomeUsers\Documents. Io vorrei invece che venissero salvati nella stessa cartella in cui è contenuto il file “Valuta2.docm” che è poi la stessa cartella che posso spostare su qualsiasi computer.
Succede una cosa strana. Quando apro il file "Valuta2.docm" per la prima volta, da File - Apri il nuovo file creato con la macro, ma solo questo, mi viene salvato nella cartella giusta, cioè in "Valuta Word". Il successivo che viene aperto automaticamente, quando salvato va a finire nella cartella C:\Users\NomeUser\Documents. Perchè ?????
Ho provato in mille modi, ma c’è qualcosa che mi sfugge e non riesco a capire dove sbaglio.
Ecco il codice
Private Sub CMDSalva_Click()
Dim Nome, PercFile As String
Nome = TxtNome.Text
PercFile = ActiveDocument.Path
ActiveDocument.SaveAs FileName:=Nome & ".docm"
Set wApp = New Word.
Set wDoc = wApp.Documents.Open(PercFile & "\Valuta2.docm")
wDoc.Activate
wApp.Visible = True
End Sub
grazie ciao