' ** Minimizing QTP
Set qtp = CreateObject( "QuickTest.Application" )
qtp.WindowState = "Minimized"
Set qtp = Nothing