おはようございます。
たびたび参考にさせていただいております、
どうしても解決できない事があるので質問させていただきます。
エクセル関連なのでもしかしたら場違いな質問になるかもしれませんがよろしくお願いします。
本題ですがエクセルのセルの表示位置で、「折り返して全体を表示」を選択している際、
そのセルに、何行折り返し(自動改行)があるかって取れませんか？
本当に初心者の質問なのですがお許しください、ネットなどで調べてみたのですが解らなくて・・・
・
よろしくお願いします。

> そのセルに、何行折り返し(自動改行)があるかって取れませんか？

どう言う理由でその行数を取得する必要があるのでしょうか？

どうしても必要なら、行の高さを自動設定して、その高さを取得し、使用フォントサイズ等
も求めて計算すれば取得する事ができますが。

管理人様！即答ありがとうございます！
説明がたりなかったようですいません。
本の在庫管理用のプログラムを作っているのですが登録内容をＶＢからエクセルに出力する時に
きっちり罫線を引ひきたいのです。
文字の横幅長とセルの横幅長を取得し、計算で出してみたのですがエクセルの横幅単位のせいか長い文になって
しまうと誤差が出てしまうため改行回数を取得しようかと思ったのですが・・・・
何かいい方法ないでしょうか？

> 文字の横幅長とセルの横幅長を取得し、計算で出してみたのですがエクセルの横幅単位のせいか長い
文になって
> しまうと誤差が出てしまうため改行回数を取得しようかと思ったのですが・・・・
> 何かいい方法ないでしょうか？

意味（理由）が余計解りません。

罫線枠の横幅は設定値で固定では、その範囲で折り返して表示を設定しているなら
横幅がはみ出す事はないのでは。

罫線を引いた時に枠からはみ出したくないなら自動設定で幅と高さを設定すれば。
Rows("6:6").EntireRow.AutoFit
Columns("D:D").EntireColumn.AutoFit