Going In and Out – Computer Prank
- Filed under: Computer Pranks
- Date: Jan 8,2008
I created this prank from and idea I had in a previous prank. The old prank simply zoomed in every time you pressed a certain key ( How evil…. really it sucked). So I thought I’d add a couple changes and turn that simple zoom into a drunken night of code. This new adaptation of the old prank is very simple. Any where between 1 and 2 seconds this Timer is called. In the timer section it selects a random number from 500 to 1 (this is the zoom percentage). So when ever you open a word document it will zoom in any where from 500 to 1, every 1 to 2 seconds (With me ? Dont worry all you need to do is copy and paste). So, how do you do it…? Step 1: Open Microsoft Word
Step 2: Press Alt F-11 (This will open the VBA Editor
Step 3: Select your Normal Template by double clicking “This Documentâ€
Step 4: Copy the code below into your normal template. Remember to re-type any “s, they dont always transfer over correctly in the copy/paste process.
Sub AutoExec()
counter = CStr(Int((2 - 1 + 1) * Rnd + 1))
Application.OnTime When:=Now + TimeValue("00:00:" + counter), _
Name:="Timer"
End Sub
Sub Timer()
On Error Resume Next
counter = CStr(Int((500 - 1 + 1) * Rnd + 1))
ActiveDocument.ActiveWindow.View.Zoom.Percentage = counter
Call AutoExec
End Sub
Step 5: SAVE
Step 6: Enjoy
If you did this correctly the next time you open a word document or click to create a new document this code will be called. Soon they will be swearing and saying how they got some awful virus. You will know better and it up to you if you fix it for them.
Student Loans




4 Responses for "Going In and Out – Computer Prank"
kool it works
that’s freaking amazing, this is the first one that’s worked w/o me having to manually start it
All of these pranks rely on being able to access the specfic computer. What if I want to do this to someones computer on a network where we just happen to share the word files?
Is there some way to embed code into an old word doc and then when it is opened teh prank code is executed?
This doesn’t see to work on my computer nothing happens when I push alt f11 and is this a text file or a batch or what I’m confused but love programming
Leave a comment