Vba Si Blocca La Chiusura Di Word

[luca1]

le ho provate tutte ( loop if chiate funzioni ) ma non risco
grazie a tutti
spero mi potrete aiutare

SUB auto_open()


sub stampa() SI BLOCCA QUA E NON VA AVANTI RIMANENDO TUTTO APERTO

sub uscita()
end sub



sub stampa()

With ActiveDocument.MailMerge
.Destination = wdSendToPrinter
.SuppressBlankLines = True
With .DataSource
.FirstRecord = ActiveDocument.MailMerge.DataSource.ActiveRecord
.LastRecord = ActiveDocument.MailMerge.DataSource.ActiveRecord
End With

.Execute PAUSE:="FALSE"

End With
end sub

sub uscitA ()
COMANDI PER CHIUSURA
END SUB

[oregon]

Ma cosa è questo ??

Originariamente inviato da luca1
SUB auto_open()


sub stampa() SI BLOCCA QUA E NON VA AVANTI RIMANENDO TUTTO APERTO

sub uscita()
end sub



sub stampa()

[luca1]

dopo che esegue quella sub
e cioe si apre la stampa unione
non riesco a chudere il documeto chiamante e cioe non va alla sub chiudi ma mi si blocca eseguzione del programma

ciao e grazie

[oregon]

Sai come si chiamano le funzioni all'interno di un'altra funzione?

[luca1]

Originariamente inviato da oregon
Ma cosa è questo ??

spero di averti fatto capire ilmio problema

non ho capito la domanda

sono alle prime armi
potreti dirmi dove sbaglio?

[oregon]

Originariamente inviato da luca1
non ho capito la domanda

La domanda è semplice ... cosa intendi fare con

sub stampa() SI BLOCCA QUA E NON VA AVANTI RIMANENDO TUTTO APERTO

all'interno della SUB auto_open() ?

Non penso che tu non abbia nessun messaggio d'errore ...

sono alle prime armi

Un buon motivo per studiare le *basi* prima di iniziare a programmare e chiedere in un forum ...

[luca1]

sub stampa()
eseguo l'istruzioni di stampa unione
non ho errori
perche ho dimenticato di commentarlo
e poi una volta partita la sub di stamopa unione chiudere tutto
il documento e word
utilizzando la sub uscita
ma il problema che non ci arriva alla sub uscita e quindi rimande il word con il documento partente aperto
grazie ancora

[oregon]

No ... con

Originariamente inviato da luca1
sub stampa()
eseguo l'istruzioni di stampa unione

non esegui nulla ... controlla se è la sintassi giusta per richiamare le sub ...

[luca1]

scusami
quello che ho notato è che dopo l'eseguzione di
.Execute PAUSE:="FALSE"
il programma si ferma e non risco a fare nulla
cioè non chiama la sub uscita e quindi sia word che il documento di partenza mi rimane aperto e non riesco ad automatizzare la chiusura dopo la stampa unione
grazie tanto

ti chiedo se potevi tu aiutarmi sono mesi che ci sbatto il muso

[oregon]

Originariamente inviato da luca1
eseguzione

Si dice esecuzione ... con la c ...

il programma si ferma e non risco a fare nulla

Non cambiare discorso, cerca di rispondere alla domanda ... tu hai mostrato questo codice

SUB auto_open() 


sub stampa() 

sub uscita() 
end sub

Ti sembra corretto scrivere

sub stampa()

e

sub uscita()

all'interno di un'altra Sub ?