回答受付が終了しました

ID非公開

2020/9/24 17:26

11回答

マクロの勉強中です。 解き方を教えてください。 ⬜︎ + ⬜︎ = ⬜︎

マクロの勉強中です。 解き方を教えてください。 ⬜︎ + ⬜︎ = ⬜︎ 上記のようなマクロを作りたいのですがコードがわからずそのままコピペできるような形で教えていただきたいです。 +のところは+、-、×、÷がコンボボックスのように選べるようにしたいです。 ⬜︎も1〜100までの数字を入れられるようにして=の後ろにある⬜︎に答えが自動で出るようにしたいです。 よろしくお願いいたします。

Visual Basic14閲覧xmlns="http://www.w3.org/2000/svg">500

回答(1件)

0

データタブにある、「データの入力規則」>「リスト」はご存知ですか? 判らなかったら検索してみてください。 これをC2に設定します。 Sub test() Select Case Range("C2").Value Case "+": Range("F2") = Range("B2") + Range("D2") Case "−": Range("F2") = Range("B2") - Range("D2") Case "×": Range("F2") = Range("B2") * Range("D2") Case "÷": Range("F2") = Range("B2") / Range("D2") End Select End Sub 多分こういうのがやりたいのかなと思いますが。 シンプルなソースなので、いみふめな所は色々調べてみると、アレンジも自在にできるようになります。

画像

ちなみに、「100まで」もデータの入力規則で設定できます。 マクロ内で設定も可能ですが、標準の機能で出来る部分はできるだけそっちを使った方が楽です。

画像