Using Formulas ia a code

[Jogier505]

I have the attached sample working well with the exception of being able to insert formulas along with the other data.

The formulas and explanation of their use are included in the sample. Any help would be appreciated.

JIm O

[6StringJazzer]

Not sure why you want to do this in code instead of using formulas, since you have already defined the formulas. Nevertheless, maybe something like this, same order as listed in your worksheet:

Please Login or Register  to view this content.

[mrice]

Something like....????

Please Login or Register  to view this content.

[Jogier505]

Maybe I wasn't clear in my first post. I have the code that 'mrice' has suggested already in place but it will not pick up the formulas from the appropriate cells. I think that somehow I need to have the formulas in the code to start with so they will automatically be inserted with the rest of the data. Another issue is that if I try to put the formual into the cells on the Input Page I get a circular reference. I think I need a cross of the two answers, but I lack the expertise to pull it off.

Jim O

[6StringJazzer]

Well, apparently I have no idea what you're trying to do. I see that your code copies a column from Input and pastes it as a row into All Data. That seems to work fine. However, what you're doing with the formulas is unclear. Why don't you just put the formulas themselves as shown in column F into the cells in column B where indicated? Then the copy and paste will put the values from the formulas into the next row of All Data.

By the way I would suggest that you qualify the range reference to Input as

Please Login or Register  to view this content.

because as written it copies from the active sheet. Your code does not guarantee that Input will be the active sheet.

I would also suggest adding

Please Login or Register  to view this content.

after the paste, which will turn of the "marching ants."

[Jogier505]

I Think I have it solved now. I changed the input from a column to a row, added the formulas in the cells and most important changed the code to PasteSpecial Paste:=xlFormulas, _, not PasteSpecial Paste:=xlValues,.

6StringJazzer, Thank you for your input with the code. Slowly I am picking up bits of information. Someday, it may finally sink in!

I want to thank you both for your time and help with this issue.

JIm O