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

◇-エクセルマクロで変数を使用したフィルターのしかた-善さん(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

「何か一言」を書く Facebookコメントができます

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

21807	エクセルマクロで変数を使用したフィルターのしかた	善さん	2003/2/25-19:57
OS名：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「エクセルマクロで変数を使用したフィルターのしかた」で書きました。 >OS名：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さんお忙しいところ，ありがとうございます。早速，試してみます。

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

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

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