точно похоже на проблему доступа

я админом сижу и права все на эту базу и документы сам создавал.
а по поводу

а вот - начни индекс не с 0 с 1

arr(1) = result
arr(2) = a(0)

от перемены ничего не меняется h34r:

 

млин взял я протестил твою последнюю функцию - все работет все видит

только строчка

Set doc=ws.CurrentDocument.Document

не пришей рукав там ... да и тип Variant передовать туда 2 штуки - смысл? ... ладно, учеба программирования выходит за рамки этой ветки