Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Найти надстрочные/подстрочные символы в MS Excel, Надстрочные/подстрочные символы
 
#1
15.10.2015 05:44:06
Здравствуйте, уважаемые форумчане. Подскажите, пожалуйста, люди добрые, как я могу найти на листе подстрочные символы, например вот такие данные 55562 , где 2, как вы успели заметить, подстрочный символ. Вот как раз эту двойку мне и нужно найти. Если надпись 777(подстрочные цифры), то без проблем ищется, если в формате найти указать подстрочный символ, и в поле найти поставить * (то есть искать всё).  Поиск по форуму ничего похожего не дал.
Изменено: Fraezar - 15.10.2015 05:44:32
 
 
 
#2
15.10.2015 06:05:26
Доброе время суток
Выбрать подстрочные можно такой udf-функцией
Код
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 = sResult
End Function
 
 
 
#3
15.10.2015 08:32:17
Хотелось бы найти, не используя VBA или макрос
 
 
 
#4
15.10.2015 08:33:22
Цитата
Андрей 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
Спасибо, но хотелось бы не использовать VBA.
 
 
 
#5
15.10.2015 09:11:46
Цитата
Fraezar написал: хотелось бы не использовать VBA
Тогда Ваша задача не имеет решения. Либо макросы, либо руцями и глазками.

Формула массива (ФМ) вводится Ctrl+Shift+Enter
Memento mori
 
 
 
Страницы: 1
Читают тему
Наверх