
No.2ベストアンサー
- 回答日時:
>「等間隔で」の意味が良く判らないのですが下記でいかがですか。
円を等角の扇形に分割するものと解釈して、下記をワークシートsheet1上で実行してください。
Sub test02()
Worksheets("sheet1").DrawingObjects.Delete
'中心は100+160/2,30+160/2
'半径は160/2
ActiveSheet.Shapes.AddShape(msoShapeOval, _
100, 30, 160, 160).Select
For i = 0 To 360 Step 30
s = 3.14159 * i / 180
' ActiveSheet.Shapes.AddLine(100 + 160 / 2, 30, 100 + 160 / 2, 30 + 80).Select
ActiveSheet.Shapes.AddLine(100 + 80, 30 + 80 - 80 * Cos(s), 100 + 80 + 80 * Sin(s), 30 + 80).Select
Selection.ShapeRange.Flip msoFlipVertical
Range("E3").Select
Next i
End Sub
For i = 0 To 360 Step 30の30(度)を色々変えて実行してください。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
今、見られている記事はコレ!
-
弁護士が解説!あなたの声を行政に届ける「パブリックコメント」制度のすべて
社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
-
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」
「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
-
釣りと密漁の違いは?知らなかったでは済まされない?事前にできることは?
知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
-
カスハラとクレームの違いは?カスハラの法的責任は?企業がとるべき対応は?
東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。 この動きは自治体...
-
なぜ批判コメントをするの?その心理と向き合い方をカウンセラーにきいた!
今や生活に必要不可欠となったインターネット。手軽に情報を得られるだけでなく、ネットを介したコミュニケーションも一般的となった。それと同時に顕在化しているのが、他者に対する辛らつな意見だ。ネットニュース...
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【関数】3つのセルの中で最新...
-
【マクロ】数式を入力したい。...
-
【マクロ】変数に入れるコード...
-
エクセルの関数について
-
【マクロ】excelファイルを開く...
-
エクセルのリストについて
-
【マクロ】実行時エラー '424':...
-
【マクロ】左のブックと右のブ...
-
Office2021のエクセルで米国株...
-
【マクロ】元データと同じお客...
-
エクセルのVBAで集計をしたい
-
【マクロ】【相談】Excelブック...
-
vba テキストボックスとリフト...
-
【マクロ】【配列】3つのシー...
-
他のシートの検索
-
【画像あり】オートフィルター...
-
エクセルシートの見出しの文字...
-
LibreOffice Clalc(またはエク...
-
【関数】=EXACT(a1,b1) a1とb1...
-
Dir関数のDo Whileステートメン...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルVBA 作業後に選択範囲...
-
別のフォームで記述している関...
-
VBAでのユーザフォームの表示有...
-
Excel VBA 選択範囲の罫線色の...
-
エクセル マクロ 別シートから...
-
ascW関数の結果がおかしい
-
ACCESSで別DBにあるクエリを...
-
最小化ボタンで最小化したフォ...
-
ステップモードの動作確認方法
-
Sub Auto_Open() 実行されない
-
BASIC ListViewの選択された行...
-
ExcelVBAで毎月月初の最初にBoo...
-
C++Builderのエラー...
-
Excelのマクロ実行後に動作が重...
-
excelのvbaを使って日付を置換...
-
VBAで選択クエリを実行したらデ...
-
円の中に等間隔に線を引くには
-
メニューバーのイベントが2回...
-
MATLABの乱数生成関数 rand( ) ...
-
エクセル VBA
おすすめ情報