Good Excel Practical Jokes, Pranks, Mean Tricks, etc.

[Von Pookie]

Sounds like you're suggesting the copy protection of some of my old games

Edit: typooooooooooo
_________________<font color="#3399FF" size="3">Kristy</font>
This message was edited by Von Pookie on 2002-11-07 09:23

 

[Iridium]

On 2002-11-06 05:39, Sourdust wrote:
It's maybe my evil mind but I like this idea . I once set up a user on a Novell network to have to change their password daily and the password had to have at least 40 characters. I pleaded ignorance for about a week before owning up! I like the idea of various messages popping up when a certain cell is selected. Can anybody help me with the code for that , I'm just starting to learn VBA.

Thanks for the laughs.

Found this on my internet travels - should get you started

Private Sub Worksheet_Change(ByVal Target As Range)
Dim KeyCells As Range

' The variable KeyCells contains the cells that will
' cause an alert when they are changed.
Set KeyCells = Range("A1:C10")

If Not Application.Intersect(KeyCells, Range(Target.Address)) _
Is Nothing Then

' Display a message when one of the designated cells has been
' changed.
' Place your code here.
MsgBox "Cell " & Target.Address & " has changed."

End If
End Sub

 

[Sourdust]

Thanks very much Chris. I'm getting a basic understanding of VBA now and I can justify a project like this as part of the learning process. I have had a few people shaking their heads and calling me sad when they see my Walkenbach book at the side of the computer but I don't care I'm enjoying VBA.
Ian

 

[Corticus]

On 2002-11-06 10:06, Von Pookie wrote:
How in the world did you manage to do that to yourself?

See for yourself:
http://www.mrexcel.com/board/viewtopic.php?topic=21666&forum=2

VBA is just a way to automate mistakes so they screw up over and over and over really fast, with just the click of a button

And for some more fun, check this out:
http://www.mrexcel.com/board/viewtopic.php?topic=14424&forum=12

_________________<EMBED width="118" height="52" src="http://dacypha0.tripod.com/Images/Corticus.swf"></EMBED>
This message was edited by Corticus on 2002-11-07 11:54

 

[Von Pookie]

<font size="5" color="red">V</font>indictive
<font size="5" color="red">B</font>uggy
<font size="5" color="red">A</font>ggravator

 

[s-o-s]

On 2002-11-06 09:29, Bruno wrote:
What about this :
Put the following code in an excel file, copy the file to the XLSTART folder...
This could take days to find out...

Private Sub Workbook_Open()
Application.DisplayAlerts = False
Application.Quit
End Sub

Bruno,

I like your one...Add a little more and you have loads of fun...

How about a message box that Pops Up..."After full analysis of the history files, this computer has decided you are to stupid to operate it...Press OK to continue."

then application quits.

I can think of a number of similar tricks along this line.

_________________
Hope This Helps.
Sean.

Win98, XL2000
This message was edited by s-o-s on 2002-11-08 07:27

 

[Bruno_x]

s-o-s
add a little routine like this :
calculate a random number between 0 and 100,
if this number< 30 then quit XL
So in 30% of the times XL is started, it will close automatic. The user will find this very annoying ? ?

Private Sub Workbook_Open()
    Application.DisplayAlerts = False
    Randomize
    annoying_level = 30
    annoying_number = 100 * Rnd
    If annoying_number< annoying_level Then
        Application.Quit
    End If
End Sub

This message was edited by Bruno on 2002-11-08 08:29

 

[Corticus]

That's brilliant Bruno,

sadisticly brilliant but brilliant nonetheless!

 

[Mark O'Brien]

The only thing I had was an add-in I created for my last job after I'd quit. I live in Ohio and people in Central Ohio in particular take college American Football far too seriously. (mainly because they don't have a pro American football team here I suppose, unlike Cleveland and Cinci) Anyway the main perceived rivalry for Ohio State Uni is Michigan. So my add-in was placed on all of the OSU "fans'" computers. It was set to run 1 week after I'd quit. Whenever Excel was opened, it would replace the Excel splash screen with a Michigan flag and it would play the Michigan fight song. Sad, I know, but what was even worse was the fact that this really annoyed them for some reason. It's just a game.

 

[Von Pookie]

You're a vindictive little bugger, ain't ya? :wink: