エクセルのスプレットシートでセルのコメントに付ける
吹き出しの矢印線を太く出来ますか?

「エクセル コメントの矢印線を太く出来ます」の質問画像

A 回答 (1件)

枠の方は出来ますが矢印線は無理みたいです。


常にコメントが表示されるのでしたら、オートシェイプの吹き出しを利用しては如何でしょうか。
    • good
    • 0
この回答へのお礼

了解!

お礼日時:2011/04/26 22:28

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Qエクセルのコメントの引き出し線の位置

お世話になります。

コメントがたくさんついているエクセルファイルがあるのですが、
なぜか引き出し線の位置がばらばらです。

普通に作成すると、コメント欄の左上から引き出し線がでると思いますが、
このファイルはコメント欄の四隅や、各辺の中央から引き出し線が出ており、
統一されていません。

これをVBAで左上に統一したいのですが、コマンドが判りません。

.adjustments.item は吹き出しのみ対象なのでしょうか、
エラーが出てうまくいきませんでした。

ご存知の方がいらっしゃいましたらよろしくお願いします。

Aベストアンサー

てきとーに書いてみたので、参考になれば。書式コピーは最小限なので、必要に応じて追加してください。

※注意:コメントは、CommentがShapeを操作する形で、2オブジェクトで構成されてます。Shape削除すると壊れるので、削除はCommentの方で。

'シート内のコメントを全て作り直し
For Each c In ActiveSheet.Comments
Set rng = c.Parent 'セルを取得
v = c.Visible
txt = c.Shape.TextFrame.Characters.Caption 'c.Textでもいい
x = c.Shape.Left
y = c.Shape.Top
h = c.Shape.Height
w = c.Shape.Width
With c.Shape.TextFrame '書式
 imax = .Characters.Count
 ReDim a(1 To imax, 1 To 10)
 For i = 1 To imax
   Set z = .Characters(i, 1).Font
   a(i, 1) = .Characters(i, 1).Font.Size
   a(i, 2) = .Characters(i, 1).Font.ColorIndex
   a(i, 3) = .Characters(i, 1).Font.Bold
   a(i, 4) = .Characters(i, 1).Font.Italic
 Next
End With
c.Delete 'コメント削除
Set c = rng.AddComment(txt) '追加
c.Visible = v
c.Shape.Left = x
c.Shape.Top = y
c.Shape.Height = h
c.Shape.Width = w
With c.Shape.TextFrame '書式
 For i = 1 To imax
  Set z = .Characters(i, 1).Font
  .Characters(i, 1).Font.Size = a(i, 1)
  .Characters(i, 1).Font.ColorIndex = IIf(a(i, 2) = 74,xlAutomatic, a(i, 2))
  .Characters(i, 1).Font.Bold = a(i, 3)
  .Characters(i, 1).Font.Italic = a(i, 4)
 Next
End With
Next

てきとーに書いてみたので、参考になれば。書式コピーは最小限なので、必要に応じて追加してください。

※注意:コメントは、CommentがShapeを操作する形で、2オブジェクトで構成されてます。Shape削除すると壊れるので、削除はCommentの方で。

'シート内のコメントを全て作り直し
For Each c In ActiveSheet.Comments
Set rng = c.Parent 'セルを取得
v = c.Visible
txt = c.Shape.TextFrame.Characters.Caption 'c.Textでもいい
x = c.Shape.Left
y = c.Shape.Top
h = c.Shape.Height
w = c.Shape.Width
With ...続きを読む

Qエクセルで矢印の太さを変えたい

エクセルで矢印を使うと→こんな矢印
しか出ません。太さを変えたり白抜き
したりしたいのですが方法を教えて下
さい。

Aベストアンサー

オートシェイプのブロック矢印はどうでしょうか?

Qワードのコメント枠の色を変更する方法

ワードで文字列を選んで「挿入」から「コメント」を作ったところコメントの挿入枠が最初は「薄いピンク」でしたが、特に何もしないのにある時から「薄い青色」になってしまいました。
ウィンドーズXP ワード2003です。

1.元の「薄いピンク」に戻す方法はありますか
2.できれば「薄い黄色」の枠にしたいのですが色を変更する方法はありますか。。

Aベストアンサー

2.画面上にコメント関係のツールバー(左に「最終版(変更箇所/コメントの表示)」とあるもの)が出ていると思います。ない場合は、[表示(V)]→[ツールバー(T)]→[チェック/コメント]。
 そのツールバー中の[表示(S)]→[オプション(O)]で「変更の履歴」画面を出して、[コメントの色(:)]を変えることができます。

1.2.で[コメントの色(:)]が「校閲者別」になっていませんでしたか?
 その場合、他のパソコンにファイルを持っていって作業したり、windows起動時に以前と違うユーザ名でログインしたりしたため、「違う校閲者」とみなされて色が変わったことが考えられます。
 もし同じ文書中に色の違うコメントがあれば、コメントのツールバーの[表示(S)]→[校閲者(R)]で、どのような校閲者名があるかが確認できると思います。

QエクセルのIF関数で、文字が入力されていたならば~

エクセルのIF関数で文字が入力されていたならば~、という論理式を組み立てたいと思っています。

=IF(A1="『どんな文字でも』","",+B1-C1)

A1セルに『どんな文字でも』入っていたならば、空白に。
文字が入っていなければB1セルからC1セルを引く、という状態です。

この『どんな文字でも』の部分に何を入れればいいのか教えてください。

またIF関数以外でも同様のことができれば構いません。

宜しくお願いします。

Aベストアンサー

=IF(ISTEXT(A1),"",B1-C1)

でどうでしょうか?

Qエクセルでセルに挿入したコメントの表示位置について

セルに挿入したコメントの表示位置を自由に設定する事はできないのでしょうか?

画面右の方にあるセルにコメントを挿入したのですが、カーソルを合わせるとセルの右にコメントが表示されるので、スクロールさせてからセルにカーソルを合わせないと、挿入したコメントが全部見えない状態になります。

コメント編集時には、コメントが全部見えるように画面中央に設置しています。
ですが、実際にカーソルをセルに合わせると、セルの右側にコメントが表示されてしまいます。

コメントの表示位置を設定する事はできないでしょうか?
アドバイスをお願い致します。

Aベストアンサー

コメントのボックスの位置を変えて、マクロの記録をとると
Sub Macro1()
Selection.ShapeRange.IncrementLeft -96.75
Selection.ShapeRange.IncrementTop 13.5
End Sub
のようになる。
だから普通で、画面の端にきたら、内側に位置換えすることは、VBAに堪能なら出来そうだ。
現ウインドウのサイズや現コメントボックスのサイズやを計算して
位置決めが必要だが、面倒なので省略するが。
ーー
ウインドウのヘルプ画面などうまく画面の端で切れるのを避けて、場所移動してくれるのも多いように見えるが、コメントはそうしてくれないようだ。
右クリックのプルダウンなども下ですると、上に吹き上がるように表示するのに。
ーー
VBA以外で、操作や設定で、質問のようには出来ないでしょう。

QExcel2003 の『コメント』の編集位置が、あらぬ位置に勝手に移動してしまう件で教えて下さい。

Excel2003でコメントを使用しているのですが、暫くぶりにコメントを編集した時に、何時も困る事がございます。
コメントの『表示』(常時・ポイント時共)では、設定セルの近くにキチンと表示されるのですが、「編集画面(コメントのボックス?)」が、設定セルから程遠い有らぬ位置に飛んでいる経験はございませんでしょうか?

■原因
・列や行等の表示・非表示?
・セルの挿入?
どの時点で飛んでしまったのか理解していないので、私の勝手な想像ですみません…。
コメント設定時には、キチンと設定セルの傍に「編集画面」も有るのですが、日々使用し、忘れた頃に確かめると、あらぬ所に飛んでおります。

■希望
この現象を回避し、「編集画面」もコメント設定セル付近に表示させていたいです。
(1)どの様に設定すれば宜しいでしょうか?
私の経験では、「コメントの書式設定」-「プロパティ」-「オブジェクトの位置関係」で、
a「セルに合わせて~変更をしない」……これが、一番遠くに飛んでしまってました。
b「~移動するが、サイズ変更しない」…遠くに飛んでおります。
c「~移動やサイズ変更をする」…………飛んで行き、かつサイズが0。

(2)全てのコメント位置を一度に修正(コメント設定セルの側に戻す)する方法はございますか?
沢山設定していると、一つ一つ修正する作業はかなり大変です。

過去の履歴でも、解決出来ていないようです。
http://oshiete1.goo.ne.jp/qa886274.html

どなた様か、ご存知の方がございましたら、是非教えて下さい。
宜しくお願い致します。

Excel2003でコメントを使用しているのですが、暫くぶりにコメントを編集した時に、何時も困る事がございます。
コメントの『表示』(常時・ポイント時共)では、設定セルの近くにキチンと表示されるのですが、「編集画面(コメントのボックス?)」が、設定セルから程遠い有らぬ位置に飛んでいる経験はございませんでしょうか?

■原因
・列や行等の表示・非表示?
・セルの挿入?
どの時点で飛んでしまったのか理解していないので、私の勝手な想像ですみません…。
コメント設定時には、キチンと設定セルの傍...続きを読む

Aベストアンサー

コメントの位置を修正するなら以下のような操作が簡単かもしれません。

コメントのシートのA列からデータ範囲の列を選択して、Ctrl+Cでコピーし、空白シートのA1セルでCtrl+Vで貼り付け、そのままもう一度Ctrl+Xで切り取り、元のシートのA1でCtrl+Vで貼り付けます。

QEXCELのセルが動かないです

普通は、矢印キーを押すと、セルが動きますよね。

今日、仕事中
矢印キーほ押してもセルが動かなくなりました。
画面は動きますがセルがついて来ないのです。
そのPCで使う場合どのエクセルも同様の動きです。

ツールバーあたりを設定する必要がありますかね。

Aベストアンサー

そのPCのScroll Lock (Scr Lk)キーが押されていませんか?

QEXCEL VBAマクロ作成で、他のEXCELからデータを取り込みたい

メインプログラム(EXCEL VBA)より、
他のフォルダーにあるEXCELの項目の内容を取り込みたいです。
たとえば他のフォルダーのEXCELのRange("A2:A3").ValueをメインプログラムのRange("C2:C3").Valueにセットしたい時です。

・コマンドボタン押したら、どこのEXCELから取り込むかのポップアップ(?)は、表示はできてます。
・作業者が選んだパスとブックもMsgBoxで表示できてるので、もらう相手の場所も取得できてます。

・となると次はOPEN,INPUTですか?
テキストデータの取り込みですと、Inputでそのバッファを定義してるのですが、なんか違うような。。。

よろしくお願いします!

Aベストアンサー

私がやる方法です。

Dim writeSheet As Worksheet ' 自分自身の書き出し先シート
Set writeSheet = ThisWorkbook.Worksheets(1) ' Sheet1 を参照

Dim readBook As Workbook ' 相手ブック
Set readBook = Workbooks.Open(filename) ' 相手ブックを開いて参照
Dim readSheet As WorkSheet ' 相手シート
Set readSheet = readBook.Worksheets("sheetName") ' 相手シートを参照
' または Set readSheet = readBook.Worksheets(sheetIndex)

' 例えば
writeSheet.Cells(1, 1).Value = readSheet.Cells(2, 2).Value ' 相手シートの B2 の値を自分自身の A1 に書き込む

readBook.Close False ' 相手ブックを閉じる
Set readSheet = Nothing
Set readBook = Nothing

私がやる方法です。

Dim writeSheet As Worksheet ' 自分自身の書き出し先シート
Set writeSheet = ThisWorkbook.Worksheets(1) ' Sheet1 を参照

Dim readBook As Workbook ' 相手ブック
Set readBook = Workbooks.Open(filename) ' 相手ブックを開いて参照
Dim readSheet As WorkSheet ' 相手シート
Set readSheet = readBook.Worksheets("sheetName") ' 相手シートを参照
' または Set readSheet = readBook.Worksheets(sheetIndex)

' 例えば
writeSheet.Cells(1, 1).Value = readSheet.Ce...続きを読む

Q「基」と「元」の使い方

経験を"もと"に話す。
上記の場合の”もと”は元、基のどちらが正しいのでしょうか?
よろしくお願いします。

Aベストアンサー

はじめまして。

ご質問1:
<上記の場合の”もと”は元、基のどちらが正しいのでしょうか?>

「基」になります。

1.「経験を"もと"に話す」とは言い換えれば「経験にもとづいて話す」ことと同じです。

2.「もとづい(て)」は「もとづく」の連用形です。

3.「もとづく」は「基づく」という漢字しか存在しません。

4.従って、ここでは元、本、素などの漢字は適切ではありません。


ご質問2:
<経験を"もと"に話す。>

1.「~をもとに」という語感が「~を元に戻す」といった語感になるため、「元」の漢字を想定されたのだと思われます。

2.しかし、ここで使われる「もと」とは「土台」の意味になります。

3.他の漢字「元」「本」などには「土台」「ベース」といった意味はありません。

4.従って、ここでは基が適切な漢字となります。

以上ご参考までに。

Qエクセルで図形やオートシェイプの位置がずれるのは仕方ないのでしょうか?

エクセルで図形やオートシェイプの位置がずれるのは仕方ないのでしょうか?
四角形や楕円、オートシェイプなどの図形を文書に載せると、テキストとの位置関係が必ずずれるのですが、これはなんとかならないのでしょか?
バッチリ位置を合わせたつもりでも、印刷したり印刷プレビューで見たりするとずれてしまいます。
どうすればいいでしょか。

Aベストアンサー

残念ですが、どうにもしかたないそうです。
表計算が主な機能であるため、印刷イメージや実際の印刷などでの計算はかなりはしょったソフトなんだそうです。

ただ、対処法が無いわけではありません。
印刷直前の表を、Excel標準の「カメラ機能」で画像としてキャプチャし、新しいシートに貼り付け、それを印刷することで、画面上の表示そのままの印刷が可能です。
ちょっと面倒ですけど。


このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング

おすすめ情報