Excelマクロ・行の高さを自動調整する方法

質問

• Excelの人材情報リストから特定の行の高さを自動調整する方法についてご質問です。
• VLOOKUP関数を使用しているため行の自動調整ができない問題があります。
• VBAを使用してマクロを作成することで高さの調整が可能です。

回答No.1

real beatin（@realbeatin）

こんにちは。

> ...関数を使用しているからか、書式から行の自動調整を設定してみても１行の高さになってしまいます。

[折り返して全体を表示する]ボタンを
数式確定後に再設定すれば
行高の自動調整が適用されます。
（既に設定済の場合は[折り返して全体を表示する]ボタンを２度押す。）
必要なセル範囲、または列等を選択してから
[折り返して全体を表示する]ボタンを押すだけですから、
マクロにするべきかは微妙ですね。
ただ、これは[マクロの記録]機能でも、
必要な記述を得られますので、
まず、[マクロの記録]から始めてみてはいかがでしょう。

部分的な記述だけでしたら、
　　Rows(5).Select　'　５行め　の場合
　　Selection.WrapText = True
とか、
　　Range("5:5,7:9").WrapText = True　'　５行めと７：９行め　の場合
のような記述になります。
数式確定後＝つまり、数式の戻り値（つまり参照元の値）が変わる度に、
その都度、実行してあげる必要があります。

とりあえず、以上です。
まず、ここまでの説明で、出来ることをそちらでやってみてください。
それでも解決しない場合は、具体的にこちらがイメージできるような詳細を
補足欄にでも書いて貰えればお応えします。

補足

ご回答ありがとうございます。
両方試してみましたが、うまくいきませんでした。

詳細を記します。
人材管理データベースからBIツールで名前・性別・資格・自己PRなどの必要な情報項目を抽出して、ExcelのSheet２に人材情報リストとして出力します。（A列が人材番号になっています。）
同じブックのSheet１が作成した定型のプロフィールシートになっており、人材番号をA１セルに入力し、その人材番号をキーにしてSheet2から各情報項目をVLOOKUPで射影しています。プロフィールシートは、列幅は全て同じにしてセルを結合することでレイアウトを整えています。
最後にボタンをプロフィールシートの下部に配置し、印刷用のマクロを登録しました。このマクロはユーザーフォームでFor~NextやPrintoutを使用しただけの簡単なものです。人材番号を入力することで指定の人材範囲のプロフィールシートが連続で印刷出来るようにしてあります。

マクロはあまり関係なさそうですが、宜しくお願いします。