WindowsXP の過去ログです　検索窓で過去ログ検索できます

パソコントラブル解決・過去ログ  >  WindowsXP ログ　;>　他OSの検索

エクセルマクロで変数を使用したフィルターのしかた

◇-エクセルマクロで変数を使用したフィルターのしかた-善さん(2003/2/25-19:57)No.21807
　┗Re:エクセルマクロで変数を使用したフィルターのしかた-Discovery(2003/2/25-23:19)No.21827
　　┗Re:エクセルマクロで変数を使用したフィルターのしかた-Discovery(2003/2/25-23:30)No.21831
　　　┗Re:エクセルマクロで変数を使用したフィルターのしかた-善さん(2003/2/26-13:11)No.21884
　　　　┗Re:エクセルマクロで変数を使用したフィルターのしかた-Discovery(2003/2/26-23:26)No.21947
　　　　　┗Re:エクセルマクロで変数を使用したフィルターのしかた-善さん(2003/2/27-08:20)No.21987

▲このページのトップに戻る

21807	エクセルマクロで変数を使用したフィルターのしかた	善さん	2003/2/25-19:57
ＯＳ名：WindowsXp パソコン名：FMV6000SL ソフト名：エクセル エクセルのマクロで，変数を使用して， その変数を含むフィルターを，かけたいのですが， うまく行きません。 出来るのか，出来ないのかも分かりません。 以下に，マクロの内容を記述いたします。 Dim 製番 As Variant 　　 製番 = ActiveCell.Value Selection.AutoFilter Selection.AutoFilter Field:=1, Criteria1:="=*製番*" ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Selection.AutoFilter Field:=1 変数（製番）を定義して，その変数（製番）にセル内の文字を 代入し，その変数を含む内容でフィルターをかけて， 印刷したいのですが，うまく行きません。 変数に入れるのは文字列で半角英数字です。 宜しくお願いします。

▲このページのトップに戻る

21827	Re:エクセルマクロで変数を使用したフィルターのしかた	Discovery	2003/2/25-23:19
記事番号21807へのコメント 善さんさんは No.21807「エクセルマクロで変数を使用したフィルターのしかた」で書きました。 >ＯＳ名：WindowsXp >パソコン名：FMV6000SL >ソフト名：エクセル >エクセルのマクロで，変数を使用して， >その変数を含むフィルターを，かけたいのですが， >うまく行きません。 >出来るのか，出来ないのかも分かりません。 >以下に，マクロの内容を記述いたします。 > > Dim 製番 As Variant >　　 製番 = ActiveCell.Value > > Selection.AutoFilter > Selection.AutoFilter Field:=1, Criteria1:="=*製番*" > ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True > Selection.AutoFilter Field:=1 > >変数（製番）を定義して，その変数（製番）にセル内の文字を >代入し，その変数を含む内容でフィルターをかけて， >印刷したいのですが，うまく行きません。 >変数に入れるのは文字列で半角英数字です。 selection　を　ヘルプで引く事 activecellつまりセレクションの挿すセルは何処なのか　 はどこか　検索するいちは何処？？ パラメーター与えるとこをフィルタしたってしょうがないよね

▲このページのトップに戻る

21831	Re:エクセルマクロで変数を使用したフィルターのしかた	Discovery	2003/2/25-23:30
記事番号21827へのコメント Discoveryさんは No.21827「Re:エクセルマクロで変数を使用したフィルターのしかた」で書きました。 もう一ちょ Criteria1:="=*製番*" 変数になってる製番をなぜ”でくくるのかな？ それとも　＝*なんか*　ってなのを条件にするのかな？

▲このページのトップに戻る

21884	Re:エクセルマクロで変数を使用したフィルターのしかた	善さん	2003/2/26-13:11
記事番号21831へのコメント Discoveryさんは No.21831「Re:エクセルマクロで変数を使用したフィルターのしかた」で書きました。 >Discoveryさんは No.21827「Re:エクセルマクロで変数を使用したフィルターのしかた」で書きました。 > >もう一ちょ >Criteria1:="=*製番*" > >変数になってる製番をなぜ”でくくるのかな？ >それとも　＝*なんか*　ってなのを条件にするのかな？ > Discoveryさんお忙しいところありがとうございます。 おっしゃる通りです。 例えば，製番にLA5467DDを代入した場合， LA5467DD50とかBLA5467DD70をフィルターをかけて 出して印刷するのに，製番を含む条件として 　＝*製番*　を条件にしたいのですが？ LA5467DDに相当するものがいくつもありますので， マクロで処理したいのです。 言葉足らずでした。 すいません。素人が見よう見真似でやっているので No.21827の内容はヘルプを見てもよく解りませんでした。

▲このページのトップに戻る

21947	Re:エクセルマクロで変数を使用したフィルターのしかた	Discovery	2003/2/26-23:26
記事番号21884へのコメント 善さんさんは No.21884「Re:エクセルマクロで変数を使用したフィルターのしかた」で書きました。 >製番 = ActiveCell.Value ActiveCell.Value　は選択されているセルの値をとります >Selection.AutoFilter >Selection.AutoFilter Field:=1, Criteria1:=製番 >ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True >Selection.AutoFilter Field:=1 又、selection　は現在選択されているセルの範囲を返します つ〜事は選択してるセルをフィルタしてることになります Selection　をやめて　range　で指定してやればいいでしょう あとは *製番*　てなのを与えてやりたければ 製番　＝　"*"　&　製番　&　"*"　のようなのを入れればいいです

▲このページのトップに戻る

21987	Re:エクセルマクロで変数を使用したフィルターのしかた	善さん	2003/2/27-08:20
記事番号21947へのコメント Discoveryさんは No.21947「Re:エクセルマクロで変数を使用したフィルターのしかた」で書きました。 >善さんさんは No.21884「Re:エクセルマクロで変数を使用したフィルターのしかた」で書きました。 > > >>製番 = ActiveCell.Value > >ActiveCell.Value　は選択されているセルの値をとります > >>Selection.AutoFilter >>Selection.AutoFilter Field:=1, Criteria1:=製番 >>ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True >>Selection.AutoFilter Field:=1 > >又、selection　は現在選択されているセルの範囲を返します >つ〜事は選択してるセルをフィルタしてることになります > >Selection　をやめて　range　で指定してやればいいでしょう > >あとは >*製番*　てなのを与えてやりたければ >製番　＝　"*"　&　製番　&　"*"　のようなのを入れればいいです > > Discoveryさんお忙しいところ，ありがとうございます。 早速，試してみます。

パソコントラブル解決・過去ログ  >  WindowsXP ログ  >  エクセルマクロで変数を使用したフィルターのしかた

「何か一言」を書く

A1.本ページは参考になりましたか？　又はアドバイスがありますか？ 解決　参考になった　参考にならなかった　アドバイスする A2.何度目の訪問ですか？ 初めて　　数度目　５回以上来ている　　 管理人: A3.何か一言どうぞ(アドレスは書くことができません) A4.アドレスがあればどうぞ(１つまで) ↑↑↑↑よろしければ押してください↑↑↑↑

何か一言(本ページで参考になったならないを含めて残してあります)
◎：解決　○：参考になった　×：参考にならなかった　！：アドバイスあり

参考	回数	投稿日時	何か一言

Facebookコメントを書く/読む