| |
▼Asaki さん：
お返事本当にありがとうございます。
もし、どなたでもおわかりになる方でしたら、教えてください。
1.毎日あるシステムから3000行くらいのデータ−を落としてきて、Ａの列に
該当する言葉がある場合、それを削除していく作業を自動化したいのです。
その際、Ａ列に該当する言葉がたくさんある場合、以下に頂いたマクロを
繰り返していけばいいのでしょうか？
2.違うシートにマクロを組んでおいて、毎日ある一定の名前のシートでダウンロードした
データ−を作業するマクロを見たい場合、With ActiveSheetのところに
Windows("シート名.xls").Activateを入れれば大丈夫でしょうか？
よろしくお願いします。
>Sub test()
> With ActiveSheet
> .AutoFilterMode = False
> .Cells(1, 1).AutoFilter Field:=1, Criteria1:="=*証明*", Operator:=xlAnd
> With .AutoFilter.Range
> .Resize(.Rows.Count - 1).Offset(1).EntireRow.Delete Shift:=xlUp
> End With
> .AutoFilterMode = False
> End With
>End Sub
|
|
法律事務所
- 04/8/7(土) 20:21 -
