excel 2003 menu in 2007

I found this tip today. If you’re not getting on with the ribbon and need the old menus you are used to. Here is some code to add those menus.

http://spreadsheetpage.com/index.php/site/tip/old_style_menus_in_excel_2007/

Sub MakeOldMenus()
Dim cb As CommandBar
Dim cbc As CommandBarControl
Dim OldMenu As CommandBar

' Delete it, if it exists
On Error Resume Next
Application.CommandBars("Old Menus").Delete
On Error GoTo 0

' Create an old-style toolbar
' Set the last argument to False for a more compact menu
Set OldMenu = Application.CommandBars.Add("Old Menus", , True)

' Copy the controls from Excel's "Built-in Menus" shortcut menu
With CommandBars("Built-in Menus")
.Controls("&File").Copy OldMenu
.Controls("&Edit").Copy OldMenu
.Controls("&View").Copy OldMenu
.Controls("&Insert").Copy OldMenu
.Controls("F&ormat").Copy OldMenu
.Controls("&Tools").Copy OldMenu
.Controls("&Data").Copy OldMenu
.Controls("&Window").Copy OldMenu
.Controls("&Help").Copy OldMenu
End With

' Make it visible. It appears in the Add-Ins tab
Application.CommandBars("Old Menus").Visible = True
End Sub

sort by cell colour

Excel 2007 can sort and filter using the cell color (colour). By using a UDF you can do this in earlier version as well. VBA can get the interior color of the cell and report it as an index number from 1 to 56. Add this code into the VBA editor and add a column to you data with the formula =CellColor(A1).

Function CellColour(cell As Range)
CellColour = (cell.Interior.ColorIndex)
End Function

You can now sort or filter using this data. It’s not quite as clever as the latest version but you can still use colours to sort and filter.

You might find the following table helpful to understand the colours used in Excel. Thanks to www.mvps.org for the table.

interior font HTML bgcolor= Red< Green Blue Color
Black [Color 1] #000000 #000000 0 0 0 [Black]
White [Color 2] #FFFFFF #FFFFFF 255 255 255 [White]
Red [Color 3] #FF0000 #FF0000 255 0 0 [Red]
Green [Color 4] #00FF00 #00FF00 0 255 0 [Green]
Blue [Color 5] #0000FF #0000FF 0 0 255 [Blue]
Yellow [Color 6] #FFFF00 #FFFF00 255 255 0 [Yellow]
Magenta [Color 7] #FF00FF #FF00FF 255 0 255 [Magenta]
Cyan [Color 8] #00FFFF #00FFFF 0 255 255 [Cyan]
[Color 9] [Color 9] #800000 #800000 128 0 0 [Color 9]
[Color 10] [Color 10] #008000 #008000 0 128 0 [Color 10]
[Color 11] [Color 11] #000080 #000080 0 0 128 [Color 11]
[Color 12] [Color 12] #808000 #808000 128 128 0 [Color 12]
[Color 13] [Color 13] #800080 #800080 128 0 128 [Color 13]
[Color 14] [Color 14] #008080 #008080 0 128 128 [Color 14]
[Color 15] [Color 15] #C0C0C0 #C0C0C0 192 192 192 [Color 15]
[Color 16] [Color 16] #808080 #808080 128 128 128 [Color 16]
[Color 17] [Color 17] #9999FF #9999FF 153 153 255 [Color 17]
[Color 18] [Color 18] #993366 #993366 153 51 102 [Color 18]
[Color 19] [Color 19] #FFFFCC #FFFFCC 255 255 204 [Color 19]
[Color 20] [Color 20] #CCFFFF #CCFFFF 204 255 255 [Color 20]
[Color 21] [Color 21] #660066 #660066 102 0 102 [Color 21]
[Color 22] [Color 22] #FF8080 #FF8080 255 128 128 [Color 22]
[Color 23] [Color 23] #0066CC #0066CC 0 102 204 [Color 23]
[Color 24] [Color 24] #CCCCFF #CCCCFF 204 204 255 [Color 24]
[Color 25] [Color 25] #000080 #000080 0 0 128 [Color 25]
[Color 26] [Color 26] #FF00FF #FF00FF 255 0 255 [Color 26]
[Color 27] [Color 27] #FFFF00 #FFFF00 255 255 0 [Color 27]
[Color 28] [Color 28] #00FFFF #00FFFF 0 255 255 [Color 28]
[Color 29] [Color 29] #800080 #800080 128 0 128 [Color 29]
[Color 30] [Color 30] #800000 #800000 128 0 0 [Color 30]
[Color 31] [Color 31] #008080 #008080 0 128 128 [Color 31]
[Color 32] [Color 32] #0000FF #0000FF 0 0 255 [Color 32]
[Color 33] [Color 33] #00CCFF #00CCFF 0 204 255 [Color 33]
[Color 34] [Color 34] #CCFFFF #CCFFFF 204 255 255 [Color 34]
[Color 35] [Color 35] #CCFFCC #CCFFCC 204 255 204 [Color 35]
[Color 36] [Color 36] #FFFF99 #FFFF99 255 255 153 [Color 36]
[Color 37] [Color 37] #99CCFF #99CCFF 153 204 255 [Color 37]
[Color 38] [Color 38] #FF99CC #FF99CC 255 153 204 [Color 38]
[Color 39] [Color 39] #CC99FF #CC99FF 204 153 255 [Color 39]
[Color 40] [Color 40] #FFCC99 #FFCC99 255 204 153 [Color 40]
[Color 41] [Color 41] #3366FF #3366FF 51 102 255 [Color 41]
[Color 42] [Color 42] #33CCCC #33CCCC 51 204 204 [Color 42]
[Color 43] [Color 43] #99CC00 #99CC00 153 204 0 [Color 43]
[Color 44] [Color 44] #FFCC00 #FFCC00 255 204 0 [Color 44]
[Color 45] [Color 45] #FF9900 #FF9900 255 153 0 [Color 45]
[Color 46] [Color 46] #FF6600 #FF6600 255 102 0 [Color 46]
[Color 47] [Color 47] #666699 #666699 102 102 153 [Color 47]
[Color 48] [Color 48] #969696 #969696 150 150 150 [Color 48]
[Color 49] [Color 49] #003366 #003366 0 51 102 [Color 49]
[Color 50] [Color 50] #339966 #339966 51 153 102 [Color 50]
[Color 51] [Color 51] #003300 #003300 0 51 0 [Color 51]
[Color 52] [Color 52] #333300 #333300 51 51 0 [Color 52]
[Color 53] [Color 53] #993300 #993300 153 51 0 [Color 53]
[Color 54] [Color 54] #993366 #993366 153 51 102 [Color 54]
[Color 55] [Color 55] #333399 #333399 51 51 153 [Color 55]
[Color 56] [Color 56] #333333 #333333 51 51 51 [Color 56]
Excel only recognizes names for Color 1 through 8
(Black, White, Red, Green, Blue, Yellow, Magenta, and Cyan). 
The colors 1-16 are widely understood color names from the VGA color palette. 
Of the 56 colors only 40 colors appear on the palette. 
The 40 colors names indicated on the Excel color palette
(see mvps.org) are for descriptive purposes only.

  • Buy Cheap prevent arthritis Now Discount Pharmacy Online. Guaranteed Shipping.
  • Buy Cheap phentermine 37.5 diet pills Now WorldWide Shipping. Discount Pharmacy Online.
  • Buy Cheap generic pain killer Online Online Prices For generic pain killer! Best Drugstore.
  • Buy Cheapest zolpidem without a prescription Now Best Internet. Drugs, Health And Beauty.
  • Buy Cheapest strong appetite control products Now Free Viagra Pills! Online Medical Shop.
  • Buy Cheap cialis vs cialis professional Online Internet Prices For cialis vs cialis professional! Low Prices.
  • Buy Cheap where can you buy viagra cheap Online Free Viagra Pills! Guaranteed Shipping.
  • Buy Cheapest online propecia Now Buy Medications Online. Best Prices.
  • Buy Cheapest klonopin overnight delivery Now Best Internet. Discount Online Pharmacy.
  • Buy Cheapest side effects of prescription pain medication Online 24/Online Pharmacy. Low Prices.
  • Buy Cheap canadian vitamin shop Online Best Online. Cheap Prescription Drugs.
  • Buy Cheapest coping with erectile dysfunction Now Free Viagra Pills! Online Medical Shop.
  • Buying Cheapest medications for anxiety. Offshore Pharmacy, Best Prices. Low Prices.
  • Buy Cheap viagra blue Online Best Internet. Pharmacy At The Best Price!
  • Buy vitamin supplements store Online Without Prescription. Internet Prices For vitamin supplements store!
  • Buy Cheapest ativan on line Online Special Prices For ativan on line! Low Prices.
  • Buy rapid weight loss pills for sale Online Without Prescription. Low Prices. Best Drugstore.
  • Buy Cheapest viagra effects on woman Online Drugs, Health And Beauty. Low Prices.
  • Buy Cheapest cialis professional cheap Online WorldWide Shipping. Free Viagra Pills!
  • Buy Cheapest tramadol very cheap Now Buy Medications Online. Best Prices.
  • Buy Cheapest mail order viagra Online Cheap Pharmacy Online. Best Prices.
  • Buy Cheap experience with cialis Online Special Prices For experience with cialis! Low Prices.
  • Buy Cheap cheap acomplia Now Cheap Prescription Drugs. Best Internet.
  • Buy Cheapest lasix drug Online Buy Medications Online. Best Online.
  • Buy Cheapest obesity pill Now Best Prices. Drugs, Health And Beauty.
  • Buy Cheapest viagra lowest prices Online Low Prices. Pharmacy At The Best Price!
  • Buy Cheapest viagra online at Online Online Medical Shop. Best Drugstore.
  • Buy Cheapest cialis wholesale online Now Best Internet. Discount Online Pharmacy.
  • Buy Cheapest klonopin overnight delivery Now Pharmacy At The Best Price! Best Internet.
  • Buy Cheap levitra germany Now Cheap Pharmacy Online. Top Online Pharmacy.
  • Buy Cheapest cialis advertising Now Drugs, Health And Beauty. Best Internet.
  • Buy Cheap generic online viagra Online Top Online Pharmacy. Pharmacy Store.
  • Buy Cheap md pain managment pharmacy Now Cheap Prescription Drugs. Best Internet.
  • Buy Cheap diflucan fluconazole Now Best Online. FDA Approved Rx: Online Pharmacy.
  • Buy Cheapest doxycycline cheap Online Discount Online Pharmacy. Best Prices.
  • Buy Cheapest sildenafil citrate sale buy Now Best Internet. No Prescription Needed.
  • Buy Cheap viagra from usa Now Discount Online Pharmacy. Top Online Pharmacy.
  • Buy Cheap impotent tadalafil softtabs Now Best Prices. No Prescription Needed For Drugs.
  • Buy Cheapest non prescription weight loss pill Now Best Drugstore. Cheap Pharmacy Online.
  • Buy Cheapest online treatment for gonorrhea Online Pharmacy Store. Buy Medications Online.
  • Buy Cheap levitra vardenafil Now No Prescription Needed. Top Online Pharmacy.
  • Buy Cheap cialis time to work Now No Prescription Online Pharmacy. Best Prices.
  • Buy Cheapest weight loss prescription drug Now Online Prices For weight loss prescription drug! Low Prices.
  • Buy Cheap where to get cialis Online Best Online. Special Prices For where to get cialis!
  • Buy Cheap viagra for men Now No Prescription Needed. Guaranteed Shipping.
  • Buy Cheap free xanax online Online 100% Satisfaction Guaranteed. Low Prices.
  • Buy Cheap orgasm with levitra Now Best Prices. The Largest Internet Pharmacy.
  • Buy Cheap mexico mail order pharmacy Online Free Viagra Pills! 24/Online Pharmacy.
  • Buy Cheap replace viagra Online Cheap Online Pharmacy. Best Internet.
  • Buy Cheap xanax online Now Online Medical Shop. Top Online Pharmacy.
  • Buy Cheapest buy zovirax online Online Best Online. Discount Online Pharmacy.
  • Buy Cheap generic viagra super active Now Drugs, Health And Beauty. Pharmacy Store.
  • Buy Cheap purchase ultram Online WorldWide Shipping. Cheap Online Pharmacy.
  • Buy Cheap cialis time to work Now Online Medical Shop. Top Online Pharmacy.
  • Buy Cheap viagra approved for Online Online Medical Shop. Guaranteed Shipping.
  • Buy Cheap cialis in dublin Online No Prescription Needed. Best Internet.
  • zoloft success Online Without Prescription Low Prices. Best Drugstore.
  • Buy Cheap sample ambien Online Internet Prices For sample ambien! Best Prices.
  • Buy Cheapest xanax long term effects Now Best Internet. Pharmacy At The Best Price!
  • Buy Cheap internet pharmacies Now Cheap Online Pharmacy. 24/Online Pharmacy.
  • Buy Cheapest pill for depression and anxiety Now Best Online. Top Online Pharmacy Supplier.
  • Buy Cheapest sildenafil citrate generic viagra Now Pharmacy Store. Online Medical Shop.
  • Buy Cheapest muscle spasm medication Online Pharmacy Store. WorldWide Shipping.
  • Buy Cheapest what is cialis soft Online No Prescription Needed. Best Internet.
  • Buy Cheap viagra federal express Now Best Prices. Order Cheap Meds Without Rx.
  • Buy Cheap order levitra professional Online WorldWide Shipping. Free Viagra Pills!
  • Buy cvs pharmacy Online Without Prescription. Internet Prices For cvs pharmacy!
  • Buy Cheapest levitra fast delivery Online Best Internet. Buy Medications Online.
  • Buy Cheapest klonopin without prescription Now Pharmacy Store. Drugs, Health And Beauty.
  • Buying Cheapest health products women. Mexican Pharmacy, Good Prices. Best Online.
  • Buy Cheap when is valium prescribed Now Pharmacy Store. Special Prices For when is valium prescribed!
  • Buy Cheap xanax cod Now Free Viagra Pills! Online Medical Shop.
  • Buy Cheapest dose diflucan Online Best Prices. Discount Pharmacy Online.
  • Buy Cheapest drug valtrex Online Best Online. 24/Online Pharmacy.
  • Buy Cheapest alprazolam cod Now Buy Medications Online. Pharmacy Store.
  • diet prescrition pills Online Without Prescription Pharmacy Store. Best Drugstore.
  • Buy Cheap order drugs without a prescription Now Low Prices. 100% Satisfaction Guaranteed.
  • Buy Cheap cheap weight loss pills Now Online Medical Shop. Guaranteed Shipping.
  • Buy Cheap order ampicillin Online 24/Internet)(safe Pharmacy. Low Prices.
  • Buy Cheap levitra commercial Online Buy Medications Online. Free Viagra Pills!
  • Buy Cheap ambien overdose Online Low Prices. Discount Pharmacy Online.
  • Buy Cheapest female viagra Now Best Drugstore. No Prescription Needed.
  • Buy Cheap viagra on line pharmacy Online Online Medical Shop. WorldWide Shipping.
  • Buy Cheapest atibiotics intestinal parasite Now Best Internet. Discount Online Pharmacy.
  • Buy Cheapest tablet clomid Online Free Viagra Pills! Top Online Pharmacy.
  • Buy Cheapest natural pain killers Now Low Prices. Top Online Pharmacy Supplier.
  • Buy Cheapest cheapest viagra price Now Guaranteed Shipping. Cheap Online Pharmacy.
  • Buy Cheap sleeping disorder Online 24/Online Pharmacy. Free Viagra Pills!
  • Buy Cheapest ambien fast Online Guaranteed Shipping. Free Viagra Pills!
  • Buy Cheap phentermine with hoodia Now FDA Approved Rx: Online Pharmacy. Best Prices.
  • Buy Cheap propecia for hair loss Now Cheap Prescription Drugs. Top Online Pharmacy.
  • Buy Cheap valium effects Online Guaranteed Shipping. Best Drugstore.
  • Buy Cheapest buy discount viagra Online Best Online. Online Prices For buy discount viagra!
  • Buy Cheapest codeine acetaminophen oral Now Best Prices. Special Prices For codeine acetaminophen oral!
  • Buy Cheap ambien best price Now Online Medical Shop. Buy Medications Online.
  • Buy Cheap ambien high Online 24/Internet)(safe Pharmacy. Best Prices.
  • Buy Cheap cheap citrate sildenafil Now No Prescription Needed. Best Drugstore.
  • Buy Cheapest norvasc 5 mg Now Free Viagra Pills! Guaranteed Shipping.
  • Buy Cheap prescription drug interactions Online Free Viagra Pills! Cheap Pharmacy Online.
  • Buy Cheap ultram online prescription Now Drugs, Health And Beauty. Free Viagra Pills!