Is it possible to (when a different sheet is active)
This is extremely simplified, but represents the problem.
I think I'm hoping "With" carries a little more juice.

Sub WorkingIt()
Dim iWish As Range
With Sheet2.Range("rngOne") ' Named range =Sheet2!$D$7:$G$14
.Range(Cells(3, 3), Cells(4, 4)).Value = 45
Set iWish = .Range(Cells(2, 3), Cells(4, 4))
End With
End Sub
--
Jim at Eagle