Predmet:Re: Ili možda isto sa VBA
PreuzmiIzvorni kôd (Visual Basic):Function ZatvoripFolder(ImeFoldera As String)
Dim winHwnd As Long
Dim RetVal As Long
winHwnd = FindWindow(vbNullString, ImeFoldera)
If winHwnd <> 0 Then
PostMessage winHwnd, WM_CLOSE, 0&, 0&
Else
MsgBox "NIJE OTVOREN"
End If
End Function
Poziva se:
ZatvoripFolder ("Sys1 (D:)")
Znaci pozivas ga po imenu koje se nalazi na prozoru kada ga podignes.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.