|
▼Jaka さん:
>こんにちは。
>パッと見ですが
>>Left(Cells(R, 2), 4) <> "2004"
>これって、日付の年号ですか?
>日付だとしたら、表示形式で日付としているのでしょうか?
はい、そのとおりです。
>グラフって、コードだけ提示されても非常に解りにくいです。
>出来たら、グラフに使ったデータなども記載してくれると、再現しやすいし回答者にも伝わりやすいと思うんですけど....。
>回答者にコード読んで、自分でデータ作くれっていわれてもねぇ!
説明が下手で、すみません。
本当に必要な個所だけ抜き出したほうがよかったですね。
Cells(R, C).Value = FormInput.TextKora
Cells(R, C + 1).Value = FormInput.TextZencyo
Selection.NumberFormatLocal = "0"
Cells(R, C + 2).Value = FormInput.TextWeight
Selection.NumberFormatLocal = "0"
Cells(R, C + 3).Value = FormInput.TextComment
Selection.NumberFormatLocal = "0"
↑↑ここだけみてもらったほうがわかりやすかったでしょうか?
簡単なモジュールを作れば誤解されなくてよかったですね。ごめんなさい。
|
|