『コメント内の改行禁止』(きさね) セル内の改行禁止は調べるとあるのですが、コメント内の改行禁止の方法が分かりません。 解る人がいましたらお教え下さい。お願いします。 Excel2007 Windows Vista ---- セル内の改行禁止というのがどのような方法かわかりませんが セルでもコメントでも改行自体を禁止ですとVBAでの制御になりますよね。 該当シートのモジュールに Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim cm As Comment For Each cm In Me.Comments cm.Text Text:=Replace(cm.Text, vbLf, "") Next cm End Sub コメントにはChangeイベントが無いので こんなので制御するしか無いんじゃないでしょうか? (momo) ---- さっそく回答ありがとうございます。 私が調べたセルの改行禁止もVBAでした。 (コメントにイベントが無いのは前に教えてもらった事があったので知っていたのですが・・・)コメントにどう反映させるか解りませんでした。 無事解決しました。momo様、ありがとうございました。 ちなみにセルの改行禁止は、データ入力規則のユーザー設定で =ISERROR(FIND(CHAR(10),A1))でもできるそうです。(例はA1の場合) 強制的に改行以下は削除されてしまいますが (きさね) ---- このような場合、大きく2通りあると思います。 改行の入力そのものを規制する方法。 改行の入力は受け付けるが自動的に削除する方法。 です。 セルの場合は、入力規制が前者、VBAでは後者です。 VBAではイベントを使おうが何しようがセル入力中は実行できませんので必然的に後者になります。 という事で、コメントの方法を思考するときにコメントではイベントが無いのでVBAでしか出来ず セルの方法で入力規則を使っている場合は全然違う方法をご案内する事になるので 参考にお問い合わせしました。 (momo) ---- 丁寧に教えていただき、ありがとうございます。 私が今現在求めているのは、コメント内の改行禁止だけですので、前回のmomo様の回答で十分です。 VBAは、自分で少しずつ勉強はしているのですが、なかなか進歩がありません… 皆様のように使いこなせる日が来るのでしょうか… 今回は本当に助かりました。 また、宜しくお願いします。 (きさね)