Nekem ez vált be:
Ha csak annyit írsz, hogy Cells(x,y), az az aktív sheet Cells gyűjteményét jelenti. Mert nem adod meg, hogy mihez tartozik.
Csináltam két próbát:
Sub proba()
With Sheets(„InvAct”).Range(Sheets(„InvAct”).Cells(3, 1), Sheets(„InvAct”).Cells(10, 1))
.Value = „valami”
End With
End Sub
————————————————-
Sub proba_1()
Set sh = Sheets(„InVact”)
Set r = sh.Range(sh.Cells(3, 1), sh.Cells(10, 1))
With r
.Value = „valami”
End With
End Sub
Mind kettő megy tökéletesen.
Tehát a Cells() előtt definiálni kell, hogy melyik lap Cells gyűjteményével dolgozol.