EXCEL VBAのshapeの下記のコードで複数の線分を描いていますが、ブレークポイントを設定してステップ送りすると最初の1本目の線分に指定した色が付かず黒の線分になります。ブレークポイントを設定しないで連続動作させると全て黒の線分になってしまいます。
shapeを使用している部分は、この他にワードアートの部分だけです。
ワードアート部分を全てコメントに変更しても動作は変わりません。
shape部分のコードは以下の通りです。
Worksheets("sheet1").Shapes.AddLine(beginx:=xA, beginy:=yA, endx:=xB, endy:=yB).Select
With Selection
.ShapeRange.Line.ForeColor.SchemeColor = 2
End With
ワードアートのコードは以下の通りです。
MyShape = Worksheets("深度図").Shapes.AddTextEffect(msoTextEffect1, str_C & str_D, "MS ゴシック", 9, msoTrue, msoFalse, x_pos, y_pos)
どなたかこのような経験をされた方がいらっしゃったら、回答をお願いします。
No.1ベストアンサー
- 回答日時:
マクロを記録すると Select~ とか、Active~ が良く出てくるけど、
これって選択状態にならなきゃいけない、つまりフォーカスを受け取れる
状態で無いと失敗するはずです。
ブレークポイントを指定すると、Active な Window はコードの画面では?
Active な Window しかフォーカスは受け取れませんから、Selection とか
全部使えないと思います。
(だから職業プログラマレベルの人は、Select~ とか、Active~ という
キーワードの無いプログラムを書きます)
Dim MyShape As Excel.Shape
Set MyShape = Worksheets("sheet1").Shapes("ShapeTest")
MyShape.Fill.ForeColor.RGB = RGB(255, 0, 0)
MARU4812さん、早速の回答有難うございます。
つまりは、線を引くシートをアクティブにしておいて、そのコマンドを実行しろということと理解できました。実際にやってみてうまくいきました。有難うございます。助かりました。
まだまだ素人ですので、また何か質問させていただくかもしれませんが、宜しくお願いします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Excelのマクロについて教えてください。 4 2022/05/31 14:07
- Visual Basic(VBA) 【VBA】写真の縦横比を変えずに貼り付ける 5 2023/06/13 11:42
- Visual Basic(VBA) EXCELのVBAについて 2 2023/07/05 17:17
- Excel(エクセル) 【マクロ】スクショ印刷がうまく動かない件 5 2022/12/06 17:37
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 2 2022/05/26 17:19
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/08/10 14:24
- Visual Basic(VBA) エクセル VBA 処理スピードを上げたいのですが。 6 2023/03/31 20:52
- Visual Basic(VBA) 改ページ 2 2023/03/10 21:29
- Excel(エクセル) シートが違う2枚のエクセルシートにある数値を別シートにコピーしたい(VBA?) 8 2022/03/31 12:24
- Visual Basic(VBA) VBAでoutlook365が起動しません。 4 2022/08/25 13:31
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
"判定"の英語表現について
-
vba ListViewの選択色について...
-
chromebookのLinux環境でmozcの...
-
DBマジック
-
Wacomのタッチ機能が反応しませ...
-
For ~ Next の中での Dim宣言...
-
Shellコマンドで別のexeを起動...
-
【至急】フォトショップの「自...
-
Windows7でクリップボードを開...
-
他の人には声だして挨拶してる...
-
CapCutで、人の目からビームを...
-
エクセルVBA テキストボックス...
-
エッジ
-
どこにもフォーカスを当てたくない
-
椎名林檎さんの歌声ってマイク...
-
ユーザーフォームのSetFocusが...
-
Illustrator の効果・ぎざぎざ...
-
SPREAD(GrapeCity)のセルにフォ...
-
アフターエフェクトでいらない...
-
業務に差し支えのないテンキー...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
"判定"の英語表現について
-
vba ListViewの選択色について...
-
DBマジック
-
For ~ Next の中での Dim宣言...
-
Wacomのタッチ機能が反応しませ...
-
X線CTにおけるコリメータの役割...
-
VBEとVBA
-
エディットでEnterキーでのTAB移動
-
textBoxに数値を入力すると円と...
-
ライブチャットのオンライン状況
-
グローバル変数について (C言語)
-
クリーニング店にて~ どう思...
-
プログラム中の大カッコについて
-
インパクトドライバーでドリル...
-
TabIndexを使わないで、フォー...
-
ENTERキーでフォーカスを移動し...
-
ipod
-
Shellコマンドで別のexeを起動...
-
なぜ「フォーカス取得時」のV...
-
一目惚れってどんな感覚?
おすすめ情報