Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 22.10.2009, 23:54   #1
chyw
Новичок
Джуниор
 
Регистрация: 24.09.2009
Сообщений: 1
Вопрос Тексты из двух ячеек в одну и первый подчеркнуть

Прошу подсказать знающих людей метод решения проблемы подчеркивания одной из двух строк в одной ячейке. Данные для ячейки С1 взяты из двух ячеек по формуле = A1&СИМВОЛ(10)&B1. Получилось две строки в одной ячейке и верхнюю мне нужно подчеркнуть. А в общем таким образом нужно выбрать и обработать столбцы А6:A15000 и B6:B15000 чтобы выводилось соответственно по строкам в C6:C15000 с подчеркиванием слов в верхней строке ячейки. Заранее благодарю за помощь!

Последний раз редактировалось chyw; 23.10.2009 в 00:37.
chyw вне форума Ответить с цитированием
Старый 23.10.2009, 05:15   #2
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Часть символов в ячейке подчеркнуть с помощью формул невозможно. Только макрос. Например такой:
Код:
Sub Main()
    Dim i As Long: Application.ScreenUpdating = False: [C:C].Font.Underline = xlNone
    For i = 6 To 15000
        Cells(i, 3) = Cells(i, 1) & Chr(10) & Cells(i, 2)
        Cells(i, 3).Characters(Start:=1, Length:=Len(Cells(i, 1))).Font.Underline = xlUnderlineStyleSingle
    Next
End Sub
Пример во вложении. Откройте файл и запустите макрос "Main".
Вложения
Тип файла: rar Пример.rar (6.6 Кб, 15 просмотров)
Чем шире угол зрения, тем он тупее.

Последний раз редактировалось SAS888; 23.10.2009 в 08:22.
SAS888 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
текст из нескольких ячеек в одну Tirendus Microsoft Office Excel 10 20.01.2016 16:45
тексты в паскаль Лида200915 Помощь студентам 6 02.10.2009 22:39
Сцепка нескольких текстовых ячеек в одну строку Josser Microsoft Office Excel 4 20.07.2009 12:49
Сложение двух ячеек памяти Megapixar Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 5 14.05.2009 11:20
Как сделать в таблице (StringGrid) ячейку состоящую из двух ячеек на манер Exel бедный_студент Помощь студентам 3 28.04.2009 01:15