| Home |
| Search |
| Today's Posts |
|
#1
|
|||
|
|||
cell formatting
Greetings,
I have a table in my word document. One of the cells is numeric in format. I have set the number format to 0.00%. The problem is when I enter 8.7 it converts it to 870%. I want it to be 8.7%. How do I do this ? Do I have to create a macro that mathematically converts it ? thanks, -Darryl |
|
#2
|
|||
|
|||
|
Darryl was telling us:
Darryl nous racontait que : Greetings, I have a table in my word document. One of the cells is numeric in format. I have set the number format to 0.00%. The problem is when I enter 8.7 it converts it to 870%. I want it to be 8.7%. How do I do this ? Do I have to create a macro that mathematically converts it ? Enter .087 instead. -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#3
|
|||
|
|||
|
Yes, of course I already knew that.
Rather, I want to enter 8.7 and have the cell show 8.7%. how do I accomplish that ? "Jean-Guy Marcil" wrote in message ... Darryl was telling us: Darryl nous racontait que : Greetings, I have a table in my word document. One of the cells is numeric in format. I have set the number format to 0.00%. The problem is when I enter 8.7 it converts it to 870%. I want it to be 8.7%. How do I do this ? Do I have to create a macro that mathematically converts it ? Enter .087 instead. -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#4
|
|||
|
|||
|
In addition to adding a number format, you'll have to do some math to divide
by 100. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA Word MVP FAQ site: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. "Darryl" wrote in message ... Yes, of course I already knew that. Rather, I want to enter 8.7 and have the cell show 8.7%. how do I accomplish that ? "Jean-Guy Marcil" wrote in message ... Darryl was telling us: Darryl nous racontait que : Greetings, I have a table in my word document. One of the cells is numeric in format. I have set the number format to 0.00%. The problem is when I enter 8.7 it converts it to 870%. I want it to be 8.7%. How do I do this ? Do I have to create a macro that mathematically converts it ? Enter .087 instead. -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#5
|
|||
|
|||
|
OK then.
How can I create a macro to divide the cell contents (that I am exiting) by 100 ? thanks, Darryl "Suzanne S. Barnhill" wrote in message ... In addition to adding a number format, you'll have to do some math to divide by 100. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA Word MVP FAQ site: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. "Darryl" wrote in message ... Yes, of course I already knew that. Rather, I want to enter 8.7 and have the cell show 8.7%. how do I accomplish that ? "Jean-Guy Marcil" wrote in message ... Darryl was telling us: Darryl nous racontait que : Greetings, I have a table in my word document. One of the cells is numeric in format. I have set the number format to 0.00%. The problem is when I enter 8.7 it converts it to 870%. I want it to be 8.7%. How do I do this ? Do I have to create a macro that mathematically converts it ? Enter .087 instead. -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#6
|
|||
|
|||
|
No macro needed. The fact that you have already applied a number format
suggests that you're using a field. If it's an = field or (as sounds more likely) a calculated form field, all you have to do is add /100 to the calculation. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA Word MVP FAQ site: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. "Darryl" wrote in message ... OK then. How can I create a macro to divide the cell contents (that I am exiting) by 100 ? thanks, Darryl "Suzanne S. Barnhill" wrote in message ... In addition to adding a number format, you'll have to do some math to divide by 100. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA Word MVP FAQ site: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. "Darryl" wrote in message ... Yes, of course I already knew that. Rather, I want to enter 8.7 and have the cell show 8.7%. how do I accomplish that ? "Jean-Guy Marcil" wrote in message ... Darryl was telling us: Darryl nous racontait que : Greetings, I have a table in my word document. One of the cells is numeric in format. I have set the number format to 0.00%. The problem is when I enter 8.7 it converts it to 870%. I want it to be 8.7%. How do I do this ? Do I have to create a macro that mathematically converts it ? Enter .087 instead. -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#7
|
|||
|
|||
|
It's not calculated. The user types in the value. The formatting was to
get it a percentage. So, the user types in 8.7 and the formatting changes it to 8.7%. "Suzanne S. Barnhill" wrote in message ... No macro needed. The fact that you have already applied a number format suggests that you're using a field. If it's an = field or (as sounds more likely) a calculated form field, all you have to do is add /100 to the calculation. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA Word MVP FAQ site: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. "Darryl" wrote in message ... OK then. How can I create a macro to divide the cell contents (that I am exiting) by 100 ? thanks, Darryl "Suzanne S. Barnhill" wrote in message ... In addition to adding a number format, you'll have to do some math to divide by 100. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA Word MVP FAQ site: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. "Darryl" wrote in message ... Yes, of course I already knew that. Rather, I want to enter 8.7 and have the cell show 8.7%. how do I accomplish that ? "Jean-Guy Marcil" wrote in message ... Darryl was telling us: Darryl nous racontait que : Greetings, I have a table in my word document. One of the cells is numeric in format. I have set the number format to 0.00%. The problem is when I enter 8.7 it converts it to 870%. I want it to be 8.7%. How do I do this ? Do I have to create a macro that mathematically converts it ? Enter .087 instead. -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#8
|
|||
|
|||
|
Hi, Darryl. The whole confusion about percentage formatting is that 8.7 is
not 8.7%. 8.7 percent formatted as a decimal is really 0.087, so that needs to be entered, or you need to divide it by 100 so it works the way you want it to. This also confuses Excel users. ******************* ~Anne Troy www.OfficeArticles.com "Darryl" wrote in message ... It's not calculated. The user types in the value. The formatting was to get it a percentage. So, the user types in 8.7 and the formatting changes it to 8.7%. "Suzanne S. Barnhill" wrote in message ... No macro needed. The fact that you have already applied a number format suggests that you're using a field. If it's an = field or (as sounds more likely) a calculated form field, all you have to do is add /100 to the calculation. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA Word MVP FAQ site: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. "Darryl" wrote in message ... OK then. How can I create a macro to divide the cell contents (that I am exiting) by 100 ? thanks, Darryl "Suzanne S. Barnhill" wrote in message ... In addition to adding a number format, you'll have to do some math to divide by 100. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA Word MVP FAQ site: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. "Darryl" wrote in message ... Yes, of course I already knew that. Rather, I want to enter 8.7 and have the cell show 8.7%. how do I accomplish that ? "Jean-Guy Marcil" wrote in message ... Darryl was telling us: Darryl nous racontait que : Greetings, I have a table in my word document. One of the cells is numeric in format. I have set the number format to 0.00%. The problem is when I enter 8.7 it converts it to 870%. I want it to be 8.7%. How do I do this ? Do I have to create a macro that mathematically converts it ? Enter .087 instead. -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#9
|
|||
|
|||
|
Thanks Anne.
I understand that 8.7 is not 8.7%. But as the users say, I need it this way. I don't know how to make it such that when the user leaves the field in the table, that the resulting value (870%) is divided by 100 so it shows 8.7% (the goal). If someone could explain how I can do the division I would be greatly appreciative. -Darryl. "Anne Troy" wrote in message news:1c097$42d4327b$97c5108d$4574@allthenewsgroups .com... Hi, Darryl. The whole confusion about percentage formatting is that 8.7 is not 8.7%. 8.7 percent formatted as a decimal is really 0.087, so that needs to be entered, or you need to divide it by 100 so it works the way you want it to. This also confuses Excel users. ******************* ~Anne Troy www.OfficeArticles.com "Darryl" wrote in message ... It's not calculated. The user types in the value. The formatting was to get it a percentage. So, the user types in 8.7 and the formatting changes it to 8.7%. "Suzanne S. Barnhill" wrote in message ... No macro needed. The fact that you have already applied a number format suggests that you're using a field. If it's an = field or (as sounds more likely) a calculated form field, all you have to do is add /100 to the calculation. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA Word MVP FAQ site: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. "Darryl" wrote in message ... OK then. How can I create a macro to divide the cell contents (that I am exiting) by 100 ? thanks, Darryl "Suzanne S. Barnhill" wrote in message ... In addition to adding a number format, you'll have to do some math to divide by 100. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA Word MVP FAQ site: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. "Darryl" wrote in message ... Yes, of course I already knew that. Rather, I want to enter 8.7 and have the cell show 8.7%. how do I accomplish that ? "Jean-Guy Marcil" wrote in message ... Darryl was telling us: Darryl nous racontait que : Greetings, I have a table in my word document. One of the cells is numeric in format. I have set the number format to 0.00%. The problem is when I enter 8.7 it converts it to 870%. I want it to be 8.7%. How do I do this ? Do I have to create a macro that mathematically converts it ? Enter .087 instead. -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#10
|
|||
|
|||
|
Sorry, Darryl. Hope I didn't sound condescending--didn't mean to.
 The easiest way to accomplish this would be to put the % outside the form field and just format the cell as 0.00. Otherwise, methinks you'll need a macro.  ******************* ~Anne Troy www.OfficeArticles.com "Darryl" wrote in message ... Thanks Anne. I understand that 8.7 is not 8.7%. But as the users say, I need it this way. I don't know how to make it such that when the user leaves the field in the table, that the resulting value (870%) is divided by 100 so it shows 8.7% (the goal). If someone could explain how I can do the division I would be greatly appreciative. -Darryl. "Anne Troy" wrote in message news:1c097$42d4327b$97c5108d$4574@allthenewsgroups .com... Hi, Darryl. The whole confusion about percentage formatting is that 8.7 is not 8.7%. 8.7 percent formatted as a decimal is really 0.087, so that needs to be entered, or you need to divide it by 100 so it works the way you want it to. This also confuses Excel users. ******************* ~Anne Troy www.OfficeArticles.com "Darryl" wrote in message ... It's not calculated. The user types in the value. The formatting was to get it a percentage. So, the user types in 8.7 and the formatting changes it to 8.7%. "Suzanne S. Barnhill" wrote in message ... No macro needed. The fact that you have already applied a number format suggests that you're using a field. If it's an = field or (as sounds more likely) a calculated form field, all you have to do is add /100 to the calculation. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA Word MVP FAQ site: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. "Darryl" wrote in message ... OK then. How can I create a macro to divide the cell contents (that I am exiting) by 100 ? thanks, Darryl "Suzanne S. Barnhill" wrote in message ... In addition to adding a number format, you'll have to do some math to divide by 100. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA Word MVP FAQ site: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. "Darryl" wrote in message ... Yes, of course I already knew that. Rather, I want to enter 8.7 and have the cell show 8.7%. how do I accomplish that ? "Jean-Guy Marcil" wrote in message ... Darryl was telling us: Darryl nous racontait que : Greetings, I have a table in my word document. One of the cells is numeric in format. I have set the number format to 0.00%. The problem is when I enter 8.7 it converts it to 870%. I want it to be 8.7%. How do I do this ? Do I have to create a macro that mathematically converts it ? Enter .087 instead. -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#11
|
|||
|
|||
|
Okay, I see what's happening, and yes, I suppose it will require a macro
unless there's some way to perform calculations on data a user enters. Unfortunately, I have little experience with forms and no expertise with macros, so someone else will have to help. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA Word MVP FAQ site: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. "Darryl" wrote in message ... It's not calculated. The user types in the value. The formatting was to get it a percentage. So, the user types in 8.7 and the formatting changes it to 8.7%. "Suzanne S. Barnhill" wrote in message ... No macro needed. The fact that you have already applied a number format suggests that you're using a field. If it's an = field or (as sounds more likely) a calculated form field, all you have to do is add /100 to the calculation. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA Word MVP FAQ site: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. "Darryl" wrote in message ... OK then. How can I create a macro to divide the cell contents (that I am exiting) by 100 ? thanks, Darryl "Suzanne S. Barnhill" wrote in message ... In addition to adding a number format, you'll have to do some math to divide by 100. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA Word MVP FAQ site: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. "Darryl" wrote in message ... Yes, of course I already knew that. Rather, I want to enter 8.7 and have the cell show 8.7%. how do I accomplish that ? "Jean-Guy Marcil" wrote in message ... Darryl was telling us: Darryl nous racontait que : Greetings, I have a table in my word document. One of the cells is numeric in format. I have set the number format to 0.00%. The problem is when I enter 8.7 it converts it to 870%. I want it to be 8.7%. How do I do this ? Do I have to create a macro that mathematically converts it ? Enter .087 instead. -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#12
|
|||
|
|||
|
Darryl was telling us:
Darryl nous racontait que : Thanks Anne. I understand that 8.7 is not 8.7%. But as the users say, I need it this way. I don't know how to make it such that when the user leaves the field in the table, that the resulting value (870%) is divided by 100 so it shows 8.7% (the goal). Here is a little macro that does that: '_______________________________________ Sub Divide100() Dim myValue As Single With ActiveDocument.Bookmarks("Value1").Range myValue = CSng(Left(.Text, Len(.Text) - 1)) myValue = myValue / 10000 .FormFields(1).Result = CStr(myValue) End With End Sub '_______________________________________ Note that I have to divide by 10 000 because when I do the calculation, the number entered by the user a=has already been multiplied by a 100 because of the number format... The formfield name is Value1. Either change the name in the macro, or change it in the form itself. -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#13
|
|||
|
|||
|
Well,
I changed Value1 to my field name. I have the field set as number, format 0.00%, macro on exit is divide100. When I run it, I get a type mismatch error. Looking at the macro, I'm not sure why ? Form field is type number. Is the macro assuming the field is text ? "Jean-Guy Marcil" wrote in message ... Darryl was telling us: Darryl nous racontait que : Thanks Anne. I understand that 8.7 is not 8.7%. But as the users say, I need it this way. I don't know how to make it such that when the user leaves the field in the table, that the resulting value (870%) is divided by 100 so it shows 8.7% (the goal). Here is a little macro that does that: '_______________________________________ Sub Divide100() Dim myValue As Single With ActiveDocument.Bookmarks("Value1").Range myValue = CSng(Left(.Text, Len(.Text) - 1)) myValue = myValue / 10000 .FormFields(1).Result = CStr(myValue) End With End Sub '_______________________________________ Note that I have to divide by 10 000 because when I do the calculation, the number entered by the user a=has already been multiplied by a 100 because of the number format... The formfield name is Value1. Either change the name in the macro, or change it in the form itself. -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#14
|
|||
|
|||
|
Well, maybe isn't not a type mis-match. When I try to enter data in the
field and then leave it, nothing happens (ie, 1.2 gets set to 120%). When I debug the macro it gives an error saying that the macro tries to access a protected area of the document. If I unprotect the document, (ie, not a form), then nothing happens (as described above). "Darryl" wrote in message ... Well, I changed Value1 to my field name. I have the field set as number, format 0.00%, macro on exit is divide100. When I run it, I get a type mismatch error. Looking at the macro, I'm not sure why ? Form field is type number. Is the macro assuming the field is text ? "Jean-Guy Marcil" wrote in message ... Darryl was telling us: Darryl nous racontait que : Thanks Anne. I understand that 8.7 is not 8.7%. But as the users say, I need it this way. I don't know how to make it such that when the user leaves the field in the table, that the resulting value (870%) is divided by 100 so it shows 8.7% (the goal). Here is a little macro that does that: '_______________________________________ Sub Divide100() Dim myValue As Single With ActiveDocument.Bookmarks("Value1").Range myValue = CSng(Left(.Text, Len(.Text) - 1)) myValue = myValue / 10000 .FormFields(1).Result = CStr(myValue) End With End Sub '_______________________________________ Note that I have to divide by 10 000 because when I do the calculation, the number entered by the user a=has already been multiplied by a 100 because of the number format... The formfield name is Value1. Either change the name in the macro, or change it in the form itself. -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#15
|
|||
|
|||
|
Darryl was telling us:
Darryl nous racontait que : Well, I changed Value1 to my field name. I have the field set as number, format 0.00%, macro on exit is divide100. When I run it, I get a type mismatch error. Looking at the macro, I'm not sure why ? Form field is type number. Is the macro assuming the field is text ? I created a protected form with a text field set to number with the 0.00% format, then I protected the form. My macro works. I just checked again, and it worked. So we are doing things differently. Describe how you created the field (and gave it a name) where the user enters the value and the document itself (how is it protected, what does it contain). -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#16
|
|||
|
|||
|
Darryl was telling us:
Darryl nous racontait que : Well, maybe isn't not a type mis-match. When I try to enter data in the field and then leave it, nothing happens (ie, 1.2 gets set to 120%). When I debug the macro it gives an error saying that the macro tries to access a protected area of the document. If I OK, what Word Version? unprotect the document, (ie, not a form), then nothing happens (as described above). That is normal because OnExit macros do not work when the document is not protected for forms. -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#17
|
|||
|
|||
|
I can send you the exact document as I might not answer properly. I am
using Word 2000 BTW, the document is a simple, one page form. "Jean-Guy Marcil" wrote in message ... Darryl was telling us: Darryl nous racontait que : Well, I changed Value1 to my field name. I have the field set as number, format 0.00%, macro on exit is divide100. When I run it, I get a type mismatch error. Looking at the macro, I'm not sure why ? Form field is type number. Is the macro assuming the field is text ? I created a protected form with a text field set to number with the 0.00% format, then I protected the form. My macro works. I just checked again, and it worked. So we are doing things differently. Describe how you created the field (and gave it a name) where the user enters the value and the document itself (how is it protected, what does it contain). -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#18
|
|||
|
|||
|
I created a brand new document with a table (inserted from the forms toolbar) that had three columns. first, I put the insertion point into column 1 row 1. Then selected text form field from the forms toolbar. I then right clicked, chose properties and set the a field type to number. Text format to 0.00%. Selected divide100 as the exit macro. Under the field settings group box I set the bookmark to value1. Clicked OK. Clicked form protect button on forms toolbar. Then to test, put insertion point in column1 row 1 and typed 1.23 then pressed the tab key. Immediately the type mis-match error 13 pops up. press debug on the error dialog box and the debugger says the offending is: myValue = CSng(Left(.Text, Len(.Text) - 1)) what am I doing wrong ? thanks, Darryl "Jean-Guy Marcil" wrote in message ... Darryl was telling us: Darryl nous racontait que : Well, I changed Value1 to my field name. I have the field set as number, format 0.00%, macro on exit is divide100. When I run it, I get a type mismatch error. Looking at the macro, I'm not sure why ? Form field is type number. Is the macro assuming the field is text ? I created a protected form with a text field set to number with the 0.00% format, then I protected the form. My macro works. I just checked again, and it worked. So we are doing things differently. Describe how you created the field (and gave it a name) where the user enters the value and the document itself (how is it protected, what does it contain). -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#19
|
|||
|
|||
|
Leave the formfield set as a text formfield and run a macro on exit from the
formfield that contains the following code: With ActiveDocument.FormFields("Text1") .result = Format(.result / 1000, "0.00%") End With replace "Text1" with the bookmark name assigned to the formfield. -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP "Darryl" wrote in message ... I created a brand new document with a table (inserted from the forms toolbar) that had three columns. first, I put the insertion point into column 1 row 1. Then selected text form field from the forms toolbar. I then right clicked, chose properties and set the a field type to number. Text format to 0.00%. Selected divide100 as the exit macro. Under the field settings group box I set the bookmark to value1. Clicked OK. Clicked form protect button on forms toolbar. Then to test, put insertion point in column1 row 1 and typed 1.23 then pressed the tab key. Immediately the type mis-match error 13 pops up. press debug on the error dialog box and the debugger says the offending is: myValue = CSng(Left(.Text, Len(.Text) - 1)) what am I doing wrong ? thanks, Darryl "Jean-Guy Marcil" wrote in message ... Darryl was telling us: Darryl nous racontait que : Well, I changed Value1 to my field name. I have the field set as number, format 0.00%, macro on exit is divide100. When I run it, I get a type mismatch error. Looking at the macro, I'm not sure why ? Form field is type number. Is the macro assuming the field is text ? I created a protected form with a text field set to number with the 0.00% format, then I protected the form. My macro works. I just checked again, and it worked. So we are doing things differently. Describe how you created the field (and gave it a name) where the user enters the value and the document itself (how is it protected, what does it contain). -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#20
|
|||
|
|||
|
Darryl was telling us:
Darryl nous racontait que : I can send you the exact document as I might not answer properly. I am using Word 2000 Ha! Word 2000! I had done all my tests in Word 2003. Protected documents behave differently in almost all versions of Word... Try this instead: '_______________________________________ Sub Divide100() Dim myValue As Single ActiveDocument.Unprotect With ActiveDocument.FormFields("Value1") myValue = CSng(Left(.Result, Len(.Result) - 1)) myValue = myValue / 10000 .Result = CStr(myValue) End With ActiveDocument.Protect wdAllowOnlyFormFields, True End Sub '_______________________________________ -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#21
|
|||
|
|||
|
Success!
But one question. In the divide100 subroutine, it references Value1. If I have three form fields (value1, value2, value3) and I want to call divide100 onexit of each, how would I modify the divide100 (put a conditional test ?) -Darryl "Jean-Guy Marcil" wrote in message ... Darryl was telling us: Darryl nous racontait que : I can send you the exact document as I might not answer properly. I am using Word 2000 Ha! Word 2000! I had done all my tests in Word 2003. Protected documents behave differently in almost all versions of Word... Try this instead: '_______________________________________ Sub Divide100() Dim myValue As Single ActiveDocument.Unprotect With ActiveDocument.FormFields("Value1") myValue = CSng(Left(.Result, Len(.Result) - 1)) myValue = myValue / 10000 .Result = CStr(myValue) End With ActiveDocument.Protect wdAllowOnlyFormFields, True End Sub '_______________________________________ -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#22
|
|||
|
|||
|
Darryl was telling us:
Darryl nous racontait que : Success! But one question. In the divide100 subroutine, it references Value1. If I have three form fields (value1, value2, value3) and I want to call divide100 onexit of each, how would I modify the divide100 (put a conditional test ?) Try something like this: '_______________________________________ Sub Divide100() Dim myValue As Single ActiveDocument.Unprotect With Selection.Range.Bookmarks(1).Range.FormFields(1) If .Result = "" Then GoTo QuitSub 'in case field is empty myValue = CSng(Left(.Result, Len(.Result) - 1)) myValue = myValue / 10000 .Result = CStr(myValue) End With QuitSub: ActiveDocument.Protect wdAllowOnlyFormFields, True End Sub '_______________________________________ You may have to modify it a bit... I did not test it with Word 2000 this time... -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
|
#23
|
|||
|
|||
|
This is what I came up with. It seems to work.
'_______________________________________ Sub Divide1002() Dim myValue2 As Single ActiveDocument.Unprotect With ActiveDocument.FormFields(Selection.Bookmarks(Sele ction.Bookmarks.Count).Nam e) myValue2 = CSng(Left(.Result, Len(.Result) - 1)) myValue2 = myValue2 / 10000 .Result = CStr(myValue2) End With ActiveDocument.Protect wdAllowOnlyFormFields, True End Sub '_______________________________________ "Jean-Guy Marcil" wrote in message ... Darryl was telling us: Darryl nous racontait que : Success! But one question. In the divide100 subroutine, it references Value1. If I have three form fields (value1, value2, value3) and I want to call divide100 onexit of each, how would I modify the divide100 (put a conditional test ?) Try something like this: '_______________________________________ Sub Divide100() Dim myValue As Single ActiveDocument.Unprotect With Selection.Range.Bookmarks(1).Range.FormFields(1) If .Result = "" Then GoTo QuitSub 'in case field is empty myValue = CSng(Left(.Result, Len(.Result) - 1)) myValue = myValue / 10000 .Result = CStr(myValue) End With QuitSub: ActiveDocument.Protect wdAllowOnlyFormFields, True End Sub '_______________________________________ You may have to modify it a bit... I did not test it with Word 2000 this time... -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
| Reply |
| Thread Tools | |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| cell formatting | Microsoft Word Help | |||
| Form Fields lose bold formatting | Microsoft Word Help | |||
| word table cell resize or word table cell size change or word table change cell size | Tables | |||
| numeric formatting within a cell | Tables | |||
| Apply Style but keep direct formatting? | New Users | |||
Linear Mode
