Salary.com MySalary.comSalaryBenefitsAdviceSelf-TestsLearningCareerMoney
SEARCH Salaries Articles
Ľ View HR Edition
Personal Salary Report
My Benefits
My Performance
Self-Test
Enter search criteria
Help
Back to Salary
Back to Advice
Series Home
 
Check Please
Picture This
Cubicle Makeover
Corporate Workout
Common Scents
Chummy Boss
Achoo!
Conference Call
To the Letter
Remember Me
Kids at Work
Diamonds are for Later
Egg on Your Tie
Eager to Please
Hiding a Job Search
Business Casual
Ethnic Hair
This is for All of You
The F Word
Fabulous Resolutions
Stay Out of Jail
Greeting Celebs
Bad Attitude
Hello Again
Stutterer
Be Yours
Holiday Gifts
Opening Day Jitters
No Free Lunch
Instant Message
Opening Doors
Not in My Job Description
Interview Reflections
Overheard
Play Ball
Resume in Full View
Purge the Fridge
Remembering Names
Reverse Mentor
Shrugging Off Slackers
Take the Mint
Taste of Closure
 
  Ask Annette: Cubicle Makeover
Ask Annette
Don't think of them as four beige walls with beige furniture and a beige computer. Think of them as the canvas upon which to paint the oeuvre that is you. Give your cubicle a makeover, complete with photographs of your favorite fictional advice columnist.
Cubicle Makeover

Dear Annette,

Everything in my tiny cubicle is beige. Day after day I arrive at my desk and think, "Well, there go all my ideas." All this beige is making me blue. Annette, how can I bring my workspace to life?

Dingy in Dayton


Dear Dingy,
Three words: accessorize, accessorize, accessorize! Nothing stimulates creativity like nice things. You clearly need to give your cubicle a makeover.

Besides, everything talks. Every book and every accessory communicates something about your motivation, attitude, and of course, personal style. Why Blah when you can Blossom?

Give your office space the same loving touches as your boudoir. Is brightly hued wallpaper really out of the question? I don't think so. What about replacement bookshelves in sparkling beveled glass to make a lovely platform on which to display fond treasures - mine include inscribed photographs of famous people, gold records, Emmys and Tonys and Clios, and a pearly pink feather boa from my very first fashion show. Cat calendars and Employee of the Month awards work just as well.

Why waste precious real estate on a precarious collage of usernames and passwords? What if you taped instructions on using the phone under the phone? Try neon paperclips, not tacky notes, to indicate your favorite reference points in userís manuals and dictionaries. And tidy your desk before going home every night, to put each business day to rest.

Follow these simple steps and your workspace can become a creative masterpiece that says, "The person who works here is fabulous." Beige, a neutral tone, is a perfectly marvelous canvas on which to begin your oeuvre.

Stay fabulous,
Annette

<% strContentSiteID = "Salary" strAreaID = "SAL" dim strAccpPageName, strHeadPos, strAccpArea 'get full url and make it as lower case strAccpPageName = Lcase(Request.ServerVariables("SCRIPT_NAME")) 'response.write "
strAccpPageName: " & strAccpPageName & "*****
" 'get start position for area name strHeadPos = InStr(1, strAccpPageName, "/", 1) 'get strAccpArea = right(strAccpPageName, len(strAccpPageName) - strHeadPos) 'response.write "
strAccpPageName: " & strAccpArea & "=========
" 'get second position for area name strHeadPos = InStr(1, strAccpArea, "/", 1) 'remove strAccpArea = left(strAccpArea, strHeadPos - 1) 'response.write "
strAccpPageName: " & strAccpArea & "---------
" select case LCase(strAccpArea) case "aboutcompany" strArea = "ABU" case "advancedsearch" strArea = "ASE" case "advice" strArea = "ADV" case "benefits" strArea = "BEN" case "careers" strArea = "CAR" case "compensation" strArea = "COM" case "ecm" strArea = "ECM" case "enterprise" strArea = "" case "home" strArea = "HP" case "learning" strArea = "LRN" case "money" strArea = "MON" case "salary" strArea = "SAL" case "selftests" strArea = "SFT" case "sitesearch" strArea = "SSE" case "smallbiz" strArea = "" end select %>
Learn More to Earn More:
<% response.write "" & chr(13) response.write "
" %>
<% response.write "" & chr(13) response.write "
" %>
<% response.write "" & chr(13) response.write "
" %>
   Advertisement
<% strTargets = "/AAMSZ=160x600_RIGHT/SITE=SALARY/AREA=" & strArea & "/SJCOD=/SJCAT=/SMET=/SST=/SSAL=/PNAME=/POS=0" with Response 'make top ad call .Write "" end with %>
<% sub create_career_iframe_careerjournal (iCountJobTitle, _ strNarrowCode, _ strNarrowDesc, _ strJobCode, _ strJobTitle, _ strIframeWidth, _ strIframeHeight, _ strDisplayCharLen, _ strTableBorderWidth, _ strPageName) Response.Write "" Response.Write " " Response.Write " " Response.Write " " Response.Write "
" Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write "
" Response.Write " " Response.Write "
" Response.Write "
" end sub sub create_career_classfinder (strNarrowCode,strJobTitle) dim strAccpPageName, strHeadPos, strAccpArea 'get full url and make it as lower case strAccpPageName = Lcase(Request.ServerVariables("SCRIPT_NAME")) 'response.write "
strAccpPageName: " & strAccpPageName & "*****
" 'get start position for area name strHeadPos = InStr(1, strAccpPageName, "/", 1) 'get strAccpArea = right(strAccpPageName, len(strAccpPageName) - strHeadPos) 'response.write "
strAccpPageName: " & strAccpArea & "=========
" 'get second position for area name strHeadPos = InStr(1, strAccpArea, "/", 1) 'remove strAccpArea = left(strAccpArea, strHeadPos - 1) 'response.write "
strAccpPageName: " & strAccpArea & "---------
" select case LCase(strAccpArea) case "aboutcompany" strArea = "ABU" case "advancedsearch" strArea = "ASE" case "advice" strArea = "ADV" case "benefits" strArea = "BEN" case "careers" strArea = "CAR" case "compensation" strArea = "COM" case "ecm" strArea = "ECM" case "enterprise" strArea = "" case "home" strArea = "HP" case "learning" strArea = "LRN" case "money" strArea = "MON" case "salary" strArea = "SAL" case "selftests" strArea = "SFT" case "sitesearch" strArea = "SSE" case "smallbiz" strArea = "" end select dim intNumJobBoards dim arrayJobBanner redim arrayJobBanner(20) response.write "" & chr(13) response.write "
" response.write "" & chr(13) response.write "
" response.write "" & chr(13) response.write "
" intNumJobBanner = 3 Response.Write "" Response.Write "" Response.Write " " Response.Write "
" Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write "
Learn More to Earn More:
" Response.Write "" for i = 0 to intNumJobBanner -1 Response.Write " " Response.Write " " Response.Write " " 'Response.Write " " next Response.Write "
" & arrayJobBanner(i) & "
" Response.Write "
" Response.Write "
" end sub %>
 
To find related articles, we suggest these keywords for our "Search Articles" function.
Keywords: cube cubicle makeover feng shui decor decorate workplace office pod
Contact Us | Feedback | Glossary | Legal | Privacy | Site Map | Help
Copyright 2000-2005 © Salary.com, Inc.