Stampa unione senza excel?

Question

Buongiorno, vorrei creare un file word dove all'apertura venga chiesto di inseriti dei campi (es. Nome e Cognome) e questi dati vengano inseriti nel documento (una specie di stampa unione, ma senza excel).

Cerco di spiegarmi meglio, apro il file e mi viene chiesto "nome?" - rispondo, mi chiede poi "cognome?" - rispondo etc, finite le domandi e mi apre il file dove nei campi da me indicati ci sono le risposte che ho dato

Oppure apro il file e nella prima schermata ci son tutte le domante e un "prosegui", e dopo il "prosegui" inserisce i dati inseriti nei campi del documento.

E' fattibile?

Grazie

Answer 1

La risposta è stata tradotta automaticamente. Di conseguenza, potrebbero esserci errori grammaticali o parole insolite.

Ciao, Edoardo B.

Grazie per aver utilizzato i prodotti Microsoft e per averli pubblicati nella community.

Può essere fatto, è necessario utilizzare macro VBA e controlli di testo, ecco i passaggi dettagliati:

Passaggio 1: attiva gli strumenti per sviluppatori

Apri Word, fai clic su "File" > "Opzioni".

Nella scheda "Personalizza barra multifunzione", seleziona la casella di controllo "Strumenti per sviluppatori", quindi fai clic su "OK".

Passaggio 2: Inserire i segnaposto

Passa alla scheda "Strumenti per sviluppatori".

Fai clic sul pulsante Controllo contenuto testo (che ha l'aspetto di una casella di testo con una "aa").

Fare clic nel punto in cui si desidera inserire il segnaposto nel documento.

Seleziona la casella di testo appena inserita e fai clic sul pulsante Proprietà.

Inserisci il testo segnaposto nel campo Titolo o Etichetta, ad esempio <<Nome>> o <<Cognome>> e fai clic su "OK". Fare clic su "OK". (Deve corrispondere al testo di ricerca nel codice)

Passaggio 3: Scrittura di una macro VBA

Premi Alt + F11 per aprire l'editor VBA.

In Esplora progetti a sinistra, trova il documento ed espandilo.

Fare doppio clic su ThisDocument e immettere il seguente codice nella finestra Codice a destra:

Private Sub Document_Open() 
    Call FillForm 
End Sub 
 
Sub FillForm() 
    Dim FirstName As String 
    Dim LastName As String 

    FirstName = InputBox("Please enter your first name:") 
    LastName = InputBox("Please enter your last name:") 
     
    With ActiveDocument 
        .Content.Find.Execute FindText:="<<FirstName>>", ReplaceWith:=FirstName 
        .Content.Find.Execute FindText:="<<LastName>>", ReplaceWith:=LastName 
    End With 
End Sub

Passaggio 4: salvare e chiudere l'editor VBA

Salvare e chiudere l'editor VBA.

Passaggio 5: salva il documento

Salvare il documento Word nel formato di documento con attivazione macro (.docm).

Test

Chiudi e riapri il documento di Word.

Quando il documento si apre, la macro viene eseguita automaticamente, richiedendo di immettere un nome e un cognome e di immettere tali informazioni nella posizione appropriata nel documento.

Spero che le informazioni di cui sopra possano aiutarti. Sentiti libero di inviare un messaggio se hai bisogno di ulteriore aiuto.

I miei migliori auguri

Aiden.C - MSFT |Specialista del supporto della community Microsoft