Одна проблема отпала)) ADOQuery1.FieldByName('наименование').AsString:=Fo rmat('Ap.Range['A%s']',[A]);
Заместо %s должно быть %d.
Но теперь он говорит что "Система Office обнаружила проблему с этим файлом. Чтобы обеспечить защиту компьютера этот файл не будет открыт."
|