A 回答 (5件)
- 最新から表示
- 回答順に表示
No.5
- 回答日時:
答えにはなっていませんが、角丸四角を作成しました。
オートシェイプの基本図形に円弧があります。書式設定で高さ、幅をともに0.5とし、これを90度づつ回転させ4個作ります。
四隅に配置し、4本の直線(ex.横10cm縦12cm)で結びグループ化します。次にこの四角形の直線部に内接する四角形を
境界線色なし、背景色白で配置します。順序設定で、グループ化した角丸四角を前面にもってきて、最後にこの背景と角丸四角をグループ化すれば完成です。
こんなことしたくないので質問されたんでしょうね。
ははは。
No.4
- 回答日時:
私も同じことをやりたくて検索してこちらにたどり着きました。
もう3年も経過しているので回答は不要かもしれませんが・・・。結局海外のサイトで似たような質問と回答を見つけました。マクロを使う方法ですが、それをアレンジしたやり方を紹介します。Office XPで動作することを確認しました。
角を丸くする前の元の四角形の角に、円の4分の1の円弧を当てた状態をイメージしてください。
その円弧の半径と、元の四角形の短辺の長さの比率を oshp.Adjustments.Item(1) にセットします。
たとえば元の四角形の長辺が100、短辺が60だったとしましょう。4分の1の円弧を角に当てるときに当てられる最大の円弧は短辺の半分の30を半径とする円弧です。長辺の半分の50を半径とする円弧は短辺で重なりが出てしまって当てられません。
円弧の半径30と元の四角形の短辺60の比率、すなわち30÷60=0.5が丸みの大きさとして設定できる最大値です。
丸みをまったく与えない場合に設定する値は0になります。
大きさの異なる角丸四角形の角の丸みを統一するには、あてがう4分の1円弧の半径と、ここの四角形の短辺の比率をセットしていけば良いことになります。
以上を実現するマクロが以下のようになります。角丸四角形を複数選択した状態でこのマクロを実行すると、最も小さい短辺を持つ四角形の短辺の20分の1を半径とする円弧をすべての四角形の角の丸みに設定します。
与える丸みの円弧の半径を決め打ちするなら、一番小さい四角形の短辺を探すループは不要です。
Sub Macro1()
Dim oshp As Shape
Dim w As Double
Dim h As Double
Dim a As Double
Dim min As Double
Dim temp As Double
min = 1E+50 'ありえないほど大きい値にしておきます。
On Error Resume Next
'選択された角丸四角形の辺の最も小さいものを探す
For Each oshp In ActiveWindow.Selection.ShapeRange
w = oshp.Width
If min > w Then min = w
h = oshp.Height
If min > h Then min = h
Next
'最も小さい辺の2分の1の長さに対して、頂点から10分の1の長さまでのrを付ける
For Each oshp In ActiveWindow.Selection.ShapeRange
w = oshp.Width
h = oshp.Height
If w > h Then
w = h '小さい辺のほうを求める
End If
a = (min / 10) / (w / 2)
oshp.Adjustments.Item(1) = a
Next
End Sub
No.3
- 回答日時:
角丸四角形の角の大きさとは隅の円のR(アール、半径)のことでしょうが、これはサイズ比例になっていて、自由には帰られないのではないでしょうか(最大はr(半径)=短巾X1/2でしょうが、そこまでできず、1/6ぐらいで定率に見えます。
(エクセルの内部のことなので自信ありません)
No.2
- 回答日時:
オートシェイプを複数範囲選択した状態で、右クリック→オートシェイプの書式設定で
サイズの高さと幅を入力することで一括変更できますよ。
オートシェイプの複数選択方法なのですが、パッと思いつくもので3通りあります。どれでもいいです。
1.Shiftキーを押しながらオートシェイプをクリック
2.図形描画ツールバーで「矢印」コマンドボタンを押してドラッグによる範囲選択
(通常マウスポインタは十字ですが、ボタンを押すと「矢印」に変わります)
3.F5キーを押して「ジャンプ」を開き、「セル選択」ボタンを押した後に、「オブジェクト」を選択し、OK
(全てのオブジェクトが選択されるので、特定のオブジェクトのみを指定したい場合は不向き)
などがあります。いかがでしょうか?
この回答への補足
サイズの高さや幅の異なる角丸四角形で、角の大きさだけを統一したいと考えています。一つづつだと、黄色の編集点で大きさを変更できるのですが・・・
補足日時:2007/02/16 17:18お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- 画像編集・動画編集・音楽編集 medibang での文字の整列の仕方 1 2023/06/02 06:38
- Illustrator(イラストレーター) イラストレーターで文字の背景に自動で入れた長方形の左側の角だけ丸く(右側だけ直角に)する方法 4 2023/04/21 11:08
- 高校 数学Aの問題で、円に内接するN角形(N>4)の対角線の総数は ア 本である。また、Fの頂点三つからで 1 2023/04/13 17:47
- 掃除・片付け リビングの天井にある蛍光灯を使った四角い枠の電気から、丸形のLEDの電気に変えました。 それまで四角 3 2022/12/26 13:44
- Excel(エクセル) エクセルの数式で教えてください。 1 2023/02/02 10:20
- 数学 四角形の角度のことで聞きたいです。 円に内接する四角形は外角と対角が等しいと学んだ気がするんですが、 5 2022/07/27 05:52
- ルーター・ネットワーク機器 NTTから借りたルーターに繋がっている線 6 2023/02/26 23:28
- 数学 三角関数の2倍角の公式は加法定理の公式をどう変形?したら作れるのでしょうか 4 2022/06/11 14:39
- 数学 『弧は弦より長し』 8 2022/04/18 10:23
- 物理学 量子力学 球面調和関数 導出 方位角成分 微分方程式の解 2 2022/07/02 13:40
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルの図形で弧を書く方法
-
AutoCad 二つの曲線の最も近い...
-
autoCADで三辺を指定して三角形...
-
エクセルで、渦巻きを作りたい。
-
ハートを書きたい!
-
officeのvisioで線を交差させる
-
AUTO CAD操作方法 半円の書き方
-
円弧の線上にスナップしたい
-
auto-Cad の使い方 内接する円...
-
ベクターワークスで円弧状に図...
-
曲線の横断方向
-
MAYAで2個の円をスムーズにつな...
-
曲線の長さ
-
オートシェイプの円弧
-
透視図法について
-
Auto CAD 2002 弧の長さを指定して
-
【CADで直線と円弧の交点座標を...
-
AUTOCADで懸垂曲線(カテナリー...
-
Auto CADで、接線がうまく引け...
-
JW_CADの設定「点半径」って...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルの図形で弧を書く方法
-
エクセルで、渦巻きを作りたい。
-
autoCADで三辺を指定して三角形...
-
JW CAD 円に放射状の線を等間隔...
-
ハートを書きたい!
-
エクセルVBAでオートシェープを...
-
Auto CADで、接線がうまく引け...
-
officeのvisioで線を交差させる
-
【CADで直線と円弧の交点座標を...
-
渦巻き製図
-
円弧の線上にスナップしたい
-
AutoCad 二つの曲線の最も近い...
-
半円の描き方
-
AUTO CAD操作方法 半円の書き方
-
AUTOCADで懸垂曲線(カテナリー...
-
曲線の長さ
-
曲線の横断方向
-
AutoCAD 異なるR 接円
-
エクセルの角丸四角形の角の大...
-
JW_CADの設定「点半径」って...
おすすめ情報