エクセルＶＢＡについて質問です。ＶＢＡを初めて１カ月くらいなので、簡単

質問

エクセルＶＢＡについて質問です。ＶＢＡを初めて１カ月くらいなので、簡単な質問かもしれませんが、よろしくお願いします。

Cells(1, 1).Value = "'1／" + TextBox1.Value

上のコードの"'1／"の部分で質問なのですが、例えばTextBox1.Value=2の場合、セルＡ１には「１／２」と表示されます。そしてこの「１／２」を数式として扱おうとするとエラー(#VALUE!)になります。その原因はセルＡ１をクリックすると、メニューとシートの間にある「fx」の右側の部分に「'１／２」と表示されているからだと思うのですが…。
これを数式として扱う何か良い方法はありませんか？シートを扱って解決するのではなくＶＢＡを扱って解決したいのですが…。

回答No.2

ka_na_de · ベストアンサー

こんばんは。

こういうことですか？

はずしてる予感がします。

Sub test()
　　Cells(1, 1).Value = "'1／" + TextBox1.Value
　　Cells(2, 1).Formula = "=" & StrConv(Cells(1, 1).Value, vbNarrow)
End Sub

お礼

回答ありがとうございます。
これでとりあえずなんとかなりそうです(^^)

回答No.1

nattocurry

文字列として扱ってるので、数値として扱うことは出来ません。
数式の中で、1/TextBox1.Value とするしかないでしょうね。

お礼

そうですか…。回答ありがとうございましたm(__)m