Excel VBA Code

Event-Handlers

 * BeforeSave - Events triggered when saving workbook
 * DataTypeErrorTrap - Prevent non-numeric data from being entered in cell A1
 * Tock / StopClock - Start and stop cell A1 updated with time every second
 * ToggleBold - Toggle cell content as bold or not bold with a double-click

Formulas

 * DateExtensions - Add date extensions (1st, 2nd, 3rd, 4th, etc) to a cell containing today's date
 * DaysHoursMinutes - Show total time as days, hours, and minutes
 * LastFriday - Returns the last Friday of the month
 * Spherical - Convert star data from the Cartesian to the spherical coordinate system

Functions

 * DaysInMonth - Calendar function not built into Excel
 * ExtractElement - Returns the nth element of a string with a user-defined delimiter
 * ExtractNum - Extract the numeric portion of a text cell
 * Gather - Combine elements of a range into one cell with custom delimiter
 * GetCellColor - Return the color code of the background of a referenced cell
 * GetCellFontColor - Return the color code of the character font of a referenced cell
 * GetText - Strips numeric characters out of a cell
 * TopAvg - Compute average of highest n items in a range

Methods

 * Compare - Highlight data in set A that does not match set B
 * Convert2data - Convert a range of formulas to its present data
 * FindDupes - Highlight duplicate data
 * GrayEveryThirdRow - Apply gray background on every third row
 * IsFormula - Mark formula cells on a sheet

Procedures

 * BoldPos - Make only positive values in a selection bold
 * Excel2Word - Copy data from Excel to a Word Document
 * FillBlanks - Fill a column containing blanks with valid data
 * FillRnd - Fill 10 x 20 area with random numbers
 * MakeCheckerboard
 * MakeSample - Builds 20 x 10 spreadsheet with sample data
 * OpenSheetsInRange - Open all worksheets listed in column A
 * PopulateSheet - Fill a column with file names from a directory
 * Recenter - Put origin at next star on list and recalculate position data
 * SaveAsA1 - Save worksheet as filename given in cell A1
 * SendToNotepad -- Export a range to Notepad
 * '''SelectRows - Select rows using data in cells A1 and A2