エクセルの学校：全文検索：Hyper Estraier： VBA��

Results of 1 - 1 of about 14733 for VBA�� (0.003 sec.)

[[20210119112635]]: #score: 3408; @digest: 471b24148f73670c38fb197303a70e15; @id: 86374; @mdate: 2021-01-19T14:10:03Z; @size: 3404; @type: text/plain; #keywords: onundo (28639), 青矢 (21971), 反時 (13442), 計回 (12758), subtest (11368), 円形 (11336), 半円 (9933), 戻" (7748), み" (5419), 戻す (4302), 矢印 (4193), 時計 (4135), す() (2276), 行後 (2159), ー項 (2127), が押 (2066), を戻 (2034), 元に (1451), 押せ (1439), ・ω (1421), ・` (1368), に戻 (1322), イコ (1290), す", (1279), き込 (1196), thisworkbook (1066), 実行 (1063), アイ (937), 効に (915), activecell (914), 込み (880), り直 (879); 『Application.OnUndoについて』（しのみや）
VBA実行後に元に戻す機能を有効にする方法として、 Application.OnUndoを知りました。【ThisWorkbookに記述】 Sub TEST() ActiveCell.Value = "vbaからの書き込み" Application.OnUndo "書き込みを戻す", "戻す" End Sub Sub 戻す() ActiveCell.Value = "戻" End Sub 【状況】 VBEの画面でSubTESTをF5で実行します。青い矢印の元に戻るボタンにマウスを合わせると、「書き込みを戻す」となっています。元に戻るボタンをクリックすると、「マクロ"¥¥○○○¥Desktop¥TEST.xlsm'!戻す'を実行できません。このブックでマクロが使用できないか、またはすべてのマクロが無効になっている可能性があります。」となります。マクロのセキュリティは、すべてのマクロを有効にするとなっています。【試してみたこと】 VBEの画面でSubTESTをF5で実行します。ツール-マクロ-マクロの表示で、「ThisWorkbook.戻す」を実行すると、必要な結果が得られました。【問題点】青い矢印の元に戻るボタンで戻すを実行したいのですが、どこを直せばよいのでしょうか＜使用 Excel:Excel2010、使用 OS:Windows10 ＞ ---- Sub TEST() ActiveCell.Value = "vbaからの書き込み" Application.OnUndo "書き込みを戻す", "ThisWorkbook.戻す" ' ← ThisWorkbookで修飾する End Sub ThisWorkbookに書いてますからね。標準モジュールならそのままいけます（´・ω・`） 2021/01/19(火) 11:51 ---- （´・ω・`）さんありがとうございます。解決できました。助かります。（しのみや） 2021/01/19(火) 12:05 ---- もう一つわからないことが出てきましたので、教えて下さい。「元に戻す」と「やり直し」の操作ができるようにしていまして、以下のようにしました。【Module1の記述】 Sub 書き込み() Range("A1").Value = "vbaからの書き込み" Application.OnUndo "書き込みを戻す", "戻す" End Sub Sub 戻す() Range("A1").Value = "" Application.OnRepeat "書き込みをやり直し", "書き込み" End Sub 【動作】 Sub書き込みを実行する ↓ A1に"vbaからの書き込み"が書き込まれる元に戻すの青矢印が押せるようになる ↓ 元に戻すを押す ↓ A1の文字がクリアされるやり直しの青矢印が押せるようになる ←ここが、押せるようにならないのです… Ctrl+Yを押すと、 A1に"vbaからの書き込み"が書き込まれる元に戻すの青矢印が押せるようになるので、キーボード操作はできている様子です。何かやり方がおかしいのでしょうか。（しのみや） 2021/01/19(火) 16:58 ---- Undo は、【元に戻す】です。アイコンは、反時計回りの半円形の矢印 Repeat は、【繰り返し】です。アイコンは、反時計回りの円形の矢印時計回りの半円形の矢印は、【やり直し】です。英語にするなら ReDo Applicaiton.OnRedo というプロパティは無いようなので、無理なのでは。ちなみに、操作では、Repeat も ReDo も Ctrl-Y です（´・ω・`） 2021/01/19(火) 17:30 ---- >VBA実行後に元に戻す機能を有効にする方法として、 >Application.OnUndoを知りました。誤解されているような気がしまっす。以下は2010のヘルプですが >メニューの [元に戻す] に表示するメニュー項目名や、クリックしたときに実行されるプロシージャ名を設定します。と書かれています。これは、VBA実行後に元に戻す（実行前の状態に戻す）という意味ではないです。（チオチモリン） 2021/01/19(火) 18:48 ---- ありがとうございます。多少理解があやしかったのですが、おかげさまできちんと理解できました。 Ctrl-Yで、動作はしてくれているようですので(確認中) あとはやり直しのアイコンが押せる状態になれば、よいのですが… たしかにReDoの状態は見当たりませんね。うーん（しのみや） 2021/01/19(火) 23:10 ...; https://www.excel.studio-kazu.jp/wiki/kazuwiki/202101/20210119112635.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ