[[20200130021525]]　『セルの幅を自動調整』（くぼそう）　ページの最後に飛ぶ

『セルの幅を自動調整』（くぼそう）

テストの回答をVLOOKUPで表示させるようにしました。
各セルに表示させるようにしましたが解答は文章な為、毎回セルの高さを変えなくてはなりません。VLOKKUPで表示したときに毎回セルの高さを自動的に変える方法はありますでしょうか？

＜使用 Excel：Excel2007、使用 OS：unknown ＞

 VLOOKUPが設定されたセルが「折り返して全体表示」となっていることを前提にして、
 セルの高さを自動調整するイベントプロシージャを利用します。

 対象は、A列の単独セルとし、それに変更を加えたときに動作します。
 以下のコードをシートモジュールにコピーペイストして、A列を
 変更してみてください。
 Private Sub Worksheet_Change(ByVal Target As Range)
     If Target.Column > 1 Then Exit Sub
     Target.EntireRow.AutoFit
 End Sub

 なお、
 複数のセルを同時に変更する場合（まとめてコピーペイスト、消去等）もありうるなら、
 例えば、下記のようにします。

 Private Sub Worksheet_Change(ByVal Target As Range)
     Dim myRange As Range
     Dim r As Range

     Set myRange = Intersect(Target, Columns("A"))
     If myRange Is Nothing Then Exit Sub
     For Each r In myRange
         r.EntireRow.AutoFit
     Next
 End Sub

（γ） 2020/01/30(木) 05:39

Yさん＞すみません、ド素人です。どこのイベントプロシージャに書き込めばよろしいでしょうか
（くぼそう） 2020/01/30(木) 11:27

シートモジュールにと書きましたが、通じないようですね。
参考例として書いたまでですが、VBAは余り使ったことがないのであれば、
コードのことは忘れて、最初から確認します。

それはテストの受験者の回答自体なんですか？
それとも模範解答のことで、採点途中の作業に使うのですか？
目的をもう少し説明してください。
ユーザーは誰ですか？一人なんですか、複数なんですか？
手作業ではできることはご存じですか？
AutoFit(行を選択して、境界下部をダブルクリック）すれば高さは自動調節されます。
（γ） 2020/01/30(木) 17:39

Yさん＞
すみません、よろしくお願いします。
ユーザーは回答者と採点者含む多数です。
問題に対して模範解答を表示させています。
この問題と模範解答はVLOOKUPで表示させています
問題はE28:BC29の結合セルに表示されます。
問題はセルの高さを変えなくても収まっています。

模範解答はE30:BC30に表示されますがこの模範解答が問題によっては複数行になるため自動的にセルの高さを変更できればなと思います。
問題の数が多いので模範解答をみる度に手作業はちょっとしんどいかなと思います

問題と模範解答は複数行あります。

会社で使用しているSheetがエクセル方眼紙になっており、エクセル方眼紙は一害あって百利なしなのは重々承知していますがどうしようもできません。

可能であればよろしくお願いします。
素人ですが頑張ってみたいと思います
（くぼそう） 2020/01/30(木) 18:44

受験する人も、模範解答を見るのですか？自己採点ということなんですか？
（γ） 2020/01/30(木) 18:53

Yさん＞見ます。
（くぼそう） 2020/01/30(木) 19:10

では、最初から模範解答を入れておいて行の高さは調整できないのですか？
（γ） 2020/01/30(木) 19:50

Yさん＞
高さのふり幅が大きすぎて自動調整出来たらなと思いまして、、、、
（くぼそう） 2020/01/30(木) 20:19

Yさん)あとはテストの種類が多いのでドロップダウンで選んだら問題と解答が表示されるようにしたので、、、
（くぼそう） 2020/01/30(木) 20:48

自動調整とはどういう意味でしょうか。
文字列が隠れることがないよう、ということでしたら、
事前に自動調整したうえで、それを配布したらいいじゃありませんか。
一つずつではなく、行をまとめて自動調整することのできます。
何が障害になっているのか、わからなくなりました。
　
あと、どうしても配布してからということだと、
・自動マクロだと、入力したときに高さが変動して受験者が不安になります。
・ボタンを押す方式だと、誤って押してしまうリスクがあります、
　
そもそもですが、受験者は最初から模範解答が見えるんですか？
テストになりませんが。
一定の処理をすると、模範解答が見られるようにしているなら、
それらとの関係で、まとめて対応を考えた方がよいのではないですか？

試験の運用ですから、このようなところで質問するのではなく、
きちんと対応できる体制の下で検討してください。責任は負いかねます。

＞あとはテストの種類が多いのでドロップダウンで選んだら問題と解答が表示されるようにしたので、、、
そのような後出しは受け付けられません。
私はここまでとさせて頂きます。私のできることは以上です。

（γ） 2020/01/30(木) 20:54

コメント返信：

[ 一覧(最新更新順) ]

[[20200130021525]] 『セルの幅を自動調整』（くぼそう） ページの最後に飛ぶ

[[20200130021525]]　『セルの幅を自動調整』（くぼそう）　ページの最後に飛ぶ