![[あすかぜ・ねっと]](/image/asukaze.png "あすかぜ・ねっと"){kind=small}
あすかぜ・ねっと[752] セル内最終行の先頭に任意のテキストを追加
ありがとうございます [2023/07/03 13:53:44]
お世話になっております。
便利に使わせていただいてどうもありがとうございます。
セル内最終行の先頭に任意のテキスト(セル内改行含む)を挿入
する方法はありますでしょうか？
-----------------------------
【変更前】
注意事項
●おおおおおお
●おおおおおお
●おおおおおお
●おおおおおお
生産国
日本
aaaaaa-bbbbb aaaaaabbbbb
【変更後】
注意事項
●おおおおおお
●おおおおおお
●おおおおおお
●おおおおおお
生産国
日本
【型番】aaaaaa-bbbbb aaaaaabbbbb
-----------------------------
このように、セル最終行の先頭に
【型番】という文字を追加したいです。
もし可能でしたら、改行を含めた文章も挿入できる形ですとありがたいです
よろしくお願いいたしますm(_ _)m
Re: [752] セル内最終行の先頭に任意のテキストを追加
あすかぜ [2023/07/03 21:50:12]
次のようなマクロでどうでしょうか。
text = InputBoxMultiLine("追加するテキストを入力してください。");
p = [x,y].lastIndexOf("\n");
[x,y] = [x,y].substring(0, p + 1) + text + [x,y].substring(p + 1);
試してみてください。
Re: [752] セル内最終行の先頭に任意のテキストを追加
ありがとうございます [2023/07/04 09:17:08]
こちらもどうもありがとうございます！
入力ボックス方式でとても使いやすいです。
動作もうまくいきました。
他の件もお返事いただけるとのこと、どうもありがとうございます。
よろしくお願いいたしますm(_ _)m