Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » vanking
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1
Перенос строки внутри ячейки по нажатию Enter вместо Alt-Enter
 
#
09.10.2014 01:04:17
Пока код у меня в таком состоянии, может, кому-то пригодится:
Текст, вставляемый в код листа:
Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
     Application.OnKey "~", "Abzac"
End Sub
Текст, вставляемый в модуль:
Код
Sub Abzac()
    Dim T As String
    T = ActiveCell.Value + Chr(10)
    Application.SendKeys "{F2}"
    ActiveCell.FormulaR1C1 = T
End Sub
 
Перейти    
Перенос строки внутри ячейки по нажатию Enter вместо Alt-Enter
 
#
09.10.2014 00:59:55
А эти элементы будут выводиться на печать?
 
Перейти    
Перенос строки внутри ячейки по нажатию Enter вместо Alt-Enter
 
#
09.10.2014 00:57:52
Цитата
Юрий М пишет: на эту объединённую ячейку наложить "Надпись"
с этого места поподробней - что имеется ввиду?))
Цитата
Максим Зеленский пишет: Но, может быть, просто TextBox сгодится?
TextBox - это как запасной вариант. Пока ищу более изящное решение, чтобы всё выглядело как обычный эксель)
Сейчас везде ищу вариант как можно вставить текст с помощью кода VBA, когда ячейка находится в режиме редактирования. Если кто-то сталкивался, буду благодарен)
Пока поиск говорит о том, что код VBA вообще не выполняется, когда любая ячейка находится в режиме редактирования
 
Перейти    
Перенос строки внутри ячейки по нажатию Enter вместо Alt-Enter
 
#
09.10.2014 00:38:34
Цитата
Юрий М пишет: Он в середину строки помещает курсор?
Да. Он хочет работать с ячейкой по аналогии как с блокнотом. Ввёл текст, потом там где посчитал нужным, повставлял переносы строк для удобочитаемости, и распечатал. Клавиши со стрелками здесь работают в режиме навигации по тексту в ячейке.

Для наглядности, прикладываю скрин.
Как видно, ячейка куда вводится диагноз, еще и объединённая.
 
Перейти    
Перенос строки внутри ячейки по нажатию Enter вместо Alt-Enter
 
#
09.10.2014 00:17:27
Цитата
Юрий М пишет: Почему в конце?
Потому что после нажатия Enter'a редактирование ячейки завершается, и лишь потом запускается обработчик. С содержимым ячейки я работаю как с обычной текстовой строкой, а положение курсора, где был нажат Enter - неизвестно.
Цитата
И как Ваш врач заканчивает тогда редактирование - стрелками?
Tab'ом
 
Перейти    
Перенос строки внутри ячейки по нажатию Enter вместо Alt-Enter
 
#
09.10.2014 00:10:51
Друзья, столкнулся с такой элементарной, но непросто проблемой:
Я делаю на заказ таблицу с VBA-кодом для ведения картотеки частного врача.
Заказчик (врач) попросил чтобы в тех ячейках, где вписывается диагноз и рекомендации, была реализована возможность по нажатию Enter вставлять принудительно перенос на следующую строку в той же ячейке (Аналогично, как это делает комбинация Alt+Enter).

Конечно, я ему могу порекомендовать жать Alt+Enter где ему надо, и не париться, но:
1. Его уровень знания ПК очень новичковый, он клавиатурными комбинациями не пользуется, даже Ctrl-C и т.п.
2. Очень хороший бюджет проекта, который позволяет ему "покапризничать"
Что я уже попробовал - естественно написал код, который захватывает нажатие Enter'a.
Несложно проанализировать содержимое ячейки и в конце прибавить символ переноса строки - chr(10).
Но если заказчик надумает поставить Enter в середине текста, вопреки его ожиданиям, перенос строки вновь допишется в конце.
Как тут быть?
 
Перейти    
Страницы: 1
Наверх