HOME > 即効テクニック > Excel VBA > ファイル操作関連のテクニック > スタートメニューの[検索]コマンドを実行する

即効テクニック

ファイル操作関連のテクニック

スタートメニューの[検索]コマンドを実行する

(Excel 2000/2002/2003)
●概要●
Shell32のFindFilesメソッドを利用して、スタートメニューの[検索]コマンドを実行することができます。

 構文 オブジェクト.FindFiles
 設定項目    内容
 オブジェクト  Shellオブジェクト

次のサンプルは、スタートメニューの[検索]コマンドを実行します。なお、このサンプルを実行するには、「Microsoft Shell Controls And Automation」への参照設定が必要です。


●サンプル●

Sub Sample()
    Dim TempShell As Shell32.Shell
    
    Set TempShell = New Shell32.Shell
    TempShell.FindFiles
    Set TempShell = Nothing
End Sub