Hi Venkat,
You may use below macro to get this done:
*********************************************************************************************************
Sub Text_Type()
If ActiveCell.HasFormula = True Then
MsgBox "Formula"
ElseIf Application.WorksheetFunction.IsText(ActiveCell) Then
MsgBox "Text"
ElseIf Application.WorksheetFunction.IsNumber(ActiveCell) Then
MsgBox "Number"
Else
MsgBox " The Activecell is not Formula, text or number"
End If
End Sub
*********************************************************************************************************
Please let us know if any further assistance is required.
Best regards,
Ayush Jain
Group Manager
On Apr 14, 4:37 pm, rf1234 rf1234 <rfhyd1...@gmail.com> wrote:
> Hello Dear,
> You can simply read the range,Just use this attached excel Sheet.
>
> Hope it Will Help
> Happy To Help
> :)
>
>
>
> On Wed, Apr 14, 2010 at 4:56 PM, Venkatesan c <venkat1....@gmail.com> wrote:
> > Dear Group,
>
> > Need Assistance for folowing Problam
>
> > active cell value is Number(or)text(or)Formula Should show as a msg box by
> > using Macro
>
> > Thanks & Regards,
> > Venkatesan C
>
> > --
> > ----------------------------------------------------------------------------------
> > Some important links for excel users:
> > 1. Follow us on TWITTER for tips tricks and links :
> >http://twitter.com/exceldailytip
> > 2. Join our Facebook Group @
> >http://www.facebook.com/group.php?gid=287779555678
> > 3. Excel tutorials athttp://www.excel-macros.blogspot.com
> > 4. Learn VBA Macros athttp://www.quickvba.blogspot.com
> > 5. Excel Tips and Tricks athttp://exceldailytip.blogspot.com
>
> > To post to this group, send email to excel-macros@googlegroups.com
>
> > <><><><><><><><><><><><><><><><><><><><><><>
> > HELP US GROW !!
>
> > We reach over 6,800 subscribers worldwide and receive many nice notes about
> > the learning and support from the group.Let friends and co-workers know they
> > can subscribe to group at
> >http://groups.google.com/group/excel-macros/subscribe
>
> --
>
> Thanks Regards
> Shyam
> Software Engineer
> ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
> When one door of happiness closes, another opens;
> but often we look so long at the closed door that we do not see the
> one which has been opened for us.
> - Helen Keller
> ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
> Wenn eine Tür des Glücks schließt, öffnet sich ein weiteres,
> aber oft schauen wir so lange auf die geschlossene Tür,
> dass wir nicht sehen ein, die für uns geöffnet wurde. - Helen Keller
> ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
>
> Read Range and prompt with message box.xls
> 25KViewDownload
--
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our Facebook Group @ http://www.facebook.com/group.php?gid=287779555678
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
<><><><><><><><><><><><><><><><><><><><><><>
HELP US GROW !!
We reach over 6,800 subscribers worldwide and receive many nice notes about the
learning and support from the group.Let friends and co-workers know they can
subscribe to group at http://groups.google.com/group/excel-macros/subscribe
To unsubscribe, reply using "remove me" as the subject.
