はこふぐのメモ

めもです

自分へのメモ BluePrism Excelでフィルタをかける

はこふぐです。

 

BluePrismでExcelでフィルタをかける実装をMS Excel VBOの拡張で行う場合の実装例。

 

AddFilterアクションの簡単な例

 

f:id:sazanamifugu:20191116223902p:plain

handle いつものやつ

TargetRange:表の開始位置を指定

Field:何番目の列でフィルタするか(1始まり)

Criteria1:フィルタ条件

 

AddFilterの中身

f:id:sazanamifugu:20191116224315p:plain

 

 コードステージAddFilterの中身

Dim excel as Object = GetInstance(handle)
Dim ws as Object = excel.ActiveSheet

ws.Range(TargetRange).AutoFilter(Field := Field, Criteria1 := Criteria1)

実行すると

f:id:sazanamifugu:20191116224652p:plain

f:id:sazanamifugu:20191116224735p:plain


になります。

複数条件を指定したい場合などは、もう少しこらないとだめかも。

 

フィルタを外す場合はこちら

ws.Range(TargetRange).AutoFilter
プライバシーポリシー
©2019 はこふぐのメモ All rights reserved