Если ЗначениеЗаполнено(стр.Физлицо) Тогда
   стр.Физлицо.Метаданные().Формы.ФормаЭлемента    
   НомСтр=Н+3;
   Лист.Cells(НомСтр,7).Value = стр.Сумма;
   Лист.Cells(НомСтр,1).Value = Н+1;
   Лист.Cells(НомСтр,2).Value = 117;
//    K = стр.Физлицо.ПолноеНаименование());
   Лист.Cells(НомСтр,4).Value = стр.Физлицо.Наименование //здесь!!!!

надо вычленить фамилию из ФИО...

(0) nfv ;t tcnm jnltkmyj afvbkbz d htubcnht

там же есть отдельно фамилия в регистре

открой для себя общий модуль общего назначения илформирование печатных форм

(0) ты неправильно получаешь ФИО, в общем случае это будет работать
а правильно получать ФИО из регистра ФИОФизЛиц

tochnyak, spasibo bol'shoe!)

(6) ты изеке ответил?? :)

vsem)