Comments for Excel Digest

Comment on How to count cells that contain numbers or dates by admin

admin — Mon, 10 Nov 2008 18:35:01 +0000

Hi,

I can’t think of a direct way to do this, but I have created a small user-defined function for this purpose. Please give it a try:

Function IfHasDigit(Cell As Range)
For i = 1 To Len(Cell.Value)
If IsNumeric(Mid(Cell.Value, i, 1)) Then
IfHasDigit = True
Exit Function
End If
Next i
IfHasDigit = False
End Function

Check this link for help on how to create a user defined function:

http://www.exceldigest.com/myblog/2008/04/12/how-to-create-a-user-defined-function/

Comment on How to count cells that contain numbers or dates by rose

rose — Mon, 10 Nov 2008 11:58:19 +0000

hi…pls let me know how to find whether a particular cell contains digit….for Eg. rose1lotus…

Comment on About by admin

admin — Tue, 26 Aug 2008 04:34:34 +0000

Thanks for the info. I will give it a try.

Comment on About by Christi Lardy

Christi Lardy — Mon, 25 Aug 2008 18:51:56 +0000

As someone interested in Excel tips, I thought you might be interested in the latest release from Microsoft Office Labs. Chart Advisor for Microsoft Office Excel 2007 is a free download available at http://www.officelabs.com. Using an advanced rules engine, Chart Advisor determines which chart types are best-suited to represent the data. Users are then presented with a gallery of ranked charts; the top scoring charts are available for the user to preview, tweak, and insert into the Excel worksheet.

Thank you,
Christi

Comment on Function to decide whether a year is a leap year or not by admin

admin — Sun, 13 Jul 2008 10:48:16 +0000

Very neat.

Thanks.

Comment on Function to decide whether a year is a leap year or not by Roy Cox

Roy Cox — Sun, 13 Jul 2008 07:52:07 +0000

below is an alternative Function.

To determine if a specific year is a leap year, you just need to use the function DateSerial to construct a date of 29th of February in a specific year.

Then use the Month function to get the month number - if month number for 29th of February YYYY equals to 2 that means the specified year is a leap year. Otherwise (function Month returns 3) specified year is not a leap year.

Option Explicit

Function LeapYear(yr As Long) As Boolean
If (Month(DateSerial(yr, 2, 29)) = 2) Then
LeapYear = True
Else: LeapYear = False
End If
End Function