« 「デスクトップアイコンの表示」を切り替える。 | トップページ | IEのタブを少なくとも1つは残す。 »

2011年9月12日 (月)

エクスプローラのフォルダ詳細表示の1行全体選択をオフる。

詳細表示で開いているフォルダに対して1行全体選択をオフります。

FULLROWSELECT off.vbs

Const FWF_FULLROWSELECT = &H00200000
For Each ie In CreateObject("Shell.Application").Windows()
  If InStr(LCase(ie.FullName),"explorer.exe")=0 Then
  ElseIf InStr(TypeName(ie.Document),"IShellFolderViewDual")=0 Then
  ElseIf CLng(ie.Document.CurrentViewMode)=4 And CLng(ie.Document.FolderFlags) And FWF_FULLROWSELECT Then '4-詳細
    ie.Document.FolderFlags=CLng(ie.Document.FolderFlags) And Not FWF_FULLROWSELECT
  End If
Next

ただし、Vistaまで。

« 「デスクトップアイコンの表示」を切り替える。 | トップページ | IEのタブを少なくとも1つは残す。 »