Страницы: 1
RSS
Форматирование текста в ячейке с формулой
 
Имеется формула возвращающая текст в ячейку  
Как форматировать еЁ чтобы часть текста была например выделена жирнее и крупнее ???  
Может коды какие добавить ?
 
Автоматически это можно сделать только с помощью макроса.
 
Формула берет данные с другого листа  
Подскажите как это  
 
<Автоматически это можно сделать только с помощью макроса>  
 
На примере что-ли ...  
и пропадет ли при этом формула в ячейке  
В каком месте искать-то?
 
{quote}{login=}{date=30.11.2007 05:54}{post}Формула берет данные с другого листа  
и пропадет ли при этом формула в ячейке  
В каком месте искать-то?{/post}{/quote}  
Привязал к активации листа пришлось брать данные из одной ячейки клеить в другую а потом ТЕКСТ форматировать.  
Гнусно но по другому никак не идет
 
Да, формулой придется жертвовать, по всей видимости... во всяком случае, я не нашел способа форматирования части строки, возвращаемой формулой. Это получается только с текстом в ячейке.
 
Всех благодарю за внимание ВОПРОС исчерпан.
 
Так Вы решили этот вопрос или нет? А, если решили, не поделитесь ли опытом?
 
Поискал на форуме ответ на мой вопрос, конкретно не нашёл, понял только, что без макроса никак не решить. Вопрос в следующем: есть ячейка, в ней необходимо выделить жирным номер, причём перед номером количество символов меняется в зависимости от выбранной модели (КамАЗ, Урал, ГАЗ и т.д.). Если кто знает решение, можно поподробней куда скопировать код в Basic?
 
По событию BeforeDoubleClick конвертируем формулу в текст и форматируем гос.номер.  
Подпись - k61
 
Принцип, естественно, тот же, что и у k61, но вот так чуть попроще будет:  
 
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)  
  Cancel = True  
  With Target(1)  
     '.Font.Bold = False ' убрать жирность фонта  
     If .HasFormula Then .Value = .Value  
     .Characters(InStr(.Value, "№")).Font.Bold = .Value Like "*№*"  
  End With  
End Sub
С уважением, Алексей (ИМХО: Excel-2003 - THE BEST!!!)
 
Лишняя проверка:  
If .HasFormula Then
Я сам - дурнее всякого примера! ...
 
Ну да, Серёга, может быть и лишняя.  
Я это сделал чтобы не трогало ячейки датой или временем.  
А сейчас понял, что значение-то спокойно может вставляться и в них, т.к. внешний вид останется таким, как задан в формате ячейки.
С уважением, Алексей (ИМХО: Excel-2003 - THE BEST!!!)
 
{quote}{login=Alex_ST}{date=12.12.2012 11:02}{thema=}{post}значение-то спокойно может вставляться и в них{/post}{/quote}  
не всегда :)))  
 
[a1].numberformat="@"
[a1].value="12/1"
[a1].numberformat="general" ' отображается всё ещё "12/1"
[a1].value=activecell.value ' а это уже дата!
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
Саш, я писал о конкретном примере. Там нет дат. Да и на даблклик это можно не вешать, раз уж надо все номера выделить. Тогда уж на change или calculate и проверять на instr.
Я сам - дурнее всякого примера! ...
 
прошу прощения (правил текст прямо на форуме, поправил не до конца) - в последней строчке вместо activecell должно быть тоже [a1]
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
А редактирование гос. № без двойного щелчка возможно сделать? Например макрос работает после внесения изменений гос. №. И как сделать чтобы выделялся только сам номер (Н 54 НН), без №:
Страницы: 1
Читают тему
Наверх