Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


13431 / 13644 ツリー ←次へ | 前へ→

【5450】行の高さの自動調整について gio 03/5/14(水) 15:18 質問
【5451】Re:行の高さの自動調整について つん 03/5/14(水) 15:59 回答
【5453】Re:行の高さの自動調整について gio 03/5/14(水) 16:55 お礼

【5450】行の高さの自動調整について
質問  gio  - 03/5/14(水) 15:18 -

引用なし
パスワード
   EXCEL2000を使用しています。

セルに複数行あるデータを入れたときに
データがすべて表示できるように行の高さを
VBAを使用して変えたいのですがうまくいきません。

>'rowはデータの数
>xlsSH.Range("A5:D" & row).Columns.AutoFit

と記述したのですが列の幅が変わっただけで
行の高さは変わりませんでした。

表示されるデータは

FUNCTION get_name(user_id VARCHAR2)
RETURN VARCHAR2 AS
USER_NAME common.個人情報.氏名%TYPE;
BEGIN
SELECT 氏名 INTO USER_NAME
    FROM common.個人情報
    WHERE 個人情報.ユーザID=user_id ;
RETURN(USER_NAME);
EXCEPTION
    WHEN NO_DATA_FOUND THEN
    USER_NAME := 'NOT_FOUND_USER' ;
RETURN(USER_NAME);
END ;

こういう感じです。

ヘルプを見てもわかりませんでした。
方法を教えてくださいお願いします。

【5451】Re:行の高さの自動調整について
回答  つん E-MAIL  - 03/5/14(水) 15:59 -

引用なし
パスワード
   gio さん、こんにちは

>セルに複数行あるデータを入れたときに
>データがすべて表示できるように行の高さを
>VBAを使用して変えたいのですがうまくいきません。
>
>>'rowはデータの数
>>xlsSH.Range("A5:D" & row).Columns.AutoFit
>
>と記述したのですが列の幅が変わっただけで
>行の高さは変わりませんでした。

えっと、「Columns」は列を示すプロパティなので、
列幅だけしか変わらないのは当然で、

  .Rows.AutoFit

と、しないとダメなのではないでしょうか?

【5453】Re:行の高さの自動調整について
お礼  gio  - 03/5/14(水) 16:55 -

引用なし
パスワード
   恥ずかしながらうまくいきました
本当にありがとうございました。

行の高さはMAXが決まっているんですね・・・。

13431 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free