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