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

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

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

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

No.2 ベストアンサー 回答者： ka_na_de 回答日時： 2010/03/04 22:58

こんばんは。

こういうことですか？

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

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

この回答へのお礼

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

お礼日時：2010/03/04 23:43

No.1 回答者： nattocurry 回答日時： 2010/03/04 21:57

文字列として扱ってるので、数値として扱うことは出来ません。

数式の中で、1/TextBox1.Value とするしかないでしょうね。

この回答へのお礼

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

お礼日時：2010/03/04 23:44