スキルアップ・問題解決なら、モーグにおまかせ！

●概要●
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