Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
13621 / 76738 ←次へ　｜　前へ→
【68620】Re:動的配列の初期化について
発言  ｍｏｍｏ  - 11/3/30(水) 15:13 -
引用なし
パスワード
   ▼Tacchi さん：

最初に最大数のMaxR分で配列を確保しておいて
最後にデータがあった分のz-1の大きさに変えてあげたらどうでしょう？

ReDim MyData(MaxR)
z = 0
For q = 3 To MaxR
　　・
　　・
　MyData(z) = MyVal
　z = z + 1
　　・
　　・
Next q
ReDim Preserve MyData(z - 1)

データがあったかどうかは

Ubound(MyData)をする前に
If z > 0 then なんかで判定できますね。
0 hits
▼ 【68618】動的配列の初期化について Tacchi 11/3/30(水) 14:11 質問
【68619】Re:動的配列の初期化について Tacchi 11/3/30(水) 14:31 質問
【68620】Re:動的配列の初期化について ｍｏｍｏ 11/3/30(水) 15:13 発言≪
【68657】Re:動的配列の初期化について Tacchi 11/4/3(日) 15:35 質問
【68695】Re:動的配列の初期化について ｍｏｍｏ 11/4/7(木) 10:13 発言
【68623】Re:動的配列の初期化について neptune 11/3/30(水) 16:24 回答
【68626】Re:動的配列の初期化について neptune 11/3/30(水) 23:25 回答
【68658】Re:動的配列の初期化について Tacchi 11/4/3(日) 15:39 お礼
【68627】Re:動的配列の初期化について 角田 11/3/31(木) 0:31 回答
【68659】Re:動的配列の初期化について Tacchi 11/4/3(日) 15:43 お礼
【68628】Re:動的配列の初期化について Yuki 11/3/31(木) 10:08 発言
【68662】Re:動的配列の初期化について Tacchi 11/4/3(日) 16:00 お礼
【68634】Re:動的配列の初期化について UO3 11/3/31(木) 13:46 発言
【68660】Re:動的配列の初期化について Tacchi 11/4/3(日) 15:50 お礼
【68640】Re:動的配列の初期化について Hirofumi 11/3/31(木) 18:36 回答
【68642】Re:動的配列の初期化について Hirofumi 11/3/31(木) 20:29 回答
【68661】Re:動的配列の初期化について Tacchi 11/4/3(日) 15:58 お礼
【68696】解決済みですが。 Jaka 11/4/7(木) 12:36 発言
【68697】かぶっていたけど、まいっか。 Jaka 11/4/7(木) 12:50 発言
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
13621 / 76738 ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free