[[20180316103805]] 『コメント機能について』(はい) ページの最後に飛ぶ

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

 

『コメント機能について』(はい)

コメント機能で、設定したセルにマウスを持っていくと、コメントが表示される機能だと思うのですが。
そのコメントを、マウスを持って行ったセル内のデータと同じものを表示させることはできますか?
というのも、
1セルの高さの上限以上のデータが入っているので、それをマウスを合わせたら表示できるようにしたいです。(結合は仕様上使用したくありません。)
セル内のデータは別シートからの転記なので、セル内のデータが変わるごとにそのコメント内の文字も同時に変更したいです。

< 使用 Excel:Excel2016、使用 OS:unknown >


 シートのWorksheet_Changeイベントで、セル内容が書き換えられたらコメントに
 反映するようにしてはいかがでしょう?

 コメントに拘らなければ、ユーザーフォームのテキストボックスなどで代用する
 ことは可能だと思います。
(カリーニン) 2018/03/16(金) 11:04

 >セル内のデータは別シートからの転記なので、セル内のデータが変わるごとにそのコメント内の文字も同時に変更したいです。

 これが気になりますね。
 式で参照してるだけなら、Worksheet_Changeイベントは発生しませんので。
(カリーニン) 2018/03/16(金) 11:06

 数式バーの事例がありました。参考まで。

[[20140415093355]] 『数式バーの高さ』(スカボロー)
(カリーニン) 2018/03/16(金) 11:44


↑の数式バーの事例は、セルをアクティブにしないとだめです。
(カリーニン) 2018/03/16(金) 11:47

はいさんは 567さん や こらさんと同じ方ですか?
もしそうなら、質問のたびにニックネームを変えない方がいいですよ。

>1セルの高さの上限以上のデータが入っているので

フォントは何をお使いですか。
標準の游ゴシックをお使いなら、Excel2013までの標準フォント(MSPゴシック)を使えば1行に収まると思いますよ。
それがいやなら、1行に収まるようフォントサイズを小さくし、必要なら表示サイズをその分大きくする。
という方法はいかがですか。

(kazuo) 2018/03/16(金) 11:59


 コメントではないのですが、
 入力規則の入力時メッセージを使う案です。
 シートモジュールに

 Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Count = 1 Then
        With Target.Validation
            .Delete
            .Add Type:=xlValidateInputOnly
            .InputMessage = Target.Value
        End With
    End If
 End Sub

 セルを選択するとメッセージとしてセル脇にセル内容が表示されます。
(ろっくん) 2018/03/16(金) 12:52

コメント返信:

[ 一覧(最新更新順) ]


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