|
こんなのって可能でしょうか
シート1のB列に日付C列に得意先D列にオーダーE列に品名、F列に単価G列に数量H列に金額というようになっています。
オーダーというのは5桁で、01001、02001、03001、04001,05001、06001からそれぞれ始まるものです。
オーダーは、はじめの0が2010年の0で次の数字が分類を表す数字なのです。ランダムに約1500件の入力があります。
そこでお聞きしたいのです。シート2にオーダーで二桁目が1のものだけを抽出したいのです。曖昧検索で*1***で抽出しようと思ったら、1を含むものがすべて抽出されてしましました。こんなときにシート2でマクロボタンを押すと、二桁目が1のものだけ、抽出できるVBAって出来ますか。また、曖昧検索で*1***と等しくないという検索もできるかどうか知りたいです。
5桁のオーダー番号を入れて、そのデータを抽出するというのは出来ています。
シート2のD2にオーダーを入れて、抽出ボタンをおすと、A16行目以降にデータが抽出されます。
Sub データー抽出()
'
' データー抽出 Macro
' マクロ記録日 : 2009/12/11 ユーザー名 : 鉄道機器
'
'
Sheets("data").Range("A8:BC15000").AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Range("D1:D2"), CopyToRange:=Range("A16"), Unique:=False
End Sub
|
|