Il 11/02/2010 10.38, Marco Rulli ha scritto:
No, ma, per favore, mi sai indicare come leggere da una macro una
variabile che ho settato nel relativo documento, nello specifico
tramite stampa-unione con accesso a un db in Base.
http://www.pitonyak.org/AndrewMacro.pdf
5.18.1. Document Information
se la variabile l'hai creata tu nel documento:
sub ProvaVariabile
dim lunghezza as integer
dim nome_file_completo, parametro as string
nome_file_completo = "mio_nome_file.txt"
lunghezza = Len(nome_file_completo) - 4
parametro = Left(nome_file_completo, lunghezza)
If FileExists(nome_file_completo) Then
rem fa qualcosa... (qui non fa niente)
rem shell(nome_file_completo,6,parametro,TRUE)
MsgBox ("Il file: " + parametro + Chr(13) +" esiste")
else
MsgBox ("Creare prima il file: " + parametro + Chr(13) + "con il
programma tuo_programma")
End If
end sub
ciao
Beppe
Grazie.
Marco Rulli
2010/2/11 giuse...@iclam.it<giuse...@iclam.it>:
Ho gia' creato parecchie macro abbinate a vari tipi di file.
Vorrei legare queste macro all'apertura del file:
macro1 eseguita se apro nome_file1
macro2 " se apro nome_file2
e cosi via...
oppure se sto usando espolora risorse
il comando invia a OpenOffice
e nell'apertura file eseguire la macro abbinata.
I files sono senza estensione, sono files di testo,
e dovranno aprirsi in Writer o in Calc.
Qualche idea?
Grazie.
Beppe
--
***********************************************************************
iclam srl
Sede Legale: Via Cerlungo 12
25018 Montichiari (BS) - italy
ic...@iclam.it
Tel. +39-030-961549
Fax +39-030-9961823
Capitale Sociale I.V. euro 36.400
Registro Imprese e Codice Fiscale: 01004640171
Partita I.V.A.:00595180985
Tribunale di Brescia 14969
Registro Imprese di Brescia - R.E.A. 224651 del 19.05.1978
***********************************************************************
ATTENZIONE: Il contenuto di questo messaggio è rivolto unicamente alle
persone cui è indirizzato e può contenere informazioni la cui riserva=
tezza è tutelata legalmente. Ne sono vietati la riproduzione, la diffu=
sione e l'uso in mancanza di autorizzazione del destinatario.
Se l'avete ricevuto per errore vogliate eliminare il messaggio in modo
permanente e darcene cortesemente notizia.
***********************************************************************
---------------------------------------------------------------------
To unsubscribe, e-mail: utenti-unsubscr...@it.openoffice.org
For additional commands, e-mail: utenti-h...@it.openoffice.org
