Здравствуйте, форумчане. Нужно вместо текущего значения ячейки(ячейка текстовая) поставить в нее же значение ячейки + значение из другой ячейки. Например есть А1 со значением qwerty и B1 со значением zxc, результат должен быть в ячейке А1 равным qwertyzxc Можно и макросом и формулой, но как формулой не понимаю совсем, если тип ячейки текстовый. Можно считать, что значение ячейки B1 всегда одно и то же, а вот A1 может меняться. Буду благодарен за помощь.
Здравствуйте, форумчане. Нужно вместо текущего значения ячейки(ячейка текстовая) поставить в нее же значение ячейки + значение из другой ячейки. Например есть А1 со значением qwerty и B1 со значением zxc, результат должен быть в ячейке А1 равным qwertyzxc Можно и макросом и формулой, но как формулой не понимаю совсем, если тип ячейки текстовый. Можно считать, что значение ячейки B1 всегда одно и то же, а вот A1 может меняться. Буду благодарен за помощь.Trank444
gling, Не понял. Если в самой ячейки А1 прописать формулу, ну например, =А1&B1 она не срабатывает, так как ячейка текстовая. Не понимаю как это обойти.
gling, Не понял. Если в самой ячейки А1 прописать формулу, ну например, =А1&B1 она не срабатывает, так как ячейка текстовая. Не понимаю как это обойти.
Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, [a1]) Is Nothing Then Exit Sub If Target.Count > 1 Then Exit Sub Application.EnableEvents = False [a1] = Target.Value & [b1] Application.EnableEvents = True End Sub
[/vba]
Trank444, в модуль листа:[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, [a1]) Is Nothing Then Exit Sub If Target.Count > 1 Then Exit Sub Application.EnableEvents = False [a1] = Target.Value & [b1] Application.EnableEvents = True End Sub
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
