Excel VBA質問箱 IV

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

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


4310 / 76735 ←次へ | 前へ→

【78048】Re:別ファイルにあるセル範囲を配列に格納したい
質問  ayu  - 16/3/14(月) 6:25 -

引用なし
パスワード
   ▼β さん:
お世話になります。この前教えて頂いた事を元にやりたい事を色々試しているのですが、詰まってしまいましたので、再度質問させて頂きます。
教えて頂いた事を基に、別シートから項目名と合計数を抽出し、転記先のシートに下記のようにするとこるまではできました。このように奇数行が項目名で、偶数行が該当項目の合計数になっています。項目数は一定しておらず下記に表示してるより多い行もあります。

    A列    B列   C列  D列   E列   F列   G列    H列
1行目 S-Trim  M-Trim  SC-S  SC-ML Under12 Point   N/A    
2行目 32    10    3    7   0    0     0    
3行目 C-Re/VS  C-S   C-M  C-Semi C-L   C-SLong  N/A    
4行目 0     1    0    0   0    0     0    
5行目 HL-Half  HL-Full  HL-Point   N/A               
6行目 0     0    0    0                
7行目 STP-Re  STP-S  STP-M STP-Semi STP-L STP-SLong STP-Bang N/A
8行目 0     0    0    0   0    0     0    0  
9行目 BL-Dry   TR   Iron  N/A                
10行目 0     0    0    0                
11行目 C-Eyeblow Beard  Iron  Rinse  Shampoo Bang   N/A  
12行目 0     0    0    0   0    3     0    
この下にも何行か続きます。

上記の表から印刷用のフォーマットに数字をコピーしたいのですが、そのフォーマットが
メニュー名|数|メニュー名|数|メニュー名|数|メニュー名|数|メニュー名|数
のようになっており、この行が9行ありまして、上記のメニューと合計セットも9つあります。
この印刷用のフォーマットに合計数が0以上のメニュー名と合計数をコピーしたいのですが、その方法が分からず詰まっています。

例えば上の例でいくと下記のように表示したいです。(合計数が0のメニューは無視)

    A列  B列  C列  D列 E列 F列 G列 H列
1行目 S-Trim  32  M-Trim 10  SC-S 3  SC-ML 7
2行目 C-S    1
3行目 Shampoo  3
4行目 Bang    3

このようにするべく色々模索しておりますが、なかなか上手くいきません。お時間のある時にでも何かヒントでも頂けたら大変ありがたいです。
何度もすみませんが、宜しくご教示お願いいたします。

>▼ayu さん:
>
>>左側で指定したセル範囲に右側のA2のFormulaをコピーし、
>>右側のセル範囲の値を左側で設定したシートのセル範囲にコピーする
>>ということであってますでしょうか?
>
>A2のFormula というのが、ちょっと変ですけど、以下のようなことです。
>
>たとえばステップ実行はご存じでしょうか。
>VBE画面で、Sample2 の任意のところをクリックしてF8 を押します。
>最初は Sub Sample2() が黄色くハイライトされます。
>で、そのまま F8 を押していきます。
>  shT.Range("A1:F2").Value = shT.Range("A1:F2").Value
>ここが黄色くなったら F8を押さず、マクロブックの "転記先のシート名" をみてください。
>この A1:F2 に、元ブックを参照する参照式が入っています。
>
>式と表示されている値を確認したら、VBE画面に戻り End Sub まで F8 を押していって下さい。
>
>Sample がうまくいったということですから、同じ環境(フォルダやブック名やシート名)で実行すれば
>シートに参照式がセットされ、そこで参照している値がシートに表示されているはずなんですが。
2 hits

【77974】別ファイルにあるセル範囲を配列に格納したい ayu 16/2/22(月) 8:23 質問[未読]
【77975】Re:別ファイルにあるセル範囲を配列に格納... β 16/2/22(月) 9:12 発言[未読]
【77976】Re:別ファイルにあるセル範囲を配列に格納... β 16/2/22(月) 9:19 発言[未読]
【77977】Re:別ファイルにあるセル範囲を配列に格納... β 16/2/22(月) 9:35 発言[未読]
【77978】Re:別ファイルにあるセル範囲を配列に格納... β 16/2/22(月) 9:44 発言[未読]
【77979】Re:別ファイルにあるセル範囲を配列に格納... β 16/2/22(月) 13:13 発言[未読]
【77982】Re:別ファイルにあるセル範囲を配列に格納... ayu 16/2/23(火) 5:45 お礼[未読]
【78001】Re:別ファイルにあるセル範囲を配列に格納... ayu 16/3/3(木) 10:55 質問[未読]
【78002】Re:別ファイルにあるセル範囲を配列に格納... β 16/3/3(木) 11:36 発言[未読]
【78020】Re:別ファイルにあるセル範囲を配列に格納... ayu 16/3/7(月) 7:43 お礼[未読]
【78048】Re:別ファイルにあるセル範囲を配列に格納... ayu 16/3/14(月) 6:25 質問[未読]
【78049】Re:別ファイルにあるセル範囲を配列に格納... β 16/3/14(月) 9:30 発言[未読]
【78050】Re:別ファイルにあるセル範囲を配列に格納... β 16/3/14(月) 16:19 発言[未読]
【78051】Re:別ファイルにあるセル範囲を配列に格納... ayu 16/3/15(火) 9:13 お礼[未読]

4310 / 76735 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free