
Originariamente inviato da
PeppeDM
Non so come inserire le istruzioni del filedialog nella mia macro...
Sinceramente vedo un po' di problemi nel tuo codice.
Prima assegni questa variabile:
strPath = activedocument.path
ma poi non la usi, quindi dove viene salvato il file che produci?
poi trovo queste righe:
strFilename = .DataFields("NoName").Value & " " & .DataFields("nr1").Value & "_" & .DataFields("Anno1").Value
If Len(strFilename) Then
strFilename = strFilename <---------
objWdMailMerge.Execute
With ActiveDocument
.SaveAs strFilename, wdFormatdoc, AddToRecentFiles:=False <---------
.Saved = True
.Close
End With
Nelle righe con la freccia, perchè assegni una variabile a se stessa, e dopo salvi il file senza utilizzare la variabile strPath che contiene il percorso?
Per tornare al problema iniziale, il codice per la gestione del FileDialog, va inserito nel punto in cui vuoi che venga determinato il percorso in cui salvare il file... ma il tuo codice appare piuttosto confusionario su questo punto.
TheTruster