Aprire cartella da vba non funziona

fabionik2004

il 15 lug 2022, 11:07

18 risposte

fabionik2004

Utente Attivo

Iscritto da: set, 2011

Messaggi:: 164

Aprire cartella da vba non funziona

15 lug 2022, 11:48

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

muttley005
Utente Attivo
Iscritto da
apr, 2015
Messaggi:
360
Re: Aprire cartella da vba non funziona
15 lug 2022, 12:27
```
Application.FollowHyperlink pathFile
```
edit: la gestione errori è ben accetta
@Alex
Super Famoso
Iscritto da
feb, 2012
Messaggi:
8741
Re: Aprire cartella da vba non funziona
15 lug 2022, 13:50
Mancano gli apici...!
Prova così
```
VBA.Shell ("EXPLORER " & """ & Application.CurrentProject.Path & "\Cartella\" & """, vbMaximizedFocus)
```
@Alex
Super Famoso
Iscritto da
feb, 2012
Messaggi:
8741
Re: Aprire cartella da vba non funziona
15 lug 2022, 13:51
muttley005 ha scritto:

Application.FollowHyperlink pathFile
edit: la gestione errori è ben accetta
Temo non vada con le Cartelle, nemmeno con la gestione errori
muttley005
Utente Attivo
Iscritto da
apr, 2015
Messaggi:
360
Re: Aprire cartella da vba non funziona
15 lug 2022, 13:58
@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)
@Alex
Super Famoso
Iscritto da
feb, 2012
Messaggi:
8741
Re: Aprire cartella da vba non funziona
15 lug 2022, 14:01
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.
muttley005
Utente Attivo
Iscritto da
apr, 2015
Messaggi:
360
Re: Aprire cartella da vba non funziona
15 lug 2022, 14:06
@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
P
Philcattivocarattere
Utente Famoso
Iscritto da
giu, 2014
Messaggi:
2250
Re: Aprire cartella da vba non funziona
15 lug 2022, 14:42
@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.
@Alex
Super Famoso
Iscritto da
feb, 2012
Messaggi:
8741
Re: Aprire cartella da vba non funziona
15 lug 2022, 15:21
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.
P
Philcattivocarattere
Utente Famoso
Iscritto da
giu, 2014
Messaggi:
2250
Re: Aprire cartella da vba non funziona
15 lug 2022, 16:51
@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.
@Alex
Super Famoso
Iscritto da
feb, 2012
Messaggi:
8741
Re: Aprire cartella da vba non funziona
15 lug 2022, 20:16
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...
fratac
Molto attivo
Iscritto da
lug, 2022
Messaggi:
707
Re: Aprire cartella da vba non funziona
15 lug 2022, 20:46
Ciao.

Hai fatto la prova mettendo il nome esteso dell'indirizzo, invece che recuperarlo in automatico dall'indirizzo del progetto?
F
fabionik2004
Utente Attivo
Iscritto da
set, 2011
Messaggi:
164
Re: Aprire cartella da vba non funziona
15 lug 2022, 22:44
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
fratac
Molto attivo
Iscritto da
lug, 2022
Messaggi:
707
Re: Aprire cartella da vba non funziona
15 lug 2022, 23:36
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.
P
Philcattivocarattere
Utente Famoso
Iscritto da
giu, 2014
Messaggi:
2250
Re: Aprire cartella da vba non funziona
16 lug 2022, 05:15
@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