Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: Lukas А так еще более правильно:
... For i=1 To Len(Left(Фамилия),23) oWbk.Sheets(1).Cells(13,12+4*i).Value = Mid(Фамилия, i, 1) next i
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.