Office関連

指定したファイルをエクスプローラーで開いて選択するVBAマクロ

マクロから直接ファイルを開くこともできるけどファイルの操作はユーザーに任せたい、そんなときによく使うのが下記マクロです。
この記事で解説されている、EXPLORER.EXEの「/select」スイッチを使うことでファイルを選択しています。

Option Explicit

Public Sub Sample()
  SelFileInExplorer "C:\wk\Test\あ い う え お\Test0 0 2.txt"
End Sub

Private Sub SelFileInExplorer(ByVal TargetFilePath As String)
'指定したファイルをエクスプローラーで開いて選択する
  With CreateObject("Scripting.FileSystemObject")
    If .FileExists(TargetFilePath) = True Then
      Shell "EXPLORER.EXE /select,""" & TargetFilePath & """", vbNormalFocus
    End If
  End With
End Sub

「VBAで頑張れば自動化処理を書けなくはないけれど、メチャクチャ複雑になってしまう!」なんてときは、上記のような簡単なマクロに留めておいて、マクロでは厳しい処理をユーザーにお願いする、というのも実務上では大切だと思います。

Visio Onlineで図の作成・編集ができるようになりました。前のページ

外部アプリケーションのコンボボックスの内容を取得するVBAマクロのサンプル次のページ

関連記事

  1. Office関連

    「最速攻略 Wordマクロ/VBA徹底入門」レビュー

    いつもお世話になっているExcel MVPの伊藤さんに9月20日発売予…

  2. アイコン一覧

    Office 365アイコン(imageMso)一覧(F)

    Office 365のデスクトップ版Officeアプリケーション(Wo…

  3. Office関連

    Computer Vision APIを使って画像から文字列を取得するVBAマクロ

    前々回の記事で、Fiddlerを使ってMicrosoft Cognit…

  4. アイコン一覧

    Office 365アイコン(imageMso)一覧(W)

    Office 365のデスクトップ版Officeアプリケーション(Wo…

  5. Office関連

    Excelを使わずにCSVからExcelファイルに変換するPowerShellコード

    CSVファイルからExcelファイルに変換する処理を自動化したい、Ex…

  6. アイコン一覧

    Office 2013 アイコン一覧(S)

    ・Office 2013 アイコン一覧 NUM…

コメント

  • コメント (0)

  • トラックバックは利用できません。

  1. この記事へのコメントはありません。

Time limit is exhausted. Please reload CAPTCHA.

※本ページはプロモーションが含まれています。

Translate

最近の記事

アーカイブ

PAGE TOP