Aprire cartella da vba non funziona

di il
18 risposte

Aprire cartella da vba non funziona

Ciao a tutti,

ho un Command Button che apre una cartella ed ha sempre funzionato. Ma da oggi apre una cartella diversa rispetto a quella che in realtà gli é indicata.

Non ho modificato niente al codice.
pth = Application.CurrentProject.Path & "\Cartella\"
MsgBox (pth)
VBA.Shell "EXPLORER " & pth, vbMaximizedFocus
Ha sempre funzionato aprendo la cartella corretta.
Ho messo anche una msgbox per verificare che il percorso sia caorretto ed in effetti lo é.
Ma la cartella che viene aperta é Documenti, non capisco il motivo

Qualche idea?

18 Risposte

  • Re: Aprire cartella da vba non funziona

    Application.FollowHyperlink pathFile
    edit: la gestione errori è ben accetta
  • Re: Aprire cartella da vba non funziona

    Mancano gli apici...!
    Prova così
    
    VBA.Shell ("EXPLORER " & """ & Application.CurrentProject.Path & "\Cartella\" & """, vbMaximizedFocus)
  • Re: Aprire cartella da vba non funziona

    muttley005 ha scritto:


    Application.FollowHyperlink pathFile
    edit: la gestione errori è ben accetta
    Temo non vada con le Cartelle, nemmeno con la gestione errori
  • Re: Aprire cartella da vba non funziona

    @Alex ha scritto:


    muttley005 ha scritto:


    Application.FollowHyperlink pathFile
    edit: la gestione errori è ben accetta
    Temo non vada con le Cartelle, nemmeno con la gestione errori
    questa volta ... insisto
    l'ho appena provato e da me funziona
    Application.FollowHyperlink pathFile, , True, False
    (W10pro 64b con Access 2013 32b non so se incida)
  • Re: Aprire cartella da vba non funziona

    Dettagliamo l'anomalia...
    In finestra immediata non funziona:
    ?Application.FollowHyperlink Application.CurrentProject.Path
    Da VBA si effettivamente, non so perchè ma mi ha ingannato la prova in GTRL+G.
  • Re: Aprire cartella da vba non funziona

    @Alex ha scritto:


    Dettagliamo l'anomalia...
    In finestra immediata non funziona:
    ?Application.FollowHyperlink Application.CurrentProject.Path
    Da VBA si effettivamente, non so perchè ma mi ha ingannato la prova in GTRL+G.
    questo lo ignoro
  • Re: Aprire cartella da vba non funziona

    @Alex ha scritto:


    In finestra immediata non funziona:
    ?Application.FollowHyperlink Application.CurrentProject.Path

    muttley005 ha scritto:


    questo lo ignoro
    C'è un punto interrogativo di troppo all'inizio. Non voglio infierire.
  • Re: Aprire cartella da vba non funziona

    Philcattivocarattere ha scritto:


    C'è un punto interrogativo di troppo all'inizio. Non voglio infierire.
    Assolutamente NO, leggi BENE ho detto in Finestra immediata..., e non voglio infierire.
  • Re: Aprire cartella da vba non funziona

    @Alex ha scritto:


    Assolutamente NO, leggi BENE ho detto in Finestra immediata..., e non voglio infierire.
    Avevo letto giusto e le prove sono state fatte dalla finestra immediata.
    Il punto interrogativo non è la "stampa" nella finestra immediata di un risultato di qualcosa?
    A cosa serve davanti ad Application.FollowHyperlink che nel caso specifico in cui si va ad aprire una cartella? Ma penso in generale per FollowHyperlink.
  • Re: Aprire cartella da vba non funziona

    Phil ... dalla finestra immediata se non metti il [?]
    come fai a provare lwnchiamate a metodi Nativi come Followhyperlink o Costruiti(come le Function)...?

    Serve il [?]

    Siccome mi pare osservazione strana quanto banale forse fraintendo il senso...
  • Re: Aprire cartella da vba non funziona

    Ciao.

    Hai fatto la prova mettendo il nome esteso dell'indirizzo, invece che recuperarlo in automatico dall'indirizzo del progetto?
  • Re: Aprire cartella da vba non funziona

    Raga non vi arrabbiate il codice che ho postato qui funziona, ma nel codice che effettivamente utilizzo c'era una virgola dopo "cartella, che non so da dove sia saltata fuori
  • Re: Aprire cartella da vba non funziona

    fabionik2004 ha scritto:


    Raga non vi arrabbiate il codice che ho postato qui funziona, ma nel codice che effettivamente utilizzo c'era una virgola dopo "cartella, che non so da dove sia saltata fuori

    Non ti preoccupare. Di solito errori del genere fanno perdere settimane di notte insonni.
    Tu hai perso solo un paio di giorni.
    Metti comunque una gestione degli errori.
    Molte volte evitano situazioni di questo genere.
    Quello che non capisco è il perchè non ti abbia dato percorso inesistente.
  • Re: Aprire cartella da vba non funziona

    @Alex ha scritto:


    Phil ... dalla finestra immediata se non metti il [?]
    come fai a provare lwnchiamate a metodi Nativi come Followhyperlink o Costruiti(come le Function)...?
    Non lo so @Alex, non so cosa risponderti se non a colpi di screenshot (su Windows10 Pro - Access2016 32bit) di un database vuoto.



    Una funzione Test1 creata ad arte


    Funzione Test2 sempre creata per l'occasione

    (segue un altro post perché troppe immagini non ci stanno)
Devi accedere o registrarti per scrivere nel forum
18 risposte