ReSQL.ru
     
powered by simpleCommunicator - 2.0.38     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Убрать вопросики...
9 сообщений из 9, страница 1 из 1
Убрать вопросики...
    #39888465
NVT
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NVT
Участник
Всем добра!

Есть ячейка со значением (визуально) = 2072575
Когда в отладчике пишешь ?ячейка.value то выдает 207?257?5
И когда просто копируешь ячейку и в код вставляешь - тоже вопросики возникают.
В вопросиках стоит символ ascii код = 63

Полагаю, что в этой ячейке вставленное через буфер значение,
содержащее символы непонятной кодировки, которые не визуально не показываются.
Где пользователь взял сие значение - загадка.

Как бы убрать ненужные символы? Есть ли функция какая или самому писать?
...
Рейтинг: 0 / 0
13.11.2019, 10:47
| Ответить | Цитировать | Написать  
Убрать вопросики...
    #39888467
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Код: vbnet
1.
Replace(..., chr(63), "")
...
Рейтинг: 0 / 0
13.11.2019, 10:54
| Ответить | Цитировать | Написать  
Убрать вопросики...
    #39888509
NVT
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NVT
Участник
Shocker.Pro, а если там не только 63 сомвол? Речь о том, что бы вообще все ненужное убрать.
...
Рейтинг: 0 / 0
13.11.2019, 11:43
| Ответить | Цитировать | Написать  
Убрать вопросики...
    #39888514
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Нужно сначала определиться, что такое "ненужное"
...
Рейтинг: 0 / 0
13.11.2019, 11:48
| Ответить | Цитировать | Написать  
Убрать вопросики...
    #39888536
NVT
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NVT
Участник
Shocker.Pro, хороший вопрос ))
Сначала наверное надо попробовать убрать символы в юникоде
Типа вот такого:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Sub xxxxxxxx()
Dim str As String, s As String, strResult As String
    
    str = Лист.Range(адресПлохойЯчейки)
    For i = 1 To Len(str)
        s = Mid(str, i, 1)
        If Asc(s) = AscW(s) Then strResult = strResult & s
    Next
    Debug.Print str
    Debug.Print strResult
End Sub

результат в окне отладки
207?257?5
2072575


Вроде как прокатывает, что скажете?
...
Рейтинг: 0 / 0
13.11.2019, 12:07
| Ответить | Цитировать | Написать  
Убрать вопросики...
    #39888543
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
NVT
В вопросиках стоит символ ascii код = 63
Ну вообще-то 63 - это и есть код символа ? ...

NVT
Есть ячейка со значением (визуально) = 2072575
Тип значения в ячейке? его формат?

Но лучше всего выложить файл с наблюдаемой проблемой.
...
Рейтинг: 0 / 0
13.11.2019, 12:23
| Ответить | Цитировать | Написать  
Убрать вопросики...
    #39888569
NVT
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NVT
Участник
Akina, тип текстовый
файл в аттаче. Ячейка выделена желтым
...
Рейтинг: 0 / 0
13.11.2019, 13:09
| Ответить | Цитировать | Написать  
Убрать вопросики...
    #39888733
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
Мда... навскидку не опознаётся. Показателен вывод
Код: vbnet
1.
for i = 1 to lenb(cells(2,2).value) : ? asc(midb(cells(2,2).value, i)), ascb(midb(cells(2,2).value, i)) : next
...
Рейтинг: 0 / 0
13.11.2019, 16:32
| Ответить | Цитировать | Написать  
Убрать вопросики...
    #39888739
NVT
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NVT
Участник
Akina, подсказал коллега
"там символ не с кодом ansii = 63 а символ с кодом ansii = 63 и с юникодом 8203, это разные символы, потому как просто вопрос имеет код ansii = 63 и юникод 63."
...
Рейтинг: 0 / 0
13.11.2019, 16:53
| Ответить | Цитировать | Написать  
9 сообщений из 9, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Убрать вопросики...
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru             Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=39888536&tid=2171964]:
 0ms
get settings:
 10ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 33ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 48ms
get tp. blocked users:
 1ms
others: 284ms
total:  412ms
созд. / загр.: 412ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]