|
|
|
Замена символа
|
|||
|---|---|---|---|
|
#18+
Упарился в англ. хелпе искать. Вопрос простой. Код: mat = InputBox(Range("J" & строка), "Стоимость материалов =") Если ввожу дробную часть через точку то усе нормально. Он сам в ячейке заменяет на запятую. Если через запятую то число воспринимается как текст и арифмет. функции не работают. Как выглядит функция замены символа в VBA? В переменной mat хочу заменять запятую на точку. А перед этим есно проверять чего я там вбил . или , ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.03.2006, 12:24:16 |
|
||
|
Замена символа
|
|||
|---|---|---|---|
|
#18+
По поводу замены символа смотри Replace. А по поводу сроки ввода смотри переменную mat. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.03.2006, 12:28:27 |
|
||
|
Замена символа
|
|||
|---|---|---|---|
|
#18+
Спасиба! Посмотрю. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.03.2006, 12:30:43 |
|
||
|
Замена символа
|
|||
|---|---|---|---|
|
#18+
k-nikeПо поводу замены символа смотри Replace. А по поводу сроки ввода смотри переменную mat. Нет. Я помню, что была ф-ция которая выдавала номер позиции искомого символа. И была ф-ция которой можно было указать с какой позиции и на что заменить. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.03.2006, 12:37:49 |
|
||
|
Замена символа
|
|||
|---|---|---|---|
|
#18+
Эти ? ActiveCell.FormulaR1C1 = "=FIND(""b"",RC[-1],1)" Mid() ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.03.2006, 12:46:44 |
|
||
|
Замена символа
|
|||
|---|---|---|---|
|
#18+
5631Эти ? ActiveCell.FormulaR1C1 = "=FIND(""b"",RC[-1],1)" Mid() С Mid получается пробежать в цикле всю строку и проверить символы. Теперь с заменой ченить придумаю. Пасиба ! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.03.2006, 13:03:37 |
|
||
|
Замена символа
|
|||
|---|---|---|---|
|
#18+
Все получилось. Вот код mlen = Len(mat) newmat = "" For i = 1 To mlen a = Mid(mat, i, 1) If a = "," Then a = "." newmat = newmat & a Next i mat = newmat ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.03.2006, 13:06:34 |
|
||
|
Замена символа
|
|||
|---|---|---|---|
|
#18+
Для поиска в строке InStr ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.03.2006, 13:07:35 |
|
||
|
Замена символа
|
|||
|---|---|---|---|
|
#18+
авторDescription Returns a string in which a specified substring has been replaced with another substring a specified number of times. Syntax Replace(expression, find, replace[, start[, count[, compare]]]) The Replace function syntax has these named arguments: Part Description expression Required. String expression containing substring to replace. find Required. Substring being searched for. replace Required. Replacement substring. start Optional. Position within expression where substring search is to begin. If omitted, 1 is assumed. count Optional. Number of substring substitutions to perform. If omitted, the default value is –1, which means make all possible substitutions. compare Optional. Numeric value indicating the kind of comparison to use when evaluating substrings. See Settings section for values. Одна проблема. По-моему, она не поддерживается в 97 экселе. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.03.2006, 13:08:18 |
|
||
|
Замена символа
|
|||
|---|---|---|---|
|
#18+
mat = Replace(mat, ",", ".") ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.03.2006, 13:10:13 |
|
||
|
Замена символа
|
|||
|---|---|---|---|
|
#18+
Дмитmat = Replace(mat, ",", ".") Гдеж ты раньше был? Пасиба ! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.03.2006, 13:17:53 |
|
||
|
Замена символа
|
|||
|---|---|---|---|
|
#18+
k-nike ответил сразу, недожевал однако :) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.03.2006, 13:51:10 |
|
||
|
|

start [/forum/topic.php?fid=61&msg=33573494&tid=2185184]: |
0ms |
get settings: |
8ms |
get forum list: |
9ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
67ms |
get topic data: |
6ms |
get forum data: |
1ms |
get page messages: |
30ms |
get tp. blocked users: |
1ms |
| others: | 226ms |
| total: | 352ms |

| 0 / 0 |
