-
Mar 18th, 2009, 03:12 PM
#1
Thread Starter
New Member
[RESOLVED] "Number is formated as text ..." problem in Excel 07
when data imported in to worksheet from my form, there is a little green arrow on top left corner of the active cell, when the mouse pointer goes on top of little black arrow on left side of active cell, it gives this message " The number in this cell is formated as text or preceded by an apostrophe". Because of this my formulas are not functioning properly. is there any solution for it?
-
Mar 18th, 2009, 04:00 PM
#2
Re: "Number is formated as text ..." problem in Excel 07
The notification message is sometime annoyed but it does not cause the problem. You can turn of the Error checking.
Check the cells format before "import" data, they may be formatted as Text, otherwise your data was formatted as Text before you "import" it.
-
Mar 18th, 2009, 04:56 PM
#3
Junior Member
Re: "Number is formated as text ..." problem in Excel 07
Where are you importing your data from?
-
Mar 18th, 2009, 05:43 PM
#4
Thread Starter
New Member
Re: "Number is formated as text ..." problem in Excel 07
I do calculation on my form and the result goes to my worksheet. Cells are already formated as currency.
I don't have total amount on my worksheet because the imported data is recognized as text. Is it wise to turn error checking? if yes, how do I do it?
Last edited by Gilmard1199; Mar 18th, 2009 at 05:48 PM.
-
Mar 18th, 2009, 07:20 PM
#5
Junior Member
Re: "Number is formated as text ..." problem in Excel 07
Can you post the code for your user form?
-
Mar 18th, 2009, 09:10 PM
#6
Thread Starter
New Member
Re: "Number is formated as text ..." problem in Excel 07
Here is the code:
If OptCash Then
CashLabel.Caption = Val(TextBox1.Text)
'sending data to worksheet
Z = 4 + Weekday(Now, vbMonday)
ThisWorkbook.Sheets("Sheet1").Range("B" & Z) = CashLabel
TextBox1.Text = ""
TextBox1.SetFocus
OptCash = True
Exit Sub
End If
-
Mar 18th, 2009, 10:55 PM
#7
Junior Member
Re: "Number is formated as text ..." problem in Excel 07
See if this works
Code:
If OptCash Then
CashLabel.Caption = Val(TextBox1.Text)
'sending data to worksheet
Z = 4 + Weekday(Now, vbMonday)
ThisWorkbook.Sheets("Sheet1").Range("B" & Z) = Val(CashLabel)
TextBox1.Text = ""
TextBox1.SetFocus
OptCash = True
Exit Sub
End If
-
Mar 19th, 2009, 01:59 PM
#8
Thread Starter
New Member
Re: "Number is formated as text ..." problem in Excel 07
Thank you so much. It works. you're a life saver my friend.
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|