Как обратиться к определенному символу строки

[Алекс7]

Ести программа, она считывает из файла и обрабатывает строки, а затем записывает в ячейки. Вот строка

28'942.80

нужно удалить ' и преобразовать в число, т е вместо . поставить ,

и получить

28942,80

Есть ли функция которая удаляет символ в строке и ствигает ее?

Dim sum1 As Range, sum As String
Dim ifor As Integer
sum1 = Mid(s, 80, 50)
sum1 = Trim(sum1)
sum = sum1
For ifor = 0 To Len(sum)
If sum1.Chars(ifor) = "." Then
sum1.Chars(ifor) = ","
End If
Next ifor
Set sum1 = sum1(2)
End Sub

[Watcher_1]

Для замены символов есть оператор Replace (введите его в редакторе VBA И увидите синтаксис)
Для преобразования в число используйте оператор CDbl

[Казанский]

Попробуйте

val(replace("28'942.80","'",""))

Val работает с десятичным разделителем точка независимо от локали.

[doober]

Dim sum1 As Range, sum As String
Dim ifor As Integer
Dim sum as Currency
sum1 = Mid(s, 80, 50)
sum1 = Trim(sum1)

sum =Val( Replace(sum1,"'",""))
----------------------------

End Sub

[doober]

Казанский сегодня везде впереди

[Алекс7]

Ограмное спасибо за помощь!

Казанский, а можно еще вопрос: Как очистить столбцы в экселе?

[Казанский]

range("A:C").ClearContents ' очистить содержимое, сохранить формат
range("A:C").Clear ' очистить всё

См. также другие методы, которые начинаются на Clear