Condividi:        

vba word: Bookmarks.Exists su documento non visibile

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

vba word: Bookmarks.Exists su documento non visibile

Postdi karug64 » 15/08/16 11:10

Salve a tutti.

Nel mio documento ho inserito dei bookmarks.
In una fase successiva ne testo la presenza per effettuare alcune operazioni.
Quindi, apro il vecchio documento con

Codice: Seleziona tutto
Documents.Open FileName:=UserForm3.fileold.Text, ReadOnly:=True, Visible:=True


e ne testo la presenza con:

Codice: Seleziona tutto
dat = 0
   If ActiveDocument.Bookmarks.Exists("Dat1") = True And ActiveDocument.Bookmarks.Exists("Dat2") = True Then
        dat = 1
    End If


il tutto funziona, ma se apro il documento con "Visible:=false" il bookmarks non viene trovato.

C'e' modo di effettuare questa verifica in modo da non avere visibile il documento (tra l'altro si ha un effetto a video brutto all'apertura del documento....).

Non sono riuscito ad aprirlo direttamente minimizzato (che forse potrebbe risolvere il problema).

Graziie
Office 2010
karug64
Utente Senior
 
Post: 746
Iscritto il: 20/11/11 21:22

Sponsor
 

Re: vba word: Bookmarks.Exists su documento non visibile

Postdi Anthony47 » 17/08/16 15:07

Ma se il documento non e' visibile, come fai a farlo diventare ActiveDocument?
Prova indirizzando in modo esplicito il documento:
Codice: Seleziona tutto
   If Documents(UserForm3.fileold.Text).Bookmarks.Exists("Dat1") = True And Documents(UserForm3.fileold.Text).Bookmarks.Exists("Dat2") = True Then

A me ha funzionato.

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 19181
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: vba word: Bookmarks.Exists su documento non visibile

Postdi karug64 » 17/08/16 15:10

Anthony47 ha scritto:Ma se il documento non e' visibile, come fai a farlo diventare ActiveDocument?
Prova indirizzando in modo esplicito il documento:
Codice: Seleziona tutto
   If Documents(UserForm3.fileold.Text).Bookmarks.Exists("Dat1") = True And Documents(UserForm3.fileold.Text).Bookmarks.Exists("Dat2") = True Then

A me ha funzionato.

Ciao



Giusto .....

Grazie
Office 2010
karug64
Utente Senior
 
Post: 746
Iscritto il: 20/11/11 21:22


Torna a Applicazioni Office Windows


Topic correlati a "vba word: Bookmarks.Exists su documento non visibile":


Chi c’è in linea

Visitano il forum: Nessuno e 53 ospiti

cron