Est-ce possible de référer à la propriété "ActiveCell" en passant par des variables objets comme dans l'exemple suivant:
Sub MySub()
Dim WBA as Workbook
Dim WSA as Worksheet
Dim MyVar As String
Set WBA = Workbooks.Open("MyWorkBook.xlsm")
Set WSD = WBA.Worksheets("MySheet")
MyVar = "Anything"
With WSD
.ActiveCell.Value = MyVar
.ActiveCell.Offset(2, 3).Select
MsgBox .ActiveCell.Row
End With
End Sub