Цитата |
---|
Андрей VG написал: Public Function GetSubscripts(ByVal this As Range) As String Dim sResult As String, i As Long If this.Count = 1 Then For i = 1 To this.Characters.Count With this.Characters(i, 1) If .Font.Subscript Then sResult = sResult & .Text End With Next End If GetSubscripts = sResultEnd Function |
Найти надстрочные/подстрочные символы в MS Excel, Надстрочные/подстрочные символы
Найти надстрочные/подстрочные символы в MS Excel, Надстрочные/подстрочные символы
Найти надстрочные/подстрочные символы в MS Excel, Надстрочные/подстрочные символы
15.10.2015 05:44:06
Здравствуйте, уважаемые форумчане. Подскажите, пожалуйста, люди добрые, как я могу найти на листе подстрочные символы, например вот такие данные 55562 , где 2, как вы успели заметить, подстрочный символ. Вот как раз эту двойку мне и нужно найти. Если надпись 777(подстрочные цифры), то без проблем ищется, если в формате найти указать подстрочный символ, и в поле найти поставить * (то есть искать всё). Поиск по форуму ничего похожего не дал.
Изменено: |
|
|