More Pointless Code

Joined
Jul 29, 2008
Messages
737
Reaction score
1
This is one thing that I love about Excel VBA - it's pretty easy to remember lol. The code below will minimize and maximize the Excel windows in a constant loop. Its useless but it's really good to annoy someone lol ;)

Code:
 Private Sub Workbook_Open() 
Do
With ActiveWindow
.WindowState = xlMinimized
.WindowState = xlMaximized
.WindowState = xlMinimized
End With
Loop Until i = i + 1
End Sub

Have fun and enjoy :p hehe.
 
Back
Top