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

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

No.3 ベストアンサー 回答者： mu2011 回答日時： 2005/11/15 12:19

相違していましたら無視して下さい。

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

この回答へのお礼

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

お礼日時：2005/11/16 14:23

No.4 回答者： imogasi 回答日時： 2005/11/15 20:58

＞必要な日にちだけ○で囲みたい

よく読むと
（１）日付数字を○で加古みたい
（２）日付セルに対応する下とか右とかのセルの○を入れたい
のようにどちらにも取れませんか。
手作業でも良いのか？
（１）だとして、自動的にするには、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

この回答へのお礼

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

お礼日時：2005/11/16 14:15

No.2 回答者： googuy 回答日時： 2005/11/15 12:18

　「挿入」>「ツールバー」>「図形」でエクセル画面下から楕円を選んで、所望の場所に楕円(円)描画の後、これを右クリックして「オート

シェイプの書式設定」で「塗りつぶし無し」にすれば良いのでは？

この回答へのお礼

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

お礼日時：2005/11/16 14:22

No.1 回答者： suiko_wkk 回答日時： 2005/11/15 12:11

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

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

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

この回答へのお礼

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

お礼日時：2005/11/16 14:18