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