Excel VBA質問箱 IV

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

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


20793 / 76732 ←次へ | 前へ→

【61351】Re:オートフィルタ抽出したデータをコピーしたい
お礼  aribaba  - 09/4/29(水) 13:58 -

引用なし
パスワード
   ▼かみちゃん さん:
>こんにちは。かみちゃん です。
>
>> 枚数6から50までになるときはどうすればよろしいですか?
>
>意味が全くわかりません。
>枚数6から50までのときどうなってほしいのかの説明が一切ないからです。
>
>> 枚数6から50まで7段階で分けてしたい。枚数5枚でひとつのボダンにしたい
>
>これも意味がわかりません。
>7段階とは何ですか?
>5枚でひとつのボタンとは?
>
>もっとしたいことを詳しく説明しないと誰もわかりませんよ。
>レスが私以外つかないのも、その所為かもしれません。
>
>ただ、繰り返し処理と分岐処理のことだけをいえば、
>For intData = 2 To 4
>を
>For intData = 6 To 50
>と、
>Case 2
>の部分を
>Case 6
>などと、L列の値によって分岐するように記述します。
>
>For 〜 Next
>と
>Select Case
>のヘルプを確認してください。
>
>> Set rngData = WS1.Range("A1", rngLast.Offset(, 17))
>> このコードは17の数字の意味よくわかりません
>
>Offsetプロパティのヘルプは確認されていますか?
>(少し説明が難しいのかもしれませんが・・・)
>
>Range("$A$1:$R$1552").AutoFilter
>という記述をされていたので、A1セルから、A列の最終行の17行右方向のセルまでの範囲
>と理解したので、このようなコードになっています。
>
>Set rngData = WS1.Range("A1:R1").Resize(rngLast.Row)
>としたほうがよかったでしょうか?
>
>※【再度のお願いです】
>投稿の際、引用は、最低限のものだけで結構です。
>スレッド全体を見ればわかることですので。
>また、[名前なし]さんは、aribabaさんだったのですか?
>それであれば、60977 のご質問とダブっていますので、向こうは、解決済みにして
>おいていただけませんか?

本当にありがとうございました。無事にうまくできました。

1 hits

【60970】オートフィルタ抽出したデータをコピーしたい [名前なし] 09/3/28(土) 19:27 質問
【60971】Re:オートフィルタ抽出したデータをコピー... かみちゃん 09/3/28(土) 19:35 発言
【60972】Re:オートフィルタ抽出したデータをコピー... [名前なし] 09/3/28(土) 22:31 発言
【60973】Re:オートフィルタ抽出したデータをコピー... かみちゃん 09/3/28(土) 22:46 発言
【60974】Re:オートフィルタ抽出したデータをコピー... [名前なし] 09/3/28(土) 23:36 質問
【61037】Re:オートフィルタ抽出したデータをコピー... aribaba 09/4/5(日) 10:31 質問
【61038】Re:オートフィルタ抽出したデータをコピー... かみちゃん 09/4/5(日) 12:02 発言
【61040】Re:オートフィルタ抽出したデータをコピー... aribaba 09/4/5(日) 16:29 発言
【61041】Re:オートフィルタ抽出したデータをコピー... かみちゃん 09/4/5(日) 16:54 発言
【61042】Re:オートフィルタ抽出したデータをコピー... aribaba 09/4/5(日) 17:23 お礼
【61039】Re:オートフィルタ抽出したデータをコピー... かみちゃん 09/4/5(日) 12:43 発言
【61043】Re:オートフィルタ抽出したデータをコピー... aribaba 09/4/5(日) 17:51 質問
【61044】Re:オートフィルタ抽出したデータをコピー... aribaba 09/4/5(日) 17:53 質問
【61045】Re:オートフィルタ抽出したデータをコピー... かみちゃん 09/4/5(日) 18:27 発言
【61351】Re:オートフィルタ抽出したデータをコピー... aribaba 09/4/29(水) 13:58 お礼

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