powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / isNumeric & DecimalSeparator
10 сообщений из 10, страница 1 из 1
isNumeric & DecimalSeparator
    #36099138
IgorD
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Добрый день!
Помогите, пожалуйста, выбраться из тупика.
Необходимо, что бы функция isNumeric("8.01") возвращала истину

пробовал так

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
With Application
        .DisplayAlerts = False
        .DecimalSeparator = "."
        .ThousandsSeparator = ""
        .UseSystemSeparators = True
 End With

  If IsNumeric("8.01") Then
    MsgBox "8.01"
  ElseIf IsNumeric("8,01") Then
   MsgBox "8,01"
 End If

но срабатывает IsNumeric("8,01"). Где ошибся?
...
Рейтинг: 0 / 0
isNumeric & DecimalSeparator
    #36099158
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В региональных настройках разделитель — точка.

Jah loves you.
...
Рейтинг: 0 / 0
isNumeric & DecimalSeparator
    #36099160
IgorD
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
P.S.
и с .UseSystemSeparators = false также не дает ожидаемый результат
...
Рейтинг: 0 / 0
isNumeric & DecimalSeparator
    #36099168
IgorD
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
AntonariyВ региональных настройках разделитель — точка.

Jah loves you.

Файл Excel будет работать на разных машинах, не хотелось бы привязываться к нестандартным региональным настройкам. Как их поменять только на время выполнения макроса в скрипте?
...
Рейтинг: 0 / 0
isNumeric & DecimalSeparator
    #36099184
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Никак. Нужно узнавать системный разделитель и заменять текст на него.

Jah loves you.
...
Рейтинг: 0 / 0
isNumeric & DecimalSeparator
    #36099191
IgorD
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
AntonariyНикак. Нужно узнавать системный разделитель и заменять текст на него.

Jah loves you.

А на что тогда влияет
Код: plaintext
1.
2.
3.
4.
5.
With Application
        .DisplayAlerts = False
        .DecimalSeparator = "."
        .ThousandsSeparator = ""
        .UseSystemSeparators = True
 End With
?
...
Рейтинг: 0 / 0
isNumeric & DecimalSeparator
    #36099217
IgorD
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
AntonariyНикак. Нужно узнавать системный разделитель и заменять текст на него.

Jah loves you.

если эти этим путем, то разделитель можно узнать так
Код: plaintext
Mid$(Format( 1 . 1 , "General Number"),  2 ,  1 )
...
Рейтинг: 0 / 0
isNumeric & DecimalSeparator
    #36099237
AndrF
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
IgorDФайл Excel будет работать на разных машинах, не хотелось бы привязываться к нестандартным региональным настройкам. Как их поменять только на время выполнения макроса в скрипте?

IMHO - вы пытаетесь сделать то что делать не надо - никогда не меняйте настройки пользователя.

IsNumeric("1.23") у американцев и IsNumeric("1,23") в России вернут одно и то же.
...
Рейтинг: 0 / 0
isNumeric & DecimalSeparator
    #36099263
IgorD
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
AndrFIgorDФайл Excel будет работать на разных машинах, не хотелось бы привязываться к нестандартным региональным настройкам. Как их поменять только на время выполнения макроса в скрипте?

IMHO - вы пытаетесь сделать то что делать не надо - никогда не меняйте настройки пользователя.

IsNumeric("1.23") у американцев и IsNumeric("1,23") в России вернут одно и то же.

Согласен!
...
Рейтинг: 0 / 0
isNumeric & DecimalSeparator
    #36099752
AndrF
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
IgorD
если эти этим путем, то разделитель можно узнать так
Код: plaintext
Mid$(Format( 1 . 1 , "General Number"),  2 ,  1 )


Приколитесь:

Код: plaintext
Format$(. 1 ,".")
...
Рейтинг: 0 / 0
10 сообщений из 10, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / isNumeric & DecimalSeparator
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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