エクセルの学校：全文検索：Hyper Estraier：マクロ

Results of 1 - 1 of about 27286 for マクロ (0.014 sec.)

[[20100213113726]]: #score: 2168; @digest: 57007f46b98b784adfcc18b1291700e2; @id: 47742; @mdate: 2010-02-13T02:48:09Z; @size: 1519; @type: text/plain; #keywords: macroa (12117), macrob (11426), ロb (11394), ロa (8391), 虎子 (7748), 岐用 (7380), プ押 (7323), 岐() (7055), ロ○ (6272), 応… (4573), に28 (3394), が29 (2565), 当) (2522), シェ (1354), 件分 (1314), トシ (1307), ェイ (1276), マク (956), イプ (945), 分岐 (871), クロ (859), case (730), 実行 (676), が実 (676), call (649), 行さ (612), 、ボ (518), ロが (504), オー (494), ンテ (493), select (488), 一例 (482); 『マクロ』（虎子）
オートシェイプにマクロの登録をして、ボタンみたいにしようと考えています。そこで、A1セルの数字によって、マクロが変わるようにするにはどうしたらいいですか? 例えば、A1セルに28となっている場合は、ボタンを押したらマクロAが実行される。 A1セルが29の場合はマクロBが実行される。みたいにA1セルの数字によってマクロが変わるようにしたいです。可能であれば、 A1セルが○○の時、マクロ○がなるよみたいに詳しく教えていただけたらうれしいです。 ---- > 例えば、A1セルに28となっている場合は、ボタンを > 押したらマクロAが実行される。 > A1セルが29の場合はマクロBが実行される。 > みたいにA1セルの数字によってマクロが変わるようにしたいです。 Select Case ステートメントのヘルプを調べてみてください。一例としては、以下のような感じです。 Sub Sample() Select Case Range("A1").Value Case 28 Call MacroA Case 29 Call MacroB Case Else MsgBox "実行できるマクロがありません" End Select End Sub Sub MacroA() MsgBox "MacroAを実行します" End Sub Sub MacroB() MsgBox "MacroBを実行します" End Sub (VBAメンテ担当) ---- 衝突したしないよう同じだけど一応… オートシェイプに登録するマクロを条件分岐用のマクロにすればよいかなと。オートシェイプ押す Sub 条件分岐() Dim a As Long a = Range("A1").Value Select Case a Case 28 Call マクロA Case ○○ Call マクロB End Select End Sub （通りすがり） ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/201002/20100213113726.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ