|
▼ichinose さん:
おはようございます。
ありがとうございます。そして失礼しました。
WindowsとOfficeのバージョン
EXCEL2000(Win98)です。
サンプルは全く同じものを使っております。
多分変数の設定で引っかかっているように感じます。
変数の抜けているものがありましたら、明示していただけませんでしょうか。
msgbox vartype(ans) '←とした場合、何が表示されますか?
特に変動はありません。
やはり
If UBound(ans) > maxbnd Then maxbnd = UBound(ans)の列で
配列がありません のコンパイルエラーが発生します。
>
>・「get_num_value」というFunctionの訂正前、後のコード、それとも
> 両方でエラーが発生していますか?
両方をしていません。訂正後のコードでしています。
>・エラーを確認した元データはどんなものでしょうか?
>
>注番 部番 日付A 日付B
>1 あ 2005/7/1 2005/7/2
>1 あ 2005/7/2 2005/7/3
>1 い 2005/7/1 2005/7/2
>2 あ 2005/7/3 2005/7/4
>2 う 2005/7/4 2005/7/5
>2 う 2005/7/5 2005/7/6
>2 う 2005/7/6 2005/7/7
>
>kさんが提示されている上記のようなデータではどうでしょうか?
>それとも違うデータですか?
>それを教えてください。
同じデータを使っています。
>EXCEL2000(Win98),2002(Win2000)でいくつかサンプルを作成して
>確認しましたが、再現はできませんでした。
もう少しテストしてみます。
変数の設定で最初からひっかかりました。
抜けている変数が有りました明示していただけませんでしょうか。
では、また夜に見させていただきます。
失礼します。
|
|