Data creazione

[info1]

Buongiorno a tutti.

Qualche giorno fa ho chiesto aiuto per poter acquisire in VB con Excel la
data di creazione del file attivo e giustamente M. Borrelli mi ha tra
l'altro consigliato la Function FileDateTime: purtroppo però ho verificato
che ottengo la data di modifica.
L'altro consiglio era la Property DateCreated: ho verificato che non è
definita nel mio ambiente Excel 2003.
La mia domanda a questo punto credo possa essere una sola: posso ottenere
DateCreated aggiornando la mia libreria Excel?

Grazie per l'attenzione.

[Maurizio Borrelli]

"info1" wrote in message
news:OqsW4hI...@TK2MSFTNGP04.phx.gbl:

Ciao info1.

Fai cosi':

[Excel]
Strumenti > Macro > Visual Basic Editor

[VB]
Strumenti > Riferimenti...
[v] Microsoft Scripting Runtime
[ OK ]

Da questo punto in poi, pero', qualcosina dovresti almeno leggere
riguardo l'uso di tale Library. Cerca nel tuo disco il file:

VBSCRIP5.CHM

e cliccaci sopra.

P.S.+N.B.: Io non ti ho consigliato nulla, ne' mai lo faro'. Come spero
di te. Le mie erano solo indicazioni, spero utili e affidabili. Quel che
tu ci farai con quelle e' affar tuo. ;-)

--
(Facci sapere se e eventualmente come hai risolto. Grazie.)

Maurizio Borrelli [Microsoft Excel MVP]
http://www.riolab.org

[Mauro Gamberini]

> La mia domanda a questo punto credo possa essere una sola: posso ottenere
> DateCreated aggiornando la mia libreria Excel?
>

Public Sub m()

Dim objFSO As Object
Dim objFile As Object
Dim s As String

On Error GoTo RigaErrore

s = ActiveWorkbook.FullName

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile(s)

MsgBox objFile.DateCreated _
& vbNewLine & _
objFile.DateLastAccessed _
& vbNewLine & _
objFile.DateLastModified

RigaChiusura:
Set objFSO = Nothing
Set objFile = Nothing
Exit Sub

RigaErrore:
MsgBox Err.Number & vbNewLine & Err.Description
Resume RigaChiusura

End Sub

--
---------------------------
Mauro Gamberini
http://www.riolab.org/

[info1]

Ho già provato e visto che ottengo le tre date.
Non so come ringraziare M. Borrelli per le varie indicazioni e M. Gamberini
per addirittura la soluzione.
Grazie anche perché avete capito che ero in difficoltà.
Buona continuazione.

PS: Gamberini era il nome del mio bravo prof.di disegno al liceo a Milano
alquanti anni fa.

"Mauro Gamberini" <maurogsc...@RIMUOVEREaliceposta.it> ha scritto nel
messaggio news:u6NP5uI...@TK2MSFTNGP04.phx.gbl...

[Mauro Gamberini]

> Ho già provato e visto che ottengo le tre date.
>

Grazie a te per il riscontro.

[Maurizio Borrelli]

"info1" wrote in message
news:u9Dj4OKb...@TK2MSFTNGP04.phx.gbl:

> Non so come ringraziare M. Borrelli per le varie indicazioni e M.
> Gamberini per addirittura la soluzione.
> Grazie anche perché avete capito che ero in difficoltà.
> Buona continuazione.

[...]

Anche a te, info1, e grazie per il riscontro.

--