- ベストアンサー
VBAによるコメントの余白設定
Excel2010のVBAでコメントの余白の長さを設定したいのですが、やり方が分かりません。 どのようにするのか、プログラムコードを教えてください。 回答よろしくお願いします。
- miya_HN
- お礼率100% (1683/1683)
- その他MS Office製品
- 回答数1
- ありがとう数2
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
RangeオブジェクトからCommentオブジェクトをゲット 上記CommentオブジェクトからShapeオブジェクトをゲット 上記ShapeオブジェクトからTextFrameオブジェクトをゲット こうして初めて余白関連のプロパティに触ることができるようです。 コードにするとこんな感じになります。 例:アクティブセルのコメント、余白の上下をそれぞれ0.5cmに、左右をそれぞれ 1.0cmに設定する。 With ActiveCell.Comment.Shape.TextFrame .AutoMargins = False .MarginTop = Application.CentimetersToPoints(0.5) .MarginBottom = Application.CentimetersToPoints(0.5) .MarginLeft = Application.CentimetersToPoints(1#) .MarginRight = Application.CentimetersToPoints(1#) End With AutoMarginsプロパティはあらかじめFalseにしておかないと、 MarginTop以下を設定しても無視されますので、注意が必要です。 以上
関連するQ&A
- VBAのコメントの長さ設定
Excel2010のVBAで、コメントの高さと幅を設定するプログラムコードが分かりません。 どなたかご存じの方いないでしょうか？ 回答よろしくお願いします。
- ベストアンサー
- その他MS Office製品
- 「Excel」の余白設定について
【Windows XP】で「Microsoft Office」をつかって作成した「Excel」表を、【Windows ７】へコピーして使用しているのですが、余白設定で右側余白がうまくいきません。 以前の【Windows XP】では、表作成の右側余白を「0.3」の設定で作成しておりましたが、【Windows ７】でそのまま使用すると、ページの右端が15ミリ程欠けて印刷されます。 印刷レビューで確認しても、ページの右端が欠けているのが確認できます。 そこで 、「印刷プレビュー」のページ余白の調整で、黒い余白ハンドルを表示して右端へドラッグしょうとしても、ページ境界を示す破線が15ミリ程を残し右へ移動出来ません。 また、[ページ設定]の[余白] タブで、右側余白を「0」にしてみたのですが、同様で15ミリ程の余白が出来てしまいます。 その他、「互換モードでのプログラムの実行」や「管理者としてプログラムの実行」等、ネット検索等で調べて、考え付く限りの事はしてみたのですが、設定の変更が出来ません。 この現象は、今まで【Windows XP】で作成済みの、全ての「Excel」ファイルに当てはまる現象なので、設定の変更が出来なければ、全ての「Excel」ファイルを修正していかなければならず困っております。 Microsoft Officeについては【Windows XP】と【Windows ７】は完全互換性があると理解しておりましたが、違っていたのでしょうか？ それとも、何か設定方法があるのでしょうか？ 回答のほど、宜しくお願い致します。 なお、パソコンの仕様は下記の通りです。 以前のパソコン：【WIndowsXP（VALUESTAR）】のデスクトップパソコン、 新しいパソコン：【Windows ７（64ビット）（Lenovo G550 2958LGJ）】のノートパソコン、 Excelは【Microsoft Office XP Personal】です。
- ベストアンサー
- その他MS Office製品
- Excel VBA コメントに関して
Excel2003を使用しています。 VBAになるのかは定かではないのですが Excelの機能に「コメント」を付ける機能がありますよね セルに対してカーソルを合わすことで表示される黄色い枠のコメントのことをしるす。 これをオートシェイプやコマンドボタン等のオブジェクトに対してカーソルを合わせることに よってこのコマンドがなんなのかのコメントを付けたい場合Excelでできるのでしょうか? もし、できるとしたならばどのようにしたらいいのでしょうか? VBAを使いできるのか、もっと楽な方法があるのか 教えて頂きたいのです。 ご教授願えないでしょうか、宜しくお願いします(人>д<*ペコ謝) ※補足※ コマンドボタンやオートシェイプでテキストを入れてしまうとボタン自体が入れる文字数によって大きくなってしまうのでできるだけ小さいボタンを作り補足事項やヘルプとして使用したい。 コマンドボタンにはVBAプログラムを組むとして、オートシェイプならば、図形にマクロを登録するとして、カーソルを合わした時のみコメントを表示させたいということです。
- 締切済み
- Excel（エクセル）
- Excel-VBA コメントの書式設定
Excel-VBA コメントの書式設定 コメントの書式設定をExcel-VBAで定義したい。 従い「マクロの記録」を実行して下記のソースコードを取得しました。 これを実行すると次の実行エラーが発生しました!? ★正常に動作させるソースコードの事例をいただければ幸いです。 ご指導よろしくお願いいたします。 実行時エラー'438' オブジェクトは、このプロパティまたはメソッドをサポートしていません。 Sub Macro1() ' 処理:マクロの記録 ' 目的:「コメントの挿入」と「コメントの書式設定」をする。 Range("A2").Select Range("A2").AddComment Range("A2").Comment.Visible = False Range("A2").Comment.Text Text:="コメント" & Chr(10) & "今日は良いお天気ですね。" '▽次で実行エラーが起きる!? Selection.ShapeRange.ScaleWidth 1.58, msoFalse, msoScaleFromTopLeft Selection.ShapeRange.ScaleHeight 1.49, msoFalse, msoScaleFromTopLeft Selection.ShapeRange.Fill.Visible = msoTrue Selection.ShapeRange.Fill.Solid Selection.ShapeRange.Fill.ForeColor.SchemeColor = 9 Selection.ShapeRange.Fill.Transparency = 0# Selection.ShapeRange.Line.Weight = 0.75 Selection.ShapeRange.Line.DashStyle = msoLineSolid Selection.ShapeRange.Line.Style = msoLineSingle Selection.ShapeRange.Line.Transparency = 0# Selection.ShapeRange.Line.Visible = msoTrue Selection.ShapeRange.Line.ForeColor.RGB = RGB(0, 0, 0) Selection.ShapeRange.Line.BackColor.RGB = RGB(255, 255, 255) Selection.ShapeRange.LockAspectRatio = msoTrue Selection.ShapeRange.Height = 141.75 Selection.ShapeRange.Width = 283.5 Range("A1").Select End Sub
- ベストアンサー
- Visual Basic
- 余白設定
いつも、回答ありがとうございます。 Linux MintのOS xedのテキストエディター を使っています。 CANON MP470のインクジェットを使用して、印刷ができます。 ●Q01. しかし、 上余白 下余白 右余白 左余白は、 どこで設定するのでしょうか? 印字されるときは、最低の余白しか取られません。 これでは、ファイルに紙を閉じるときのスペースがありません。 教授方よろしくお願いします。 敬具
- ベストアンサー
- その他(Windows)
- Excel2007ページ設定余白の数字
WIN７、Ｅｘｃｅｌ２００７です。 ページ設定の余白（左右上下）の設定数字が他の人のExcel2007だと１０分の１の表示になります。例えば私のPCだと余白・左＝１１ だとすると、友人のPCだと左＝１．１と表示されるようです。この原因およびどちらかを修正することが出来ますか？教えて下さい。
- ベストアンサー
- Excel（エクセル）
- Wordの余白設定についてです。
Wordの余白設定についてです。どのようにすれば、きれいでバランスのとれた文書を作成することができるのでしょうか？みなさまは、文書を作成する時、どのように余白を決めて設定していらっしゃいますでしょうか？ みなさま、こんにちは。Wordの余白設定について悩んでいます。いろいろと調べてみましたら、白銀比（1：1.414（√2））というものがあるそうです。日本古来から使われており、用紙のサイズの規格としても使われている、美しくバランスよく見える比率だそうです。 ページの余白設定をする場合、白銀比になるように余白を設定すべきか、それとも上下左右ともに同じ余白に統一すべきか。どのような用途に使い分ければよいのか少し悩んでおります。 どなたかご回答して頂けますよう、よろしくお願い致します。
- 締切済み
- Word（ワード）
- 余白設定が出来ないんです(＞_＜)
ネットから無料ダウンロードした年賀状のテンプレートを保存まで出来たのですが、 印刷したら、どうしても上端に余白が数センチ出来てしまい、うまく印刷出来ません。 印刷プレビューにも数センチの余白が見受けられます。 何時間も数日かかりで手当たり次第、色々なところをクリックして、 「用紙設定」の中で余白の設定するところをやっと見つけたのですが、 そこだけグレー色？で設定が出来ないようになっているんです・・・・ 余白なしに印刷したいのですが、どこをどのように設定し直せばいいのでしょうか。 もう数時間ずっと格闘しているのですが、どうしても出来ないので、 さすがに疲れてしまいました。。。。 周りに誰も聞く人がいないので、困っております(＞_＜) パソコンに詳しい方よろしくお願い致します。
- ベストアンサー
- Windows XP
お礼
回答ありがとうございます。 「TextFrame」で、余白の設定ができるようになるんですね。 「Application.CentimetersToPoints」は、長さの単位をcmにする設定ですね。 あまり、分からないのでとりあえずdoara_2011さんが書かれたそのままのコードを入力してみます。 コードを詳細に記載し、注意も書いていただき、本当にありがとうございました。
補足
すいませんがもう一つ質問を忘れていました。 コメントの長さを設定するコードはどうのように入力すればよいのでしょうか？ できればもう一度回答いただければうれしいです。 よろしくお願いします。