Fun Times with Colleagues
Buff
Registered Posts: 275 Dedicated contributor π¦
Have you ever wanted to annoy someone who you sit with, maybe just as a prank or a long term thing (which is very easy to do and to reverse)?
If they use Excel and leave a workbook open, right click on the sheetname on the tab at the bottom of the screen and click "View Code" (or alternatively you can hit Alt+F11
Copy the following code and paste it in the screen that comes up and then press the cross to close that screen.
Whenever a cell is selected anywhere on the sheet, it is filled with a random colour :-)
To remove it, view the code and delete it and press the cross to close the screen again.
It'll have them scratching their heads for ages!
If they use Excel and leave a workbook open, right click on the sheetname on the tab at the bottom of the screen and click "View Code" (or alternatively you can hit Alt+F11
Copy the following code and paste it in the screen that comes up and then press the cross to close that screen.
Private Sub Worksheet_SelectionChange(ByVal Target As Range) Selection.Interior.ColorIndex = Int((56 * Rnd) + 1) End Sub
Whenever a cell is selected anywhere on the sheet, it is filled with a random colour :-)
To remove it, view the code and delete it and press the cross to close the screen again.
It'll have them scratching their heads for ages!
0
Comments
-
Have you ever wanted to annoy someone who you sit with, maybe just as a prank or a long term thing (which is very easy to do and to reverse)?
If they use Excel and leave a workbook open, right click on the sheetname on the tab at the bottom of the screen and click "View Code" (or alternatively you can hit Alt+F11
Copy the following code and paste it in the screen that comes up and then press the cross to close that screen.Private Sub Worksheet_SelectionChange(ByVal Target As Range) Selection.Interior.ColorIndex = Int((56 * Rnd) + 1) End Sub
Whenever a cell is selected anywhere on the sheet, it is filled with a random colour :-)
To remove it, view the code and delete it and press the cross to close the screen again.
It'll have them scratching their heads for ages!
I like that!0 -
Nice one! :001_smile:0
-
Are you snowed in, Gem? Looks pretty bad in Exeter according to BBC News! Or did it all somehow miss you?0
-
All melted now, but it wasn't that bad to begin with. It's so unfair the last time we had snow it was crap as well, we had it bad for one day then it melted0
-
I was fed up of it by the 3rd day last time. Took two weeks for the last bit of ice to melt in my carpark. If it hadn't have rained, I think it would still be there!:laugh:
It's laughable how we grind to a halt though - we could cope 40 years ago, we've had incredible advances in technology since then and yet we're going backwards!0 -
And before I get shouted at, I apologise for hijacking this thread!:blushing:0
-
Euro-gazillions
blank0 -
I love snow, we didn't even have time to build a snowman last time!
Yeah sorry J... *does the angelic look*0 -
8!0
-
Jamie I look like a knob now :ohmy:0
-
only NOW?....
** heheh ** xx0 -
Buff , that is evil..................but will it work on lotus ?0
-
Mark,
I don't think it will - VBA is a Microsoft built in editing language, which I am not sure if Lotus can use - if it can I'm not sure how to get to the code input screen (I guess you could try the same hot key Alt+F11 and see if that brings it up)
I only really work with excel VBA so I couldn't comment on if it would work / delete data etc on other platforms.0 -
ok thanks anyway.have to go to my old works and put it on there comp....now that would be so funny !!0
Categories
- All Categories
- 1.2K Books to buy and sell
- 2.3K General discussion
- 12.5K For AAT students
- 325 NEW! Qualifications 2022
- 160 General Qualifications 2022 discussion
- 11 AAT Level 2 Certificate in Accounting
- 56 AAT Level 3 Diploma in Accounting
- 95 AAT Level 4 Diploma in Professional Accounting
- 8.8K For accounting professionals
- 23 coronavirus (Covid-19)
- 273 VAT
- 92 Software
- 274 Tax
- 138 Bookkeeping
- 7.2K General accounting discussion
- 202 AAT member discussion
- 3.8K For everyone
- 38 AAT news and announcements
- 345 Feedback for AAT
- 2.8K Chat and off-topic discussion
- 582 Job postings
- 16 Who can benefit from AAT?
- 36 Where can AAT take me?
- 42 Getting started with AAT
- 26 Finding an AAT training provider
- 48 Distance learning and other ways to study AAT
- 25 Apprenticeships
- 66 AAT membership