Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Visual Basic 6 - Percorso univoco
Forum - Visual Basic 6 - Percorso univoco

Avatar
airPaolo (Normal User)
Newbie


Messaggi: 4
Iscritto: 11/03/2010

Segnala al moderatore
Postato alle 23:11
Giovedì, 11/03/2010
Ho fatto una macro di Excel che alla fine deve salvare un file sul desktop, ma inserendo il percorso
Codice sorgente - presumibilmente Visual Basic 6

  1. "C:\Documents and Settings\Baloo\Desktop"


logicamente funziona solo sul mio computer, su altre macchine non può trovare il percorso specificato.
Come si indica il percorso in modo univoco alle cartelle speciali come Desktop, Documenti o Programmi?
Grazie tante, ciao

PM Quote
Avatar
GrG (Member)
Guru^2


Messaggi: 3430
Iscritto: 21/08/2007

Segnala al moderatore
Postato alle 8:31
Venerdì, 12/03/2010
usa Environ$("USERNAME") per ricavarti il nome utente...

PM Quote
Avatar
airPaolo (Normal User)
Newbie


Messaggi: 4
Iscritto: 11/03/2010

Segnala al moderatore
Postato alle 8:28
Lunedì, 15/03/2010
No, no riesco....
il codice che funziona sul mio pc è:

ChDir "C:\Documents and Settings\Paolo\Desktop"
    ActiveWorkbook.SaveAs Filename:= _
        "C:\Documents and Settings\Paolo\Desktop\File ordinato.xls", FileFormat:= _
        xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
        , CreateBackup:=False

na non sono riuscito a capire come sostituire il percorso col tuo codice:
in pratica vorrei sostituire Paolo con un percorso che funzioni su tutti i pc.
Ahimé ...non ci arrivo!!!

PM Quote
Avatar
GrG (Member)
Guru^2


Messaggi: 3430
Iscritto: 21/08/2007

Segnala al moderatore
Postato alle 16:28
Lunedì, 15/03/2010
ChDir "C:\Documents and Settings\" & Environ$("USERNAME") & "\Desktop"

PM Quote
Avatar
airPaolo (Normal User)
Newbie


Messaggi: 4
Iscritto: 11/03/2010

Segnala al moderatore
Postato alle 21:14
Lunedì, 15/03/2010
Che scemo!
Fantastico! Funziona a meraviglia!!! Grazie, sono in debito...
Ciao, Paolo

PM Quote
Avatar
nessuno (Normal User)
Guru^2


Messaggi: 6404
Iscritto: 03/01/2010

Segnala al moderatore
Postato alle 1:00
Martedì, 16/03/2010
Oppure

ChDir Environ$("USERPROFILE") & "\Desktop"


Ricorda che nessuno è obbligato a risponderti e che nessuno è perfetto ...
---
Il grande studioso italiano Bruno de Finetti ( uno dei padri fondatori del moderno Calcolo delle probabilità ) chiamava il gioco del Lotto Tassa sulla stupidità.
PM Quote