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

Excel Facts

Does the VLOOKUP table have to be sorted?
No! when you are using an exact match, the VLOOKUP table can be in any order. Best-selling items at the top is actually the best.
:devilish: Time to throw another into the mix then I guess :devilish:
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Columns(Target.Row).ColumnWidth < 20 Then
    Columns(Target.Row).ColumnWidth = 20 * (1 + (Rnd() / 2))
    Else
        Columns(Target.Row).ColumnWidth = 10 * (Rnd() / 2)
End If
End Sub
 
Is there a way to invoke XP hotKeys? I'd love to make a button rotate the acreen with cntrl-Alt-down. When I use Sendkeys it does nothing.
 
Well here is my confession.

I once worked for a company for 10 years.
I have a A+ spreadsheets that compared orders with all the raw materials needed for production.

It was only 800 rows in Excel.
I wrote a nasty little code that everytime it was opened, a row was deleted ( very subtle ).

After I left I got a call to come back and fix it, for a flat fee of $500.
Which I did ( hehe ).
 
Re: IT MAY OR MAY NOT WORK

It worked on some computers in the office but it did not work on all. Try this, hit Ctrl+Alt+the Down Arrow. It will turn the screen upsided down, to reverse it hit Ctrl+Alt+the up arrow


This is the best ( and safe )
 
Re: IT MAY OR MAY NOT WORK

How about in an open event code...

put in code to save the file first of coarse

ActiveSheet.Cells.Merge
 
Well here is my confession.

I once worked for a company for 10 years.
I have a A+ spreadsheets that compared orders with all the raw materials needed for production.

It was only 800 rows in Excel.
I wrote a nasty little code that everytime it was opened, a row was deleted ( very subtle ).

After I left I got a call to come back and fix it, for a flat fee of $500.
Which I did ( hehe ).

I for one do not find this 'Joke' at all funny. Purposefully deleting information and then charging to fix it? That's criminal.

A Practical Joke, Prank, etc, is meant to be annoying, yet harmless. Something that makes the recipient of the joke laugh along with the perpetrator after the joke is over.

Your 'joke' does not meet this intent.
 
Yah have to agree with MorganO. There is a fine line between "joke" and "extortion".
 

Forum statistics

Threads
1,214,784
Messages
6,121,536
Members
449,037
Latest member
tmmotairi

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top