Salve a tutti :-)))

Avendo usato per molto tempo Excel e la sua programmazione interna in
VBA, ma anche
alcune normali funzioni come ad esempio:
        AMBIENTE.INFO("directory")
che restituiva il percorso corrente in cui si trovava il file, per
evitare di dovermi riscrivere ogni volta
le funzioni ho creato un alias (o quasi) di quella funzione...

Unica differenza è che devo togliere il punto (presente in excel) e
sostituirlo con il trattino basso (o altro)
in Calc...

Qualcuno sa come fare in modo di:
1) poter lasciare il puntino, in modo da non dover cambiare il nome
della funzione?
2) fare in modo che se apro un file di excel, quella funzione non venga
sostituita da:
    =#NOME!()

Allego il codice che ho usato (per ora è supportatata solo la
restituizion del percorso corrente)

--- inizio codice ---
'Progetto: Conversione delle funzioni Ambiente di Excel
'Elenco delle funzioni Ambiente di Excel converite
'    =AMBIENTE.INFO("directory")
'NOTE: per ora occorre sostituire il punto con un trattino basso


Function AMBIENTE_INFO(sParametro as String)
dim sTemp as string

    select case lCase(sParametro)
        case "directory"
            sTemp = CPath
        case else
            sTemp = "Parametro non supportato!"       
    end select

AMBIENTE_INFO = sTemp

End Function


Function CPath()    'Restituisce il percorso del file corrente
Dim sPercorso
    sPercorso = CurDir   
    CPath = sPercorso
End Function

--- fine codeice ---

Ringrazio anticipatamente per le risposte

-- 
Ciao!
----------------------------------------------------------
Daniele Pinna * ICQ 24567484*
Vota il mio sito nella TOP100 Italiana *
Sito Web DAPINNA.COM: http://www.dapinna.com
Il Docfa in Pillole:  http://www.ildocfainpillole.it



---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Rispondere a