Here is a list of some of our VB functions that we are making available for
people to download and use.
The functions linked to by this page remain the copyrighted material of
Abbydale Systems LLC.. You are free to use the material but please honor the
copyrights.
As always you are free to use this code but the usual
disclaimers apply.
By downloading code from this page you agree to the terms of the disclaimer.
| Name |
Description | |
|---|---|---|
| This function will return a value that is the row number of the row with the most columns. The only parameter needed is the name of the sheet. An optional parameter identifies the number of the columns in that row. If several rows have the same number of columns, the first row with that number of columns is returned. | ||
|
| ||
| This function will return a value that is the column number of the column with the most rows. The only parameter needed is the name of the sheet. An optional parameter identifies the number of the rows in that column. If several columns have the same number of rows, the first column with that number of rows is returned. | ||
|
| ||
| This function returns the integer value of the tab color of the Active Sheet. The function is only one statement, so it could actually just be coded without it being a function. | ||
|
| ||
| This function will remove any excess spaces from a string passed to it as a parameter. | ||
|
| ||
| This function adds items to the Right Click menu. As shipped it adds 4 items:Show All, Hide All, "Reset/Show All" and "Delete Hidden. Link to information page click here. A demonstration video is available on YouTube™ by clicking here. Link to video demonstration click here. | ||
|
| ||
| This function will count the number of worksheets in the workbook. It can count hidden, visible, very hidden or all sheets. | ||
|
| ||
| This Function can be called to test to see if a Table exists on a worksheet. If the table name exists then TableExtant will be set to TRUE If the table name does not exist then TableExtant will be set to FALSE | ||
|
| ||
| This VBA function will return the best contrast color for the text based on the ColorIndex number passed to it. This function is required for IndexSheetNames(4) | ||
|
| ||
| This function will return the day of the week for a particular day by utilizing Zeller's congruence to calculate it. The function can be called with by passing a date as a String. There is also an optional DateFormat with can specify the format of the date being passed. This can be either "DDMMYYYY" (this is the default) or "MMDDYYYY". The output from this funstion is a string contain the name of the day of the week. | ||
|
| ||
| This function will return the 'nth' word in a string. The if the string is blank, or if number of words is less than number requested then a blank string is returned. Example: Word("The quick brown fox",3) would return "brown" | ||
|
| ||
Last modified :
Sunday 10th May 2026
Abbydale Systems LLC Lic. 802696149. All rights reserved.