Falla de Macro en w2000

hola, (...) ?

Tengo la sigiente macro, que he utilizado por mucho tiemo en Win98 sin ningun problema:
Sub Concilia()
Application.ScreenUpdating = False
ActiveSheet.Range("A11:D1000").Sort Key1:=Range("D11"), Order1:=xlDescending, Key2:=ActiveSheet.Range("C11")
ActiveSheet.Range("E11:H1000").Sort Key1:=Range("H11"), Order1:=xlDescending, Key2:=ActiveSheet.Range("G11")
Range("D11").Select
While ActiveCell.Offset(A, 4) <> ""
If ActiveCell.Offset(A, 0) < ActiveCell.Offset(A, 4) Then
ActiveCell.Offset(A, -3).Resize(1, 4).Insert Shift:=xlDown
'ActiveCell.Offset(A, 0).Value = 0

en windows 2000 se detiene indicandome que es "Imposible encontrar el proyecto o la biblioteca"
y me marca la siguiente línea While ActiveCell.Offset(A, 4) <> "" resaltando la "A"
No encuentro el problema, si alguien me puede ayudar

1) la propiedad Offset sirve para *desplazar* la referencia n_filas y/o n_columnas
la propiedad Resize sirve para ampliar/disminuir una referencia tambien n_filas y/o n_columnas
-> [dicho sea *de paso*]... los argumentos "n_filas" y/o "n_columnas" DEBEN SER valores *numericos* <= OJO

2) tampoco me parece que sea *problema* de versiones de windows -?-
-> bajo la *tematica* que expones, dudo que funcione en cualquier version de windows [a menos que]...

3) a menos que tengas una variable *global* [publica o constante] donde asignes un valor numerico a "A"...
VBA *trata* de encontrar algun proyecto desde el cual pueda *convertir* una variable-textual "A" en un valor numerico -???-

comentas [si hubiera] algun detalle *en el tintero* ?
saludos,
hector.