Excel VBA質問箱 IV

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

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


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

20582 / 76735

←次へ　｜　前へ→


	【61567】Re:マクロ実行中でのシート固定

kanabun - 09/5/19(火) 0:24 -


	引用なし

	パスワード

原理的には > 　Dim flag as boolean 'ブール型の変数を追加してここにFlagを取得し　flag = (Worksheets("入力シート").Cells(4, 48).value = 1) 　With Sheets("反映シート").Shapes("pp001").ShapeRange 　　　.Fill.Visible = flag　　　　　　'msoTrue／またはmsoFalse をセットする　　　.Fill.ForeColor.SchemeColor = 10 　End With > という書き方でもいいはずですね。