преобразование в число

[Алена]

не могу значение в ячейки преобразовывать в числовое или в текстовое. ессесвенно с помощью VBA
Заранеее спасибо

[Konst_One]

Clng()
CInt()
CDbl()
CStr()
и тд и тп

[d3drm]

CStr - явно не в число переводит =) Полагаю там CSng должно быть. Кста, Val есть еще.

[Konst_One]

в числовое или в текстовое

[d3drm]

а ну да, был невнимателен, sorry =) только ведь значение оно и так числовое или строковое, разве нет?

[tyomitch]

а ну да, был невнимателен, sorry =) только ведь значение оно и так числовое или строковое, разве нет?

Неа, ещё варианты бывают

[Алена]

Что-то не получается. Хочу в exele одной ячейки предать текстовое значение, а другой числовое, спомощью VBA
Еще один вопрос как сделать, чтобы после срабатывания макроса можно было бы в exele сделать отмену. Кнопка отмены не активна у меня почему-то

[Konst_One]

попробуй написать этот вопрос в форум по VBA

и что значит

одной ячейки предать текстовое значение, а другой числовое

[Konst_One]

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

[SHURUP]

Код: Выделить всё

Sub Макрос2()
' Макрос2 Макрос
' Макрос записан 27.06.2005 (Сирик)
    With Range("E9")
        .FormulaR1C1 = "это текст"
        .NumberFormat = "@"
    End With
   
    With Range("F9")
        .NumberFormat = "0.00"
        .FormulaR1C1 = "5"
        .AddComment
        .Comment.Text Text:="А тут хранится число в формате с двумя знаками после запятой"
    End With
   
    With Range("G9")
        .NumberFormat = """ID""0000"
        .FormulaR1C1 = "1"
        .AddComment
        .Comment.Text "специфический Формат"
    End With
End Sub

[Алена]

Спасибо, ребята! пошла пробывать