Excelのマクロコード設定について教えてください。 セル値にある文字が表示されてその文字に合わせて指定セルに「■」を表示させる方法を教えてください。 セル「CI52」にある数式により

補足

お伝え忘れてました。 作業シート名は「青紙表」になります。 作業ブックに色々mなシートがありますので 今回のマクロ設定は 作業シート「青紙表」を指定してお願いいたします。 マクロ名は仮に「テスト」としてください。 よろしくお願いいたします。

Visual Basic | Excel47閲覧xmlns="http://www.w3.org/2000/svg">50

ベストアンサー

0

ThanksImg質問者からのお礼コメント

回答ありがとうございました。 この回答をベストアンサーにさせて頂きました。

お礼日時:6/30 9:29

その他の回答(1件)

0

Private Sub Worksheet_Calculate() Dim target As Range Set target = Range("I6,K6,M6") target = "" Select Case Range("CI52") Case "2号": target.Areas(1).Value = "■" Case "3号": target.Areas(2).Value = "■" Case "4号": target.Areas(3).Value = "■" End Select End Sub

>マクロコード設定 「マクロコード」とはあまり言いません。 また、こういう文脈で「マクロを設定する」とは言いません。 マクロを作る/書く が一般的です。 >セル「CI52」にある数式により「2号」「3号」「4号」と表示されます。 セルCI52には数式が入力されていて、条件によって セルCI52の表示が「2号」「3号」「4号」のいずれかに切り替わる と解釈しました。 >1.「2号」と表示されるとセル「I6に■」を表示... セルCI52の表示が「2号」の場合は、セルI6に■が表示され、 セルCI52の表示が「3号」の場合は、セルK6に■が表示され、 セルCI52の表示が「3号」の場合は、セルM6に■が表示される。 ■が表示されているセル以外の2つのセルは表示をクリアする。 と解釈しました。