※当サイトの一部記事には広告を含みます。
うさねこ気まぐれPG開発室

Excel VBA ファイル選択画面を表示してファイル選択する サンプル:ディスクトップフォルダ

ファイル選択画面を表示してファイル選択する

うさこちゃん
うさこちゃん

このサンプルはファイル選択画面を表示します。
※選択したファイルPathを取得できます。

サンプルコード

うさこちゃん
うさこちゃん

サンプルコードではエクセルファイルのみを表示します。

Application.GetOpenFilename(“Microsoft Excelブック,*.xls?”)

    Dim StrOpenFileName As String
    Dim ObjWShell As Object
    Dim StrDesktop As String

 
    'オブジェクト生成
    Set ObjWShell = CreateObject("WScript.Shell")
    StrDesktop = ObjWShell.SpecialFolders("Desktop")
    Set ObjWShell = Nothing 
    
    ChDir StrDesktop
   
  'ファイル選択画面表示

    StrOpenFileName = Application.GetOpenFilename("Microsoft Excelブック,*.xls?")
    If StrOpenFileName <> "False" Then
        MsgBox StrOpenFileName '取得ファイルの表示
    End If

広告
Logicool G ロジクール G ゲーミングキーボード 有線 G213r パームレスト 日本語配列 独自のMech-domeスイッチ キーボード 静音 LIGHTSYNC RGB 国内正規品 【 ファイナルファンタジーXIV 推奨周辺機器 】
Logicool G ロジクール G ゲーミングキーボード 有線 G213r パームレスト 日本語配列 独自のMech-domeスイッチ キーボード 静音 LIGHTSYNC RGB 国内正規品 【 ファイナルファンタジーXIV 推奨周辺機器 】
【LIGHTSYNC 1680万色 RGB】光るパターンはキーごとにカスタマイズでき、プレイ環境やゲームタイトルに合わせて自由に操れる。
【耐水性と耐久性】実際の使用環境を考慮してメンブレン&キーフレームの構造設計を採用し、耐水性を実現(60mlの液体でテスト済み)。結果として、毎日の実際のゲーミングに対応できるキーボードが生まれました。
【便利なメディアコントロール】テンキー上部には専用のメディアコントロールボタンと音量調節ボタンが設置され、ワンタッチで直観操作できます。
【ゲーミンググレードのMech-Domeキー】G213rには、メカニカル キーボードに匹敵するほどの上質な押し心地と総合力を発揮するロジクールG Mech-Domeキーを搭載。Mech-Domeキーはフルハイトで、4mmの移動距離、50gの作動力、および静かな操作音を実現します。
【一体型のパームレストと調節式のフィート】2段階の角度調節によって、キーボードを自分に合う傾きに設定できます。一体型のパームレストが不快感や疲労を軽減するため、何ラウンドプレイしても快適性が持続します。
接続方式: 有線
最新の価格・在庫状況はAmazonでご確認ください。

ファイル選択画面(実行イメージ)

免責事項

本記事のサンプルプログラムは、学習・参考用として掲載しているもので、動作や結果を保証するものではありません。 利用する場合は、ご自身の環境に合わせて確認しながらお使いください。万が一トラブルや損害が発生した場合でも、当サイトでは責任を負いかねます。


※本文中に記載の会社名・製品名・サービス名・ゲームタイトル名等は、各社の商標または登録商標であり、権利は各社に帰属します。

※サンプルはテストを行っていますが、すべての環境での動作を保証するものではありません。ご利用は自己責任でお願いいたします。

※本記事の仕様・価格・対応状況等は執筆時点で確認できた情報をもとに掲載しています。最新の情報はメーカー公式サイトをご確認ください。

※当サイトでは一部の記事において、アイキャッチ画像にAI生成を使用しています。

※Amazonのアソシエイトとして、うさねこ散歩は適格販売により収入を得ています。