Excelで、式で指定した文字の数だけ空白を。

質問

Wordに差し込み印刷をしたいのですが、あらかじめ

（　　　　　　）

↑のように文字数が決められた空白の中に、終わりのカッコの位置が変わらないようにバラバラの文字数の単語を差し込みで挿入したいです。

たとえば、
（りんご　　）
（パパイヤ）
（くり　　　 ）

のように、単語の文字数＋スペースの数を統一したいという意味です。

Excelの式などを使って可能でしょうか？
VBAは全く詳しくありません。

VLOOKUP(～)&(12-LEN(VLOOKUP(～))*" ")みたいなのを考えているのですが、うまくいかず…

回答No.2

KURUMITO · ベストアンサー

例えばシート2のA1セルから下方に1，2，3とあり、B1セルから下方にりんご、パパイヤ、くりと入力されているとします。
シート1のA1セルから下方に1，2，3を入力し、B1セルには次の式を入力してB3セルまでドラッグコピーします。

="(" & VLOOKUP(A1,Sheet2!A:B,2,FALSE) & REPT(" ",(4-LEN(VLOOKUP(A1,Sheet2!A:B,2,FALSE)))*2) & ")"

そのままではお望みのような表示になっていませんね。
B1セルからB3セルを選択してから「ホーム」タブの「フォント」で「MSPゴシック」などとなっているでしょう。それを「MSゴシック」に変更します。Pの文字を含まない種類のフォントに切り替えることが必要です。それによってはじめて文字が整列されますね。

お礼

REPT関数という関数を初めて知りました！
フォントの"P"にはそういう意味があったのですね…
こちらの方法も大変便利そうです。
ありがとうございました！！

回答No.1

keithin

たとえば最大４文字を左詰とすると
=LEFT(VLOOKUP(　)&"□□□□",4)
　□はスペース
のような工夫でできます。

右詰なら左にスペースを付けてRIGHT関数で右から取るような工夫ですね。

お礼

ありがとうございます！！
スペースをたくさん入力しておいて、必要な所までとる、ということですね。。。
やってみます。
思いつきもしませんでした！！