EXCELで文字列数字を入力したい

解決

印刷屋  2010-08-16 11:46:10  No: 38990  IP: 192.*.*.*

TExcelApplicationでエクセルのセルに文字列数字を入力したいのですが、
自分では解決できなかったので教えていただけませんか？
よろしくお願いします。
商品コードなんで前の零を省かれると問題なんです。

for cnt := 0 to EndCnt do
begin
  ExcelWorkSheet.Cells.???   <= ここでセルの文字列化設定をしたい
  ExcelWorkSheet.Cells.Item[cnt,1].Value := '000001みたいな';
end;

編集 削除
igy  2010-08-16 12:49:33  No: 38991  IP: 192.*.*.*

試していませんが、
NumberFormatLocal に '@'
したら、どうなりますか？

編集 削除
igy  2010-08-16 12:57:00  No: 38992  IP: 192.*.*.*

訂正です。
×：したら、どうなりますか？
○：を設定したら、どうなりますか？

編集 削除
HOta  2010-08-17 10:33:41  No: 38993  IP: 192.*.*.*

Excelで文字列として数字を入れるのに、カンマを付けますね。
ですから、
ExcelWorkSheet.Cells.Item[cnt,1].Value := '''000001';
としたらどうでしょう。

編集 削除
Fusa  2010-08-18 09:46:37  No: 38994  IP: 192.*.*.*

文字の先頭に入れる記号はカンマではなく、シングルクウォーテーションではないでしょうか。

編集 削除
HOta  2010-08-18 10:04:57  No: 38995  IP: 192.*.*.*

済みません。
まちがえました。
シングルクウォーテーションです。

編集 削除
印刷屋  2010-08-18 22:59:10  No: 38996  IP: 192.*.*.*

すいません。厳密に言うとStringGird.Cells[*,*]を代入するんですが、シングルクォーテーションを入れようとしたら’’’三連チャンは記述できませんでした。
どうすればいいのでしょう。

編集 削除
igy  2010-08-18 23:46:24  No: 38997  IP: 192.*.*.*

:= '''' + StringGird.Cells[*,*];
で、いかがですか？

編集 削除
ゆたっピー  2010-08-19 06:31:20  No: 38998  IP: 192.*.*.*

ExcelWorkSheet.Cells.Item[cnt,1].Value :=chr(39)+'000001';
はどうでしょうか？

編集 削除
印刷屋  2010-08-19 21:52:08  No: 38999  IP: 192.*.*.*

みなさんありがとうございます。

igyさんとゆたっピーさんの方法両方できました。
ただ数式バーには'000001って残ってました。
とりあえず、この方法で行きたいと思います。

編集 削除