Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

58096 / 76732

←次へ　｜　前へ→


	【23368】Re:図形をアクティブセルの中心に貼り付けたい

kobasan - 05/3/19(土) 19:43 -


	引用なし

	パスワード

▼okb さん,ichinose さん　今晩は

>わたしの質問がまずかったのですが、本当にしたいのは、アクティブセルを○で
>囲みたいのですが、図形を貼り付けると、値が裏に隠れますが、値も消えないように重ね合わせはできないですよね。
>そこで、FreeFormで円に近い線を貼り付けたいと思うのですが、

FreeFormを使わなくても、楕円Shapes("Oval 数字")のままでもできます。

　　>With ActiveSheet
　　>　.Paste
　　>　Set novl = .Shapes(.Shapes.Count)
　　>End With
　　'
　　'【23272】のコードに下を追加してみて下さい。
　　Selection.ShapeRange.Fill.Transparency = 1#　　'図形を透明化

0 hits

▼

【23268】図形をアクティブセルの中心に貼り付けたい okb 05/3/17(木) 21:34