1988年~2024年現在まで36年間。生涯現役を目指して日々の活動を記録中!

SS:VBAで空白文字を消す!

令和6年1月7日(日曜日)

IMG_4298_380px.jpgIMG_4299_380px.jpg

20240107103905.png_380px.jpg

みなさん、おはようございます。
今日は、風もなくて、穏やかな日ですね。
(o^―^o)ニコ

お休みは、いかがお過ごしでしょうか?
残り2日間は、カラダを休めるなり、
火曜日、準備万端で出勤できるように、
各自、過ごしてくださいね。

それでは、毎度のSSプロジェクト、
助っ人ChatGPTからのお知らせです。

まずは、Excelファイルの請求書、
INVOICEの更新プログラムバグを修正してから、
さらに、細かいところを着手していましたよ~

まずは、なんと、こんなに沢山のシェープオブジェクトが、
ひとつの請求書EXCELファイルの中にあったんですね~
実際に使っているのは、赤枠の部分だけです。
(^^ゞ
20240106095258.png_380px.jpg

まあ~、なんていうのかな?
日ごろ、編集しているうちに、知らず知らずに追加されて、
しかも全て、空白文字なので、見ませんから、
そりゃあ~、溜まるよね~(笑)

ということで、VBAで、サクサクっと作って、
全ての請求書ファイルに対して、処理を掛けたら、
シンプルに、これだけになりました。(笑)

20240106135224.png_380px.jpg

ちなみに図形2~4は判子です。
LineとRactangleは、罫線ですね。
Text Boxは、担当、責任者などの見出しです。
ようするに、以下の部分なんですね~(笑)

20240106095822.png_380px.jpg

ま、、、それだけの事なのですが、
このような機会がないと詳しく見返さないので、
良いきっかけとなりましたね~
(o^―^o)ニコ

ということで、日々の運用、
24/365をサポートするためにも、
インフラ、プログラム、データのメンテナンスを、
今日も、ちまちましていきま~す!(笑)