Macro to Copy formula from Tab to Tab when someone picks an option from a drop down

VonFeed

New Member
Joined
Dec 12, 2011
Messages
11
Hello,
I have two different drop downs located in G2 and G6. If someone picks an item from either one, I want a macro to run that will go to Tab "Formulas" copy the formulas on that page (H10:N10, H15:N69, H73:N129, N133:N232) and paste them in the active sheet that just had the change in the exact same cell locations. Then I need it to run the formula. Once the formula is done, to hard code all those numbers so the formula is no longer there, only the numbers remain.

So in general
Pick from a list in G2 or G6
Formula from "Formulas" tab are copied and placed into the active sheet
Formulas run
all formulas on the active sheet that were just pasted in need to be removed leaving just the numbers behind.

it's a data hog spreadsheet that I think will not take up as much data if I only use the formula once instead of the same formula for each tab.

Any help is totally appreciated. I have not found what I need on the web over the last two days, but then again sometimes things are right in front of you at times.
 

Excel Facts

Enter current date or time
Ctrl+: enters current time. Ctrl+; enters current date. Use Ctrl+: Ctrl+; Enter for current date & time.
What I have right now copies over the wrong tab, it is copying the right tab, but then it copies it over that same tab and hard codes it there instead of the active sheet that I want it to do it to.

Code:
Sub formulas()'
' copy Formulas
'
'
    Sheets("FORMULAS").Select
    Range("H10:N232").Select
    Selection.copy
    ActiveSheet.Select
    Range("H10:N232").Select
    Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False
        ActiveSheet.Calculate
    ActiveSheet.Range("H10:N232").Select
    Application.CutCopyMode = False
    Selection.copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
        Range("H10").Select
End Sub
 
Upvote 0

Forum statistics

Threads
1,223,887
Messages
6,175,199
Members
452,617
Latest member
Narendra Babu D

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top