じゃ、Formula プロパティは？ - 徒然なるままに MS Excel（たまにOffice）

"長〜〜〜〜〜い文字列"シリーズ（其の弐）
（Excel2007では 8222文字以上、Excel2003以下では、1025文字以上）
　
｢Textプロパティは見た目どおり？｣には書きませんでしたが、セルの値を取得するプロパティには、
　Formula プロパティ
ってのもあります。
これは、数式バーに入っているもの　と思っていれば、ほぼ大丈夫です。
　
また、｢ほぼ｣かよ！
って、そうなんです。
　
これは、Text プロパティとは違って、"長〜〜〜〜〜い文字列"がセルに入っているとエラーになります。
　
一応、実験用のコードも書いておきます。
例によって、

Sub Macro1()
　　Dim rngA As Range

　　Set rngA = ActiveSheet.Range("A1")
　　rngA.ColumnWidth = 100
　　rngA.WrapText = True
　　rngA.Value = String(1023, "A") & "BC"
End Sub

を実行します。
これで、セルA1の数式バーに、Aがだっ〜と連なって最後のBC と入っているのが見えるはずです。

で、数式バーの中身をとったれと思って、

Sub Macro2()
　　Debug.Print ActiveSheet.Range("A1").Formula
End Sub

を書いて、実行すると、、、

　実行時エラー '1004':
　アプリケーション定義またはオブジェクト定義のエラーです。

というそっけないエラーになってしまいます。
　
なお、この実験用コードは、Excel97 〜 2003 用です。
　
※.Excel World の 2007年5月1日 22:46 の日記をコピーしています。
http://excel.sns.fc2.com/excel/