Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


48378 / 76736 ←次へ | 前へ→

【33294】Re:VBAで棒グラフを書いてますが・・大きさが
発言  ichinose  - 06/1/7(土) 17:07 -

引用なし
パスワード
   つまり、100%の半分のスケールを50%にしたいということですね
>>
>>>ActiveSheet.Shapes.AddShape(msoShapeRectangle, _
>>>                Range("H56).Left, _
>>>                Range("H56).Top + 4.5, _
>>>                Range("H56).Width + 123, _
>>>                Range("H56).Height - 4.5).Select
>>>
>>>ActiveSheet.Shapes.AddShape(msoShapeRectangle, _
>>>                Range("H56).Left, _
>>>                Range("H56).Top + 4.5, _
                  (Range("H56).Width + 123)/2, _
>>>                Range("H56).Height - 4.5).Select
ですよね?
正確には、

Int((Range("H56").Width + 123) / 0.75) * 0.75

が100%のWidthで

Int((Range("H56").Width + 123) / 2 / 0.75) * 0.75

が50%のWidthですが・・・。

ポイントは0.75単位ですから。

0 hits

【33277】VBAで棒グラフを書いてますが・・大きさが mame 06/1/7(土) 9:56 質問
【33281】Re:VBAで棒グラフを書いてますが・・大きさ... だるま 06/1/7(土) 10:35 回答
【33288】Re:VBAで棒グラフを書いてますが・・大きさ... mame 06/1/7(土) 13:41 質問
【33290】Re:VBAで棒グラフを書いてますが・・大きさ... だるま 06/1/7(土) 16:23 回答
【33292】Re:VBAで棒グラフを書いてますが・・大きさ... mame 06/1/7(土) 16:53 質問
【33291】Re:VBAで棒グラフを書いてますが・・大きさ... ichinose 06/1/7(土) 16:51 発言
【33293】Re:VBAで棒グラフを書いてますが・・大きさ... mame 06/1/7(土) 16:56 質問
【33294】Re:VBAで棒グラフを書いてますが・・大きさ... ichinose 06/1/7(土) 17:07 発言
【33332】Re:VBAで棒グラフを書いてますが・・大きさ... mame 06/1/9(月) 14:52 お礼

48378 / 76736 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free