カレンダーの数字を○で囲むには・・

質問

エクセルでカレンダーを作成中。必要な日にちだけ○で囲みたいのですがやり方がわかりません。どなたか教えて下さい。

回答No.3

mu2011 · ベストアンサー

相違していましたら無視して下さい。
1.図形描画バーにある○をクリックしてシートに挿入
2.○上で（小さい□で囲まれている）右クリック→オートシェイプの書式設定→色と線→塗りつぶしなしを選択
3．対象の日に移動し、○サイズを調整、印刷プレビューで確認

お礼

ありがとうございました。
いちいちするのは面倒ですが、頑張ります。

回答No.4

imogasi

＞必要な日にちだけ○で囲みたい
よく読むと
（１）日付数字を○で加古みたい
（２）日付セルに対応する下とか右とかのセルの○を入れたい
のようにどちらにも取れませんか。
手作業でも良いのか？
（１）だとして、自動的にするには、VBAでやる必要があるでしょう。
A1:A5に１－５をいれ、横位置を中央ぞろえにして、セルの高さを・幅を適当にして実行すると、イメージはわかります。
これを必要な日にちを指定するものに改造するには、スキルがいると思いますが、下記は臭いだけ。
Sub test02()
Dim Wset
Dim Obj1
For i = 1 To 5
Set WShape = Worksheets("Sheet2").Shapes
Set Obj1 = WShape.AddShape(msoShapeOval, Cells(i, "A").Left + 10, Cells(i, "A").Top + 5, _
Cells(i, "A").Width * 2 / 3, Cells(i, "A").Height * 2 / 3)
With Obj1
.Fill.Visible = msoFalse '塗りつぶし無し
.Line.Weight = xlThin '線を細線に、xlThinの代わりに1, 2, 3, 4 でもよい
.Name = "maru" & i
End With
Next i
End Sub

お礼

ありがとうございます。
難しすぎて対処できませんでした。

回答No.2

googuy

「挿入」>「ツールバー」>「図形」でエクセル画面下から楕円を選んで、所望の場所に楕円(円)描画の後、これを右クリックして「オートシェイプの書式設定」で「塗りつぶし無し」にすれば良いのでは？

お礼

ありがとうございました。
《塗りつぶし無し》の効果が良かったです。
○をつけても、数字が消えちゃってたから、謎だったの。
すっきりしました。

回答No.1

suiko_wkk

自動ではなく、オートシェイプでよろしければ・・・

エクセルが面した側に　オートシェイプ(U) ＼・・・
見たいなのがありますのでそこの□○の○をクリックして
必要な日にちに丸をつけてください。

アイコンがない場合はアイコンエリアを右クリック叩いて
図形描画という項目を追加してください。

お礼

ありがとうございました。
早速やってみました。