Thursday, January 29, 2009

Sub ImBored ()

Dim Bored As Worksheet
Dim Work As Worksheet
Set Oinfo = Sheets("Entertainment")


If work <> Oinfo Then

Msg Box "I'm Bored"

Elf If work = Oinfo Then

Msg Box "It's a miracle"

End If

End Sub


I've spent the past week looking at crap like this... My eyes are starting to pop out of my head!!! I bet you can imagine!!


ps... This macro should work. It should pop up a msg box that says: "I'm bored!" LOL.

2 comments:

Alicia said...

Umm... nothing's popping up and saying "I'm bored"...

Lacey said...

I was completely lost :) at least you have a break from being bored at work!