G
Guest
Hi,
I have a couple of sheets, one with a week on week budget, the other I want
to pull the budget data on.
I've named each weeks budget and tried to use the macro:
Dim Week, budgets
Week = InputBox("What budget week do you want to display?", "Budget Week")
Select Case Week
Case Is = 1
budgets = Sheets("Budget").Select
Application.Goto Reference:="WK1"
Case Is = 2
budgets = Sheets("Budget").Select
Application.Goto Reference:="WK2"
Case Else
Area = "but you don't seem to know your Budget week"
End Select
Range("I38").Select
Application.Goto Reference:=Worksheets("Budget").Range("Budgets"), _
scroll:=True
Selection.Copy
Sheets("Summary by Plant").Select
Range("I38").Select
ActiveSheet.Paste
Can't seem to find the right code to pull in the named range.
Any ideas please?
J
I have a couple of sheets, one with a week on week budget, the other I want
to pull the budget data on.
I've named each weeks budget and tried to use the macro:
Dim Week, budgets
Week = InputBox("What budget week do you want to display?", "Budget Week")
Select Case Week
Case Is = 1
budgets = Sheets("Budget").Select
Application.Goto Reference:="WK1"
Case Is = 2
budgets = Sheets("Budget").Select
Application.Goto Reference:="WK2"
Case Else
Area = "but you don't seem to know your Budget week"
End Select
Range("I38").Select
Application.Goto Reference:=Worksheets("Budget").Range("Budgets"), _
scroll:=True
Selection.Copy
Sheets("Summary by Plant").Select
Range("I38").Select
ActiveSheet.Paste
Can't seem to find the right code to pull in the named range.
Any ideas please?
J