[[20071023181126]]　『Private Subのマクロを別のマクロからcallしたい』（藁掴）　ページの最後に飛ぶ

『Private Subのマクロを別のマクロからcallしたい』（藁掴）

 Private Sub cmdOK_Click()　のマクロが有ります。
 このマクロの中が結構な行数（３００行くらいｓｕｂもcallしています。）あり、
 標準モジュールに移動しようとしましたが、エラーの嵐でとても移動出来そうに
 ありません。そこでcmdOK_Clickを別のマクロからcallしたいのですが、出来ません。
 何か方法はあるでしょうか？

[[20071003115919]]
[[20071004191108]]

 本スレとは関係有りませんし、余計なお世話かと思いますが
 上記スレは放置のようですが･･･

 ※解決しないと別の質問をしてはいけないと云う事では有りません、念の為。
 (mitsu)

 mitsuさんの、ちょこっといじりました。リンクさせただけですけど。。。
[[20071004191108]]　こちらは、削除されたご様子ですけど、もったいない。
(sin)

 ほほほ、sinしゃんと同じスレに登場するんは久しぶりなぁ。＾＾
 ところでmitsuはん、この学校はボランティアで成り立っております。
 ボランティアの語源はラテン語で自由意志っちゅうそうな。
 これは以前にも書いた記憶がありますねんけど、なんらかのアクションを期待してレス
 するもんではありまへん。先方から言わせれば「お前が勝手にレスつけたんやないか」
 という理論も考え方によっては通用するわけですから、それをとやかく言う権利はあり
 まへんで。
 いやならレス付けなければええだけの話ですからなぁ・・・。
 寧ろ折角付けたレスを削除するやり方の方に疑問符が付きますワ。
 第一過去ログを頼りに訪れた御方がスレッドを見ても削除されとる文章若しくは式、 
 あるいはマクロの流れが途絶えてしまいますから、さっぱり参考にならんっちゅう弊害
 が出てきます。
 レスつけるなら、回答をする人間も質問する側の方々より決して優れとる訳では無い
 と言う弱さも露呈する覚悟でレスを付けるべきでせう。
 とは言うモンの、それがしも削除した経験はありますがなぁ、ガッハッハ。
 　　　　　　（弥太郎）

 以前、こんなスレがありました。
　
[[20060217072801]]『すごく気になるんですけど』（ひとし）
　
（純丸）(o^-')b

 おっ、弥太郎さんだ。お元気～？
んで、本題の方もよろしくー。
あたしにゃ、ムリムリ。　GO TO **** って感じかな？と思うぐらいしかできまへん。。。
(sin)

 あ、本題は全く目ぇに入ってまへんでしたワ。＾＾藁掴はん、ごめんなはれや。　　　
 えと、文面からは良くわかりまへんねんけど、こんなことでっしゃろか？　
（弥太郎）
 Private Sub CommandButton1_Click()
    Tigers
    Gアンチ
 End Sub
 標準モジュールへ
 Sub test()
    Tigers
    Gアンチ
 End Sub
 '---------------
 Sub Tigers()
    Range("a1:a4") = "藁掴み放題"
 End Sub
 '---------------
 Sub Gアンチ()
    Range("b1:b4") = "負けました＾＾"
 End Sub

 う～ん、なんとなく、ちがうみたいやなぁ・・・。もう寝よ。

 呼び出したいマクロをPrivateではなく、Publicに変更し、
 VisualBasicEditorの画面で、「挿入」→「標準モジュール」を選択し、
 その中にPublicマクロを記述すれば、外から呼べますよ♪
 (HT)

 大変ご迷惑をおかけしております。（藁掴） 
 もちろん解決した物は全てお礼を書いているつもりでしたが、 
 ご指摘の通り抜けている物がありました。大変すみません。
 ご回答して頂いている物の中にこちらからの返信が無い物については
 実は手が回らなくて確認も出来てません。
 社内で何件もの課題を当てられ優先順位もつけられずに分からないものは
 ここで質問させて頂いていますが、もちろん質問した内容も
 こちらでメモってチェックしてますが、それでもぬけてしまっている
 状況です。質問を控え今までの整理をこれからしますので、
 今後とも宜しくお願い申し上げます。

 削除されてしまっているので、後の方のために！ (1or8)
[[20071004191108]]

 チェックですけど、全文検索を利用すると便利ですよ（あきお）
https://www.excel.studio-kazu.jp/cgi-bin/estindex/estseek2.cgi?phrase=%E8%97%81%E6%8E%B4&perpage=30&attr=&order=@uri+STRD&clip=-1&navi=0

 ＞呼び出したいマクロをPrivateではなく、Publicに変更
 これで動きました。有り難う御座います。この当たりも理解せずに
 マクロの相談を受けている私って？
 それに返信の件すぐに処理させていただきます。大変皆様に
 ご迷惑をおかけしております。（藁掴）

 弥太郎さんへ

 弥太郎さんへ預かって頂いている件もありますので質問者さんへの回答以外は
 自粛致しております。ご理解頂きますようお願い申し上げます。

 以下、藁掴さんへ
 ※[ユーザーフォームのコードを減らしてスッキリさせたい]が目的の場合
 同ブックに有るユーザーフォームの場合、以下のように変更して動作します。
 但し、コードの中で「Me」を使用しているとexcelに怒られるので変更して下さい。

 Private Sub CommandButton1_Click()
 現在のコード(300行)
 call マクロ1
 call マクロ2
 End Sub

 ↓のように変更。

 Private Sub CommandButton1_Click()
 test
 End Sub

 標準モジュールへ
 Sub test()
 現在のコード(300行)
 call マクロ1
 call マクロ2
 End Sub

 (mitsu)　11：41　追記しました

 ↑どなたでしょう？　ご記入の際はHNの記入をお忘れなく。

 （川野鮎太郎）

コメント返信：

[ 一覧(最新更新順) ]

[[20071023181126]] 『Private Subのマクロを別のマクロからcallしたい』（藁掴） ページの最後に飛ぶ

[[20071023181126]]　『Private Subのマクロを別のマクロからcallしたい』（藁掴）　ページの最後に飛ぶ