- Excel VBA 質問スレ Part39 [転載禁止]©2ch.net
823 ：デフォルトの名無しさん[sage]：2016/02/10(水) 16:54:10.35 ID:YqpZzmVY - すいません、教えてください。
毎日使っているマクロで最近エラーが出るようになりました。
コードの一部を下に貼ります。
C=Range・・・(中略)の行で「実行時エラー '6' オーバーフローしました」が出てしまいます。
Dim C As Variant
LastRow = SourceWS.Cells(Rows.Count, "B").End(xlUp).Row
FirstRow = SourceWS.Cells(LastRow, "B").End(xlUp).Row
C = Range(SourceWS.Cells(FirstRow, "A"), SourceWS.Cells(LastRow, "J"))
|
- Excel VBA 質問スレ Part39 [転載禁止]©2ch.net
824 ：823[sage]：2016/02/10(水) 16:58:27.84 ID:YqpZzmVY - その他の情報を追記します。
変数のSourceWS、LastRow、FirstRowには正しく格納されていることを確認しています。
ちなみにLastRowは200000ぐらいでした（これは日によって変わります。10万以上であることがほとんど)
|
- Excel VBA 質問スレ Part39 [転載禁止]©2ch.net
825 ：823[sage]：2016/02/10(水) 17:08:28.76 ID:YqpZzmVY - 追記
A列のセルは今までは空欄でした。
つい最近からA列には整数を格納するように変更しました
(GetTickCountで取得した整数です)
恐らくこの変更が影響していると思うのですが原因がわかりません。
どなたかヒントをお願いします。
|
- Excel VBA 質問スレ Part39 [転載禁止]©2ch.net
827 ：デフォルトの名無しさん[sage]：2016/02/10(水) 20:20:29.77 ID:YqpZzmVY - >>826
すみません。どこがおかしいかわかりません。
変数Cに格納する行範囲をB列で判断しているのですが・・・
その行範囲のA列からJ列をバリアント配列Cに格納し、
その後他のブックに貼り付けています。
|
- Excel VBA 質問スレ Part39 [転載禁止]©2ch.net
836 ：823[sage]：2016/02/10(水) 23:15:33.87 ID:YqpZzmVY - FirstRowは2であることが多いです。
今回エラーが発生した時の、行数は約20万､列数はA〜Jの10列なので要素数としては約200万でした。
|
- Excel VBA 質問スレ Part39 [転載禁止]©2ch.net
846 ：823[sage]：2016/02/10(水) 23:33:40.88 ID:YqpZzmVY - なんか私の質問で荒れ気味になってしまって申し訳ないです。
>>845
最初に書いてなくてすみません。
エクセル2010でxlsmです。
|
- Excel VBA 質問スレ Part39 [転載禁止]©2ch.net
847 ：823[sage]：2016/02/10(水) 23:36:48.09 ID:YqpZzmVY - >>841
常駐ソフト停止することを試していませんが、
それならば、メモリが不足しています、のエラーになるかと。
オーバーフローというのが解決のヒントかと個人的には思います。
|
- Excel VBA 質問スレ Part39 [転載禁止]©2ch.net
849 ：デフォルトの名無しさん[sage]：2016/02/10(水) 23:38:29.98 ID:YqpZzmVY - >>848
なんかワロたｗ
|
- Excel VBA 質問スレ Part39 [転載禁止]©2ch.net
852 ：デフォルトの名無しさん[sage]：2016/02/10(水) 23:49:30.85 ID:YqpZzmVY - >>850
GetTickCountの値：
→190423431〜217241781
Declare文の宣言はどうなってますかね：
→Declare Function GetTickCount Lib "KERNEL32.DLL" () As Long
|