Перенос текста на последующие строки по указанному количеству символов

[Посетитель]

Нужно сделать макрос, который будет переносить текст на последующие строки по указанному количеству символов.