【補足を観て】 >その行すべてをコピーはできるのでしょうか? r.Resize(, 2).Copy rr を r.EntireRow.Copy rr >例えば、”A”で選択したとき~ .AutoFilter 1, ComboBox1.Value .AutoFilter 2, ComboBox2.Value を .AutoFilter 1, "*" & ComboBox1.Value & "*" .AutoFilter 2, "*" & ComboBox2.Value & "*" に変更して下さい。 -------------------------------- シート1で抽出された結果をシート2に書き込みます。 それぞれのシートの1行目は項目行とします。 Private Sub CommandButton1_Click() Dim r As Range Dim rr As Range A
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く