自分へのメモ BluePrism Excelでフィルタをかける
はこふぐです。
BluePrismでExcelでフィルタをかける実装をMS Excel VBOの拡張で行う場合の実装例。
AddFilterアクションの簡単な例
handle いつものやつ
TargetRange:表の開始位置を指定
Field:何番目の列でフィルタするか(1始まり)
Criteria1:フィルタ条件
AddFilterの中身
コードステージAddFilterの中身
Dim excel as Object = GetInstance(handle) Dim ws as Object = excel.ActiveSheet ws.Range(TargetRange).AutoFilter(Field := Field, Criteria1 := Criteria1)
実行すると
が
になります。
複数条件を指定したい場合などは、もう少しこらないとだめかも。
フィルタを外す場合はこちら
ws.Range(TargetRange).AutoFilter