vbaのフォルダを選択する方法

[Adahm]

全てに

Windowsフォルダを選択する方法を探していますので、ファイルを保存する場所として使用できます。
このコードを見つけました。

オブジェクトとしてシェルアプリを dim

デフォルトフォルダ内のファイルブラウザウィンドウを作成する
シェルアプリセット = createobject("shell.application")。 ツイート
Browseforfolder(0, "フォルダを選択", 0, openat)
・・・

しかし、それは私に簡単なナビゲーションを許さない幾分控えめなウィンドウを開きます。

同じことを行うためにアクセスするために使用する他の方法もあります。

 ・・・
fd = application.filedialog(msofiledialogfolderpicker) の設定
・・・

しかし、発明者は動作しません。

autodesk チャットを調べてみると、Windows セレクションウィンドウを使用してファイルを開いたり保存したりできる発明家で、フォルダを選択しないということが分かります。
誰が知っているか?

 

[Adahm]

誰かが役立つべきならば、私は発明家が非常に単純な「4」に置き換えられる「msofiledialogfolderpicker」を認識していないことがわかりました。
その後、単純化されたコードは次のようになります。

サブ mostracartellaselezionata()
dim セレクトフォルダ

アプリケーションで。 ファイル名(4)
.ショー
選択したフォルダ = .selecteditems(1)
終わり と

' estra l'indirizzo della karella selezionata
msgbox (セレクター)
エンドサブ

 

[Zac69]

私はプロジェクトファイルをカスタマイズしたいフォルダに保存して、作業エリア内、サブフォルダが頻繁に使用しました。 この時点で、保存または開いたときに、ウィンドウに表示されるリンクを選択するだけで、これらのフォルダに直接アクセスすることができます。
点 4 以下 "プロジェクトのためのオプションの設定":

https://help.autodeskcom/view/invntor/2019/ita/?guid=guid-34126f60-3093-4144-8aa5-809b4d35dca1

 

[Andrea Scarnecchia]

こんにちは、私はあなたが必要とするものかどうかわからないが、私は現在の操作中に時間から時間までのフォルダを選択するために、このブロックを使用します(vb.net):

dim ダイアログ = 新しいフォルダーブラザーダイアログ {
.selectedpath ============ percorso di デフォルト,
.shownewfolderbutton = true,
.description = "scegli la cartella dove salvare i file."
お問い合わせ
ダイアログresult.ok = ダイアログ.showdialog() の場合、
ofilepath = ダイアログ.selectedpath & "\"
その他
messagebox.show("procedura annullata.", "info")
フィードバック
端 もし

 

[Adahm]

こんにちは、私はあなたが必要とするものかどうかわからないが、私は現在の操作中に時間から時間までのフォルダを選択するために、このブロックを使用します(vb.net):

dim ダイアログ = 新しいフォルダーブラザーダイアログ {
.selectedpath ============ percorso di デフォルト,
.shownewfolderbutton = true,
.description = "scegli la cartella dove salvare i file."
お問い合わせ
ダイアログresult.ok = ダイアログ.showdialog() の場合、
ofilepath = ダイアログ.selectedpath & "\"
その他
messagebox.show("procedura annullata.", "info")
フィードバック
端 もし

お問い合わせ
しかし、これはvb.netにあります。
vba とコードは若干異なります。