Символы Unicode в Caption
Stormy
Дата: Суббота, 16.12.2017, 16:26 |
Сообщение № 1
Группа: Проверенные
Ранг: Обитатель
Сообщений: 366
Репутация:
12
±
Замечаний:
0% ±
Excel 2010
Пытаюсь отобразить букву из латинского алфавита. Речь идет о букве Ə [vba]Код
Private Sub UserForm_Initialize() UserForm1.Caption = "M" & ChrW(601) & "lumat" End Sub
[/vba] В данном случае вместо Ə выводится знак ? Если же сделать так: [vba]Код
Private Sub UserForm_Initialize() UserForm1.Caption = "M" & ChrW(U + 259) & "lumat" End Sub
[/vba] То подставляется буква а В каком направлении нужно искать решение?
Пытаюсь отобразить букву из латинского алфавита. Речь идет о букве Ə [vba]Код
Private Sub UserForm_Initialize() UserForm1.Caption = "M" & ChrW(601) & "lumat" End Sub
[/vba] В данном случае вместо Ə выводится знак ? Если же сделать так: [vba]Код
Private Sub UserForm_Initialize() UserForm1.Caption = "M" & ChrW(U + 259) & "lumat" End Sub
[/vba] То подставляется буква а В каком направлении нужно искать решение? Stormy
Место для рекламы.
Ответить
Сообщение Пытаюсь отобразить букву из латинского алфавита. Речь идет о букве Ə [vba]Код
Private Sub UserForm_Initialize() UserForm1.Caption = "M" & ChrW(601) & "lumat" End Sub
[/vba] В данном случае вместо Ə выводится знак ? Если же сделать так: [vba]Код
Private Sub UserForm_Initialize() UserForm1.Caption = "M" & ChrW(U + 259) & "lumat" End Sub
[/vba] То подставляется буква а В каком направлении нужно искать решение? Автор - Stormy Дата добавления - 16.12.2017 в 16:26
Roman777
Дата: Суббота, 16.12.2017, 16:33 |
Сообщение № 2
Группа: Проверенные
Ранг: Ветеран
Сообщений: 980
Репутация:
127
±
Замечаний:
0% ±
Excel 2007, Excel 2013
Запустите в обычном модуле на пустом листе и найдите нужное значение в какой-то строке. Собственно номер этой строки и подставляйте. [vba]Код
Sub dsds() For i = 1 To 1000 Cells(i, 1) = ChrW(i) Next i End Sub
[/vba]
Запустите в обычном модуле на пустом листе и найдите нужное значение в какой-то строке. Собственно номер этой строки и подставляйте. [vba]Код
Sub dsds() For i = 1 To 1000 Cells(i, 1) = ChrW(i) Next i End Sub
[/vba] Roman777
Много чего не знаю!!!!
Сообщение отредактировал Roman777 - Суббота, 16.12.2017, 16:33
Ответить
Сообщение Запустите в обычном модуле на пустом листе и найдите нужное значение в какой-то строке. Собственно номер этой строки и подставляйте. [vba]Код
Sub dsds() For i = 1 To 1000 Cells(i, 1) = ChrW(i) Next i End Sub
[/vba] Автор - Roman777 Дата добавления - 16.12.2017 в 16:33
Stormy
Дата: Суббота, 16.12.2017, 16:46 |
Сообщение № 3
Группа: Проверенные
Ранг: Обитатель
Сообщений: 366
Репутация:
12
±
Замечаний:
0% ±
Excel 2010
Собственно номер этой строки и подставляйте.
Не находит такой буквы (( Прикол в том, что если присваивать имя Label у , то все нормально [vba]Код
Private Sub UserForm_Initialize() UserForm1.Label1.Caption = "M" & ChrW(601) & "lumat" End Sub
[/vba] Видать проблема более глобальна. Придется искать другой путь ))
Собственно номер этой строки и подставляйте.
Не находит такой буквы (( Прикол в том, что если присваивать имя Label у , то все нормально [vba]Код
Private Sub UserForm_Initialize() UserForm1.Label1.Caption = "M" & ChrW(601) & "lumat" End Sub
[/vba] Видать проблема более глобальна. Придется искать другой путь ))Stormy
Место для рекламы.
Ответить
Сообщение Собственно номер этой строки и подставляйте.
Не находит такой буквы (( Прикол в том, что если присваивать имя Label у , то все нормально [vba]Код
Private Sub UserForm_Initialize() UserForm1.Label1.Caption = "M" & ChrW(601) & "lumat" End Sub
[/vba] Видать проблема более глобальна. Придется искать другой путь ))Автор - Stormy Дата добавления - 16.12.2017 в 16:46
Roman777
Дата: Суббота, 16.12.2017, 17:27 |
Сообщение № 4
Группа: Проверенные
Ранг: Ветеран
Сообщений: 980
Репутация:
127
±
Замечаний:
0% ±
Excel 2007, Excel 2013
Не находит такой буквы ((
странно, у меня нашёл символ под номером "399" Попробовал сам и понял, о чём Вы говорите, действительно просто так не отображает необходимый символ Unicode.
Не находит такой буквы ((
странно, у меня нашёл символ под номером "399" Попробовал сам и понял, о чём Вы говорите, действительно просто так не отображает необходимый символ Unicode.Roman777
Много чего не знаю!!!!
Сообщение отредактировал Roman777 - Суббота, 16.12.2017, 17:41
Ответить
Сообщение Не находит такой буквы ((
странно, у меня нашёл символ под номером "399" Попробовал сам и понял, о чём Вы говорите, действительно просто так не отображает необходимый символ Unicode.Автор - Roman777 Дата добавления - 16.12.2017 в 17:27