ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Val
15 сообщений из 15, страница 1 из 1
Val
    #36000836
Rusaln
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Rusaln
Гость
программирую на Визуал.
в ячейки Exceell прописано значение цифры, а потом есть пробелы.
через Trim убераю пробел.
Product_type3 = Trim(Worksheets(5).Cells(find_val4.Row, product_val2.Column).Value)
Но когда сравниваю значение Product_type3 с другой ячейкой, где так же прописано цифры но без пробела, сравнения равняеться к не ровну <>.
кто знает как произвести ковертацию со строки на цифру?
...
Рейтинг: 0 / 0
22.05.2009, 08:45
| Ответить | Цитировать | Написать  
Val
    #36000866
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
Если вы уверены, что в ячейке после цифр идут пробелы, то используйте преобразование CDbl или CInt.
...
Рейтинг: 0 / 0
22.05.2009, 08:59
| Ответить | Цитировать | Написать  
Val
    #36000997
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PlanB
Участник
Dim Product_type3 As Integer ?
...
Рейтинг: 0 / 0
22.05.2009, 10:04
| Ответить | Цитировать | Написать  
Val
    #36001095
EmilRegis
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
EmilRegis
Участник
для начала русский бы подучить))
...
Рейтинг: 0 / 0
22.05.2009, 10:36
| Ответить | Цитировать | Написать  
Val
    #36001105
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PlanB
Участник
EmilRegis, сюда посмотрите
...
Рейтинг: 0 / 0
22.05.2009, 10:39
| Ответить | Цитировать | Написать  
Val
    #36001653
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
PlanBDim Product_type3 As Integer ?
Вы сторонник неявного преобразования типов ?
...
Рейтинг: 0 / 0
22.05.2009, 13:01
| Ответить | Цитировать | Написать  
Val
    #36001681
Rusaln
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Rusaln
Гость
прикол приколом, а если серьезно, то там не всегда после цифр могут быть пробелы. CDbl не помог, а Cint дела тоже не помог.
...
Рейтинг: 0 / 0
22.05.2009, 13:06
| Ответить | Цитировать | Написать  
Val
    #36001698
EmilRegis
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
EmilRegis
Участник
выведи значения той и другой ячейки после всех преобразований и посмотри чем они отличаются
...
Рейтинг: 0 / 0
22.05.2009, 13:11
| Ответить | Цитировать | Написать  
Val
    #36001736
Rusaln
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Rusaln
Гость
если в ячейки где есть пробелы, убираю пробелы после цифр, то все .аебись работает, ну то есть хорошо ))).
а если не убираю, то не работает.
выводил, не знаю, Trim всегда убирал пробелы, а тут не убирает, или он пробелы не видит???
...
Рейтинг: 0 / 0
22.05.2009, 13:22
| Ответить | Цитировать | Написать  
Val
    #36001758
EmilRegis
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
EmilRegis
Участник
попробу вместо трима replace(" ","") или что там вместо реплайса в вб..." " - это 2 пробела
...
Рейтинг: 0 / 0
22.05.2009, 13:28
| Ответить | Цитировать | Написать  
Val
    #36001947
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь Горбонос
Участник
> Автор: Rusaln
> если в ячейки где есть пробелы, убираю пробелы после цифр, то все .аебись работает, ну то есть хорошо ))).
> а если не убираю, то не работает.
> выводил, не знаю, Trim всегда убирал пробелы, а тут не убирает, или он пробелы не видит???

Пример значений можно увидеть? Хотя-бы те что не преобразовывает
И вообще зачем тему назвал Val если в коде нигде не применяеш её?


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
22.05.2009, 14:06
| Ответить | Цитировать | Написать  
Val
    #36002255
Rusaln
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Rusaln
Гость
Product_type = Trim(Worksheets(1).Cells(r, product_val.Column).Value)
Fin_Plan_type = Trim(Worksheets(1).Cells(r, fin_plan_val.Column).Value)

Product_type3 = Trim(Worksheets(5).Cells(find_val4.Row, product_val2.Column).Value)
Fin_Plan_type3 = Trim(Worksheets(5).Cells(find_val4.Row, fin_plan_val2.Column).Value)

If Product_type = Product_type3 And Fin_Plan_type = Fin_Plan_type3 Then
L_check = "False"
Worksheets(1).Cells(r, pl_cat_dr.Column).Value = pl_type
Else
check_Cat2 = "True"
End If
...
Рейтинг: 0 / 0
22.05.2009, 15:23
| Ответить | Цитировать | Написать  
Val
    #36002256
Rusaln
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Rusaln
Гость
даже в аски код перерводил, выводит 32 , это же пробел. но Trim не убирает (((
...
Рейтинг: 0 / 0
22.05.2009, 15:24
| Ответить | Цитировать | Написать  
Val
    #36002307
Фотография by-pass
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
by-pass
Участник
тогда
Replace("строка", Chr(32),"")
...
Рейтинг: 0 / 0
22.05.2009, 15:37
| Ответить | Цитировать | Написать  
Val
    #36002314
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь Горбонос
Участник
> Автор: Rusaln
Я вообще-то просил книгу со значениями, которые не преобразовываются как нужно.

А по вышеприведенному коду такие вопросы:
типы переменных Product_type, Fin_Plan_type, Product_type3, Fin_Plan_type3 ?
И если уж на то пошло, может проще делать так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
If Worksheets( 1 ).Cells(r, product_val.Column).Value = Worksheets( 5 ).Cells(find_val4.Row, 
product_val2.Column).Value and Worksheets( 1 ).Cells(r, fin_plan_val.Column).Value = Worksheets( 5 ).Cells(find_val4.Row, 
fin_plan_val2.Column).Value Then
    L_check = "False"
    Worksheets( 1 ).Cells(r, pl_cat_dr.Column).Value = pl_type
Else
    check_Cat2 = "True"
End If



Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
22.05.2009, 15:40
| Ответить | Цитировать | Написать  
15 сообщений из 15, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Val
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&fpage=158&tid=2160960]:
 0ms
get settings:
 6ms
get forum list:
 30ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 28ms
get topic data:
 10ms
get forum data:
 3ms
get page messages:
 67ms
get tp. blocked users:
 1ms
others: 220ms
total:  371ms
созд. / загр.: 371ms
x
x
Закрыть


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