こんにちは。
こちらでは朝から雨降りです。そのせいか、欠勤連絡や渋滞の影響で遅れる人も多く、朝から昼過ぎまで遅刻や配送延着の受電ばかりでした。
そんな中でも業務はすすむ・・・。
かなーり前にいただいたご依頼で、「配信されるデータを指定のフォーマットに転記したい」というのがありました。
久々に時間が取れたので、さっそくヒアリング。すると・・・
- 配信データは数十行から百行前後 繁忙期はもっと増える
- コピペで出来る箇所もあれば”&”で結んでコードのような扱いするところもある
- 配信データのすべてを転記するわけではない(転記条件あり)
- 転記先のフォーマットブック内でがっつり関数使われてて変更は容易ではない などなど
これを見比べたり入力確認したりで日々数十分から1時間ほどかけてやってるとのこと。
仮に1日1回30分×週5回×51週として年間で127.5時間・・・これはインパクトのある人時です。
というわけでさっそくVBAで改善。
処理フローを考える
今回の改善では・・・
- 配信データのボリュームは毎回変わる
- 転記先フォーマットは不変
- 転記条件は変更の可能性あり
これに基づいてさっそくコーディング。
・ボリューム増減はrows.countで問題なし。
・フォーマット不変なのでボリュームに合わせて範囲指定すればOK
ここまではスムーズでした。
条件を変更できるように
今回いただいた条件は季節ごとに変わる配送条件の影響を受けています。
しかしその変更内容はほぼ固定されており、内容をマスタとして持たせておけば回避できそう。
なので、予備シートに簡易的なマスタ情報を載せて、必要に応じて担当者が修正・処理実行するというものにしました。
この辺の感覚は部門担当者のPCスキルに影響されますが、ある程度関数に詳しい方であればマスタ管理はゆだねても良いと考えてます。
そのうえで使い勝手の良い処理だけを構築してリリース。
今週中に作成・テストをして引き渡しできればよし!
今日も1日充実したなー。
コメント