Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
How do I have Excel VB write a open ended formula?
Hello!
The idea to the code below would make it possiable so that a person could hit a button and a macro would convert the current number in the active cell to add a formula to give the sum of the next possiable number entered by the enduser... Think of it like the following... END USER TYPES "9" PRESS A BUTTON (Not keyboard) WITH A "+" END USER TYPES "9" again... Macro kicks in a makes it "=9+9" to have the spreadsheet display the finished result. This is to make it so that someone who doesn't know how to do formulas inside of Excel could get the result they are looking for... ActiveCell.Value = 9 (or which ever number the enduser chooses to enter) TAXES.ActiveCell.Formula = "=" & ActiveCell.Text & "+" & "1" ' This is the initial idea of getting it to work...The & "1" is placed as a temporary number to complete the formula. If Len(TAXES.ActiveCell.Text) 0 Then TAXES.ActiveCell.Value = Left(TAXES.ActiveCell.Text, Len(TAXES.ActiveCell.Text) - 1) ' This code above deletes the 1 leaving the activecell formula to be =9+(EMPTY) Any help is much appreciated...I been trying to figure this out the last few hours and haven't had much luck...Thanks!!! |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
How do I have Excel VB write a open ended formula?
Assuming the <formula is correctly entered into a text box, then a button
click can send it to cell : Activecell.formula="=" & TextBox2.Text NickHK wrote in message ps.com... Hello! The idea to the code below would make it possiable so that a person could hit a button and a macro would convert the current number in the active cell to add a formula to give the sum of the next possiable number entered by the enduser... Think of it like the following... END USER TYPES "9" PRESS A BUTTON (Not keyboard) WITH A "+" END USER TYPES "9" again... Macro kicks in a makes it "=9+9" to have the spreadsheet display the finished result. This is to make it so that someone who doesn't know how to do formulas inside of Excel could get the result they are looking for... ActiveCell.Value = 9 (or which ever number the enduser chooses to enter) TAXES.ActiveCell.Formula = "=" & ActiveCell.Text & "+" & "1" ' This is the initial idea of getting it to work...The & "1" is placed as a temporary number to complete the formula. If Len(TAXES.ActiveCell.Text) 0 Then TAXES.ActiveCell.Value = Left(TAXES.ActiveCell.Text, Len(TAXES.ActiveCell.Text) - 1) ' This code above deletes the 1 leaving the activecell formula to be =9+(EMPTY) Any help is much appreciated...I been trying to figure this out the last few hours and haven't had much luck...Thanks!!! |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Need open ended cell for Sum range. | Excel Worksheet Functions | |||
open ended multi page sum | Excel Worksheet Functions | |||
open ended multi page sum | Excel Worksheet Functions | |||
open ended multi page sum | Excel Worksheet Functions | |||
open ended multi page sum | Excel Worksheet Functions |