Excel VBA質問箱 IV

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

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


37964 / 76732 ←次へ | 前へ→

【43914】オートフィルで抽出したデータを1件だけコピーするには?
質問  陸遜  - 06/10/29(日) 18:38 -

引用なし
パスワード
    現在ボランティアで会計を担当しているのですが、決算報告書を作成する
ためにマクロを組みたいと考えております。そこで、皆様方のご教示をお願い
いたします。
 毎月末に各月ごとの実績を自動で作るプログラムを使用しております。
 そこで、このシートから科目を一件だけ抽出して金額を別シートの報告書の方にコピーするといった作業をしたいと考えております。
 でも、実績がない月には、当然科目も出てこないので、特定の科目がどの行
にくるのかわかりません。そのため、オートフィルタで抽出したものをコピー
する場合には、columunを使ってコピーするしかない状態です。でも、報告書
のほうにコピーする場合は、とても都合が悪いので、できれば取り出したものを
一軒だけコピーすることにしたいのです。
 たとえば、電気料の科目を抽出して、C列の金額だけ一件をコピーしたいのです。currentregion等を使用してもうまくいきませんでしたが、なにかいい方法
はないでしょうか?

 
シート名:10月実績

 A列   B列  C列  
 支出科目 債主  金額 

 電気料  ○○電力 5000
 会議費  ○△会館 3200


現在のマクロ
 Selection.AutoFilter Field:=26, Criteria1:="=*電気料*"
 Range("Z:Z").Select
  Selection.Copy _
  Destination:=Worksheets("報告書").Range("B2")

1 hits

【43914】オートフィルで抽出したデータを1件だけコピーするには? 陸遜 06/10/29(日) 18:38 質問
【43915】Re:オートフィルで抽出したデータを1件だ... かみちゃん 06/10/29(日) 18:50 発言
【43918】Re:オートフィルで抽出したデータを1件だ... 陸遜 06/10/29(日) 19:15 質問
【43922】Re:オートフィルで抽出したデータを1件だ... かみちゃん 06/10/29(日) 20:00 発言
【43923】Re:オートフィルで抽出したデータを1件だ... 陸遜 06/10/29(日) 20:25 質問
【43924】Re:オートフィルで抽出したデータを1件だ... かみちゃん 06/10/29(日) 20:46 発言
【43926】Re:オートフィルで抽出したデータを1件だ... 陸遜 06/10/29(日) 21:48 質問

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