Discussion:
コメント書式サイズ自動を常に行えるようデフォルトにしたい。
(too old to reply)
mt_world_234
2007-09-16 01:44:01 UTC
Permalink
表題の件、回答を待ちます。
unknown
2007-09-19 13:24:04 UTC
Permalink
Post by mt_world_234
表題の件、回答を待ちます。
質問内容が理解できません。

もう少し、丁寧にご希望の操作を例示してください。
mt_world_234
2007-09-22 09:00:01 UTC
Permalink
質問が悪くてすみませんでした。
セルへコメントを挿入後に、コメントの書式設定:配置、自動サイズ調整にチェックを入れています。
この自動サイズ調整をデフォルトで設定出来ないでしょうか?
Post by unknown
Post by mt_world_234
表題の件、回答を待ちます。
質問内容が理解できません。
もう少し、丁寧にご希望の操作を例示してください。
unknown
2007-09-23 01:54:01 UTC
Permalink
Post by mt_world_234
質問が悪くてすみませんでした。
セルへコメントを挿入後に、コメントの書式設定:配置、自動サイズ調整にチェックを入れています。
この自動サイズ調整をデフォルトで設定出来ないでしょうか?
エクセルからの設定ではできないように思います。

レジストリファイルを編集すればできる可能性がありますが、重大なトラブルを派生する可能性もあるのであまりお勧めできません。

私なら、マクロを利用して挿入したコメントの書式を希望の状態に設定するようにします。

例えば、以下のようなコードをそのファイルか個人用マクロブック(すべてのファイルで使用したい場合)に登録しておきます。

Sub コメント書式()
ActiveCell.Comment.Shape.Select True
Selection.AutoSize = True
End Sub

「ツール」「マクロ」「マクロ」でこのコメント書式マクロを選択し、「オプション」をクリックして、たとえばCtrl+Mのショートカットを登録します。

このようにして、コメントを挿入したセルでCtrl+Mのショートカット操作を行えば、コメントの書式が自動サイズ設定になります。
mt_world_234
2007-09-24 13:34:05 UTC
Permalink
マックちゃんへ

Sub Macro1()
'
' Macro1 Macro
' Sub コメント書式(m)
ActiveCell.Comment.Shape.Select True
Selection.AutoSize = True
End Sub
'
' Keyboard Shortcut: Ctrl+m
'
Range("E24").Select

Application.Run "PERSONAL.XLSB!Macro1"
Range("E24").AddComment
Range("E24").Comment.Visible = False
Range("E24").Comment.Text Text:="ユーザー名:" & Chr(10) & ""
Range("E24").Select
Application.Run "PERSONAL.XLSB!Macro1"
ActiveWindow.SmallScroll Down:=2

コンパイルエラー
End Sub、End Function または End Property 以降には、コメントのみ
が記述できます。

エクセル2007でのツール、マクロ、マクロ、オプションがわかりません。
お手数をおかけいたします。
Post by unknown
Post by mt_world_234
質問が悪くてすみませんでした。
セルへコメントを挿入後に、コメントの書式設定:配置、自動サイズ調整にチェックを入れています。
この自動サイズ調整をデフォルトで設定出来ないでしょうか?
エクセルからの設定ではできないように思います。
レジストリファイルを編集すればできる可能性がありますが、重大なトラブルを派生する可能性もあるのであまりお勧めできません。
私なら、マクロを利用して挿入したコメントの書式を希望の状態に設定するようにします。
例えば、以下のようなコードをそのファイルか個人用マクロブック(すべてのファイルで使用したい場合)に登録しておきます。
Sub コメント書式()
ActiveCell.Comment.Shape.Select True
Selection.AutoSize = True
End Sub
「ツール」「マクロ」「マクロ」でこのコメント書式マクロを選択し、「オプション」をクリックして、たとえばCtrl+Mのショートカットを登録します。
このようにして、コメントを挿入したセルでCtrl+Mのショートカット操作を行えば、コメントの書式が自動サイズ設定になります。
unknown
2007-09-24 14:20:01 UTC
Permalink
Post by mt_world_234
マックちゃんへ
Sub Macro1()
'
' Macro1 Macro
' Sub コメント書式(m)
ActiveCell.Comment.Shape.Select True
Selection.AutoSize = True
End Sub
'
' Keyboard Shortcut: Ctrl+m
'
Range("E24").Select
Application.Run "PERSONAL.XLSB!Macro1"
Range("E24").AddComment
Range("E24").Comment.Visible = False
Range("E24").Comment.Text Text:="ユーザー名:" & Chr(10) & ""
Range("E24").Select
Application.Run "PERSONAL.XLSB!Macro1"
ActiveWindow.SmallScroll Down:=2
コンパイルエラー
End Sub、End Function または End Property 以降には、コメントのみ
が記述できます。
上記の文章には何の説明もないですが、どのようなことをしたいのでしょうか?
Post by mt_world_234
エクセル2007でのツール、マクロ、マクロ、オプションがわかりません。
お手数をおかけいたします。
場所が分からないということでしょうか?

2007ではマクロ関係のコマンドは開発タブに集約されています��
画面左上の丸いOfficeボタンをクリックして「Excelのオプション」から「開発タブをリボンに表示する」にチェックを入れて「マクロ」からダイアログを出してください。
mt_world_234
2007-09-26 13:20:02 UTC
Permalink
こちらの知識不足でご迷惑をおかけいたしました。
マクロの勉強をして再度質問いたします。
何をしたとか言われても分かりません。
ごめんなさい。
Post by unknown
Post by mt_world_234
マックちゃんへ
Sub Macro1()
'
' Macro1 Macro
' Sub コメント書式(m)
ActiveCell.Comment.Shape.Select True
Selection.AutoSize = True
End Sub
'
' Keyboard Shortcut: Ctrl+m
'
Range("E24").Select
Application.Run "PERSONAL.XLSB!Macro1"
Range("E24").AddComment
Range("E24").Comment.Visible = False
Range("E24").Comment.Text Text:="ユーザー名:" & Chr(10) & ""
Range("E24").Select
Application.Run "PERSONAL.XLSB!Macro1"
ActiveWindow.SmallScroll Down:=2
コンパイルエラー
End Sub、End Function または End Property 以降には、コメントのみ
が記述できます。
上記の文章には何の説明もないですが、どのようなことをしたいのでしょうか?
Post by mt_world_234
エクセル2007でのツール、マクロ、マクロ、オプションがわかりません。
お手数をおかけいたします。
場所が分からないということでしょうか?
2007ではマクロ関係のコマンドは開発タブに集約されています。
画面左上の丸いOfficeボタンをクリックして「Excelのオプション」から「開発タブをリボンに表示する」にチェックを入れて「マクロ」からダイアログを出してください。
Loading...