Posts by wildkid

    Like this right?
    Thank you for your help.


    [SIZE=13px]

    Code
    [/SIZE][/FONT][/COLOR][/align][align=left][COLOR=#252C2F][FONT=Courier][SIZE=12px]Sub Hiddenwindows()[/SIZE][/FONT][/COLOR][/align]Dim Cnt as IntegerDim Win as windowCnt=0For each Win in WindowsIf Not Win.Visible then Cnt = Cnt +1Next WinMsgbox Cnt & " hidden windows"[align=left][COLOR=#252C2F][FONT=Courier][SIZE=12px]End Sub[/SIZE][/FONT][/COLOR][/align][align=left][COLOR=#252C2F][FONT=Helvetica][SIZE=13px]

    [/SIZE][/FONT][/COLOR]

    [/align]

    I need to count the number of windows that are hidden and display a pop-up window. My code keep giving me "0 hidden windows" no matter how many windows I've hidden, please help.


    Code
    Sub Hiddenwindows() [INDENT]Dim Cnt as Integer
    Dim Win as window
    Cnt=0
    For each Win in Windows
    If Not Win.Visible then Cnt = Cnt +1
    Next Win
    Msgbox Cnt & " hidden windows"[/INDENT]
     
    End Sub