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
_________________
Kristy

[ 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/viewtop...=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/viewtop...14424&forum=12
_________________


[ This Message was edited by: Corticus on 2002-11-07 11:54 ]

[Von Pookie]

Vindictive
Buggy
Aggravator

[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.
http://[img]http://website.lineone.n....gif[/img]
Win98, XL2000

[ This Message was edited by: s-o-s on 2002-11-08 07:27 ]

[Bruno]

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

_________________

Bruno

[ 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?