Prikazi cijelu temu 14.02.2014 13:41
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Lokacija:Tuzla


Predmet:Re: Ili možda isto sa VBA
PreuzmiIzvorni kôd (Visual Basic):
  1. Function ZatvoripFolder(ImeFoldera As String)
  2. Dim winHwnd As Long
  3. Dim RetVal As Long
  4. winHwnd = FindWindow(vbNullString, ImeFoldera)
  5. If winHwnd <> 0 Then
  6. PostMessage winHwnd, WM_CLOSE, 0&, 0&
  7. Else
  8. MsgBox "NIJE OTVOREN"
  9. End If
  10. 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.