[[20060905190835]] 『行の高さ調整について』(レオン) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『行の高さ調整について』(レオン)

すでにセル内に文字が入力されており、書式設定で一定の幅で折り返すように設定しています(1つのセルの中に)。
長い文書と、短い文書とで行の高さが異なっていますが(自動調整で)、異なった行の高さの状態で、すべてセルの高さを(複数選択で)プラス5ピクセルにすることは可能でしょうか?

(例)
1行目が20ピクセル → 25ピクセル
2行目が40ピクセル → 45ピクセル


 標準モジュールに入れて、変更したい行を選択して実行してください。
Sub gyoutaka()
Dim C As Range
For Each C In Selection.Rows
    C.RowHeight = C.RowHeight + (75 / 100 * 5)
Next C
End Sub

 ピクセルでしたね。(^_^A; 修正しました。

 (川野鮎太郎)


河野鮎太郎様

最初はさっぱり意味(標準モジュールから)がわかりませんでしたが、何とか回答の意味にたどりつき解決しました。
ありがとうございます。


コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.