[Gustav]

Цитата:

Сообщение от Player1

только остался эффект того что все колонки отчета выделены после вывода его на экран

Ну так в самом конце сделать <любая одиночная ячейка>.Select():

    rng = exAppl.Range('A1');
    rng.Select();