マンション理事長、動く！

PDFからのデータを、うまい事EXCELに展開したい！
面倒な構文解析もしたくない！
って時に読んでください。

1. マンション理事長、動く！
2. はなっち！とは…  Twitter:hjmkzk  Qiita:@HANACCHI  FaceBook:hajime.kozaki  2019年10月 UiPath Japan MVP 2019 認定 ～～～～～～  2022年10月 UiPath Japan MVP 2022 認定  2023年10月 UiPath Japan MVP 2023 ならず!  2024年7月 UiPath Japan MVPには立ちません  1998年８月 弊マンション竣工  1998年10月 はなっち！入居！  2020年７月 はなっち！完済！  2023年４月 10回目位の理事長！
3. 最近の弊マンション  川崎市中原区に在るこの全２９戸マンションは、 東急東横線・目黒線の元住吉駅から徒歩２１分、 または同駅よりバス約６分の長寿荘入口バス停下車 徒歩３分です。  管理会社は、社名は変わりましたが、竣工時から一社。 フロントさんも、３名。管理人さんは４代目。  ４代目の管理人さんが６６歳と言う高齢で、がん治療にも通っ ているのですが、本人は継続を希望している…
4. 最近の管理人さん  保管資料の扱いが雑！ ✓ ガイド付きの穴あけ器を使っても… ✓ 報告書が他の箱ファイルに 収納されている… ✓ 報告書が数年に 亘って無い！
5. 最近の問題点  大規模修繕工事  直結増圧式給水化  エレベータ架け替え ➢ エレベータ利用状況を報告書(紙)からEXCELに転記し、調査 ➢ 欠損年月分は、エレベータ保守会社からPDFファイルを受領 ➢ その際、Webで情報が得られることを知る！ ➢ そこには欠損年月分以外の報告書のPDFファイルが！ よし！UiPath Community Editionだ！
6. PDFから欲しい情報 ... 25項目
7. PDFアクティビティで、Stringへ エレベーター遠隔点検
8. Stringから、必要な情報を！ エレベーター遠隔点検.Replace(ControlChars.Cr, String.Empty).Split(ControlChars.Lf) currentItem.Contains("制御盤内機器作動状態") currentItem.Substring( currentItem.IndexOf("制御盤内機器作動状態") +“制御盤内機器作動状態”.Length+1, 1) 25項目中の1つの項目 を抽出するのに、24項 目の空振りが発生！
9. Stringから、必要な情報を！ (ほぼ)ダイレクトに取得できないか？ エレベーター遠隔点検 .Replace(ControlChars.Cr,String.Empty) .Replace(ControlChars.Lf, " ") 改行で配列ではなく、水平展開！？
10. Stringから、必要な情報を！ 配列にせず、平文から取得できないか？ エレベーター遠隔点検 .replace("制御盤内機器作動状態", ControlChars.tab) .split(ControlChars.Tab) エレベーター遠隔点検s(1).TrimStart & " " 制御盤内機器作動状態 .Substring(0, 制御盤内機器作動状態.IndexOf(" "))
11. もうちょっと見やすく（項目Ｂの値Ｂを取ってみる） 平 文 項目Ａ＿値Ａ＿項目Ｂ＿値Ｂ＿項目Ｃ＿値Ｃ 平文配列 ← 平文.replace(“項目Ｂ", ControlChars.tab).split(ControlChars.Tab) 値 ← 平文配列(1).TrimStart & " " 値 ← 値.Substring(0, 値.IndexOf(" ")) 項目Ａ＿値Ａ＿<TAB>＿値Ｂ＿項目Ｃ＿値Ｃ 項目Ａ＿値Ａ＿ ＿値Ｂ＿項目Ｃ＿値Ｃ 値Ｂ＿項目Ｃ＿値Ｃ 値Ｂ＿項目Ｃ＿値Ｃ＿ 値Ｂ＿項目Ｃ＿値Ｃ＿
12. こうすることで  「取得項目」の右側の値をダイレクトに取得でき、 配列（１）の処理に注力できる！  スニペット、共通部品化をすることで、プロジェクト内部での 処理の共通化が図れ、生産性があがる！？  「取得項目」の左側の値を取得する場合は、 配列（０）の値を更に.splitする事で、対応の可能性がある！
13. ところで最近気が付いたこと その１  StringのTrimメソッドは、そのまま使うと、空白以外の文字も トリムしてしまう。
14. ところで最近気が付いたこと その２  配列中の空白値は、ForEachアクティビティだけで除去できる Ex)"A,,B,,,".Split(","c).Where(Function(v) v <> String.Empty)
15. 一生UiPathします How Do You Like "UiPath"?