| |
▼りお さん：
>お忙しい中、ありがとうございます！
>
>やってみたのですが
>型が一致しませんというエラーが出てしまいます。
>コンパクトなコードも教えていただいたので
>もう少しやってみます。
[#41491]と[#41597]では、大きくアルゴリズムが変わっているわけでは
ありませんから、[#41491]でエラーが発生するなら、[#41597]でも
発生する可能性は大です。
で、こういう場合は、
１．新規ブックにて提示コードを確認すること。
りお さんが抱えている作業中のブックでなく、
新規ブックにコードをコピーして実行してみること。
これは、少しでも私とりお さんが同じブックを見るためです。
２．このコードには、入力データがありますよね？
アクティブシートの セルＡ２、Ｂ２、Ｃ２ですね？
エラーが発生した場合は、
入力データがｘｘｘｘｘの時、提示コードを実行すると、
ＹＹＹＹＹＹＹＹＹＹＹ
という箇所で「ＺＺＺＺＺＺＺＺ」というエラーが発生し、プログラムが
停止してしまいます。
というような記述をしてください。
だって、そうしないと私が再現できませんので・・・。
「型が一致しません」というエラーでプログラムが停止してしまう場合を再現すると
セルＡ２に 5
セルＢ２に ８月
セルＣ２に ４月
なんて入力して、[#41491] 及び、[#41597]を実行すると、
確かに「型が一致しません」というエラーが
stm = Range("b2").Value - 1
（[#41597]の場合）で発生します。
この入力データであるセルＡ２、Ｂ２、Ｃ２には、あくまでも数値です。
（セルの書式は標準書式で試してください）
月という単位は付きません。
型が一致しません というエラーで思いつくのはこの例ですが、
他の例でしたら、再現手順をお願いします。
|
|
ichinose
- 06/8/16(水) 8:31 -
