Newsgroup: it.comp.appl.access
Titolo: Lavorare con Word

Buon giorno, 
avrei questa esigenza da Access 2000. Aprire un file di Word, cercare
una parola particolare e sostituirla.
Non riesco però a trovare una documentazione sugli oggetti Word, ho
trovato solo come creare un nuovo file, ma io devo aprire quello
esistente!
Grazie a tutti e ciao
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Grazie a tutti e ciao
La documentazione sugli oggetti sia di word che di access la trovi nell'help
in linea (F1) delle applicazioni; e trovi degli esempi di utilizzo di word
tramite access (OLE) su 
www.sitocomune.com
.
Per iniziare puoi utilizzare questo pezzo di codice:
'-------------
Dim oApp As Word.Application
Dim oRange As Word.Range
Set oApp = CreateObject("Word.application")
oApp.Documents.Open "c:\documenti\nomeFile.doc"
Set oRange = oApp.Documents(1).Content
With oRange.Find
    .Text = "parola o frase da cercare"
    .Execute
End With
If oRange.Find.Found Then
    MsgBox "Trovato."
    oRange.Select
Else
    MsgBox "non trovato."
End If
oApp.Visible = True
oApp.Activate
Prima devi inserire (strumenti - riferimenti) i riferimenti alla libreria di
word.
Ciao.
--
Sergio MAZZA

 Grazie a tutti e ciao
Se sai già come creare un nuovo file word da access avrai già il
riferimento alla libreria word e un oggetto di tipo word.application.
Allora per aprire il file usi documents.open:
Set oggettodocument=oggettoword.documents.open("nomefile")
Per la sostituzione...
Dalla guida di Word VBA:
Oggetto Find:
Nel seguente esempio vengono cercate tutte le occorrenze della parola
"ciao" nel documento attivo e sostituite con la parola "salve".
Set myRange = ActiveDocument.Content
myRange.Find.Execute FindText:="ciao", ReplaceWith:="salve", _
    Replace:=wdReplaceAll
Namor
-- 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Grazie a tutti e ciao
Se sai già come creare un nuovo file word da access avrai già il


Intanto grazie mille per le risposte, nel frattempo ho trovato 
qualche pezzo di codice nel sito di microsoft ma testandoli tutti
il debug si ferma sull'open del file con questo errore: 
oApp.Documents.Open "C:\questionario\questionario.doc" (riga coinvolta)
Errore di automazione. 
Il server ha sollevato un'eccezione. 
è un problema del mio Word? A voi funziona?
IO ho word 2000 su win 2000
Grazie ancora



L'errore mi è del tutto sconosciuto; hai inserito i riferimenti alla
libreria di word?
Ciao.
--
Sergio MAZZA

Si ho la libreria Microsoft word 10.0. L'unica cosa che ha di
"particolare"
questa applicazione è che istanzio anche la libreria di outlook per 
inviare un mail e che il file di word contiene campi modulo. 
può essere una di queste cose? se vado sulla guida dell'errore non 
dice niente. Inoltr ho verificato con task manager che lui instanzia 
word perché ho il processo winword in esecuzione e devo terminarlo da
li. 
grazie ancora
ciao 
cry


 cry
Io ho file di word con campi modulo e non mi danno problemi quando li apro
da access 97.
Ho avuto problemi con office 2000 nel senso che il codice apriva word,
apriva il documento e faceva il suo lavoro correttamente, però se tentavo
di eseguire di nuovo la procedura ricevevo un errore, sebbene tutti gli
oggetti fossero correttamente "terminati" alla fine della sub. Non mi
ricordo se è lo stesso che ottieni tu. Prova a chiudere il db, riaprirlo e
rieseguire la sub. Non credo che outlook dia fastidio a meno che non abbia
oggetti con lo stesso nome di quelli di word (tipo "document").
Se ci mandi anche il resto del codice con cui inizializzi gli oggetti e
apri il file, vediamo se va bene.


ciao ragazzi, ho scoperto l'errore e da un lato sono sollevata perché
ho trovato un'alternativa, dall'altro molto perplessa per il futuro. 
Il problema è Access 2000 con Word 2000 (non so se la coppia o uno
di essi) 
Ho infatti creato un nuovo db con access 97, ho tolto i riferimenti alla
libreria Microsoft Word 10.0 (perché non andava ancora) e gli ho messo i
riferimenti alla Microsoft Word 9.0 e magia... funziona!
Ora tutto sommato stavolta questo progettino è urgente ed è ininfluente
l'access che si usa. certo non è il massimo che non mi funzioni la 
versione nuova...
ma a voi funziona access 2000/word 2000? se qualcuno mi conferma la 
cosa, reinstallo tutto. 
Grazie mille e a presto 
Ciao
Cry






 ha scritto nel messaggio
news:a08b521b7917cb53c93...@mygate.mailgate.org...

Io non utilizzo volutamente la versione 2000 proprio per una serie di bug
che mi hanno rovinato (a me e al cliente) i dati...
Ciao.
--
Sergio MAZZA

Sergio MAZZA ha scritto:


Io invece confermo che con Access97 non ho mai avuto problemi, lo uso ogni
giorno esportando dati dal db verso Word ed Excel, mentre con
Access2000/Word2000 mi dava un errore di cui non ho ancora capito la causa
esatta, potrebbe essere uno dei bug che dici.
Se si ha a disposizione sia Access97 che il 2000 io userei sicuramente il
97, anche per il fatto che se vai a cercare qualcosa sulla guida del 97 la
trovi, mentre col 2000... buona fortuna!
A meno che non serva espressamente qualcuna delle novità introdotte con
A2000, tipo formattazione condizionale o blocco a livello di record.
