エクセルVBAで mod関数

質問

はじめまして。
エクセルVBA初心者のも社会人です。
mod関数を使用して、
コマンドボタンを押すたびにコマンド１、コマンド２を繰り返すにはどのようにしたら良いのでしょうか？
mod関数を使用してあまり０，１で行いたいのですがいまいちわかりません。
どなたかご教授お願いいたします。

回答No.3

imogasi

質問の意味がわからない。
もっとしっかり、したいことを文章で良いから、明確に書く訓練をすること。その場合例を書く事は大切と思う。
ーーー
（１）mod関数を使用して
こんなこと、Googleででも｛MOD VBA」で照会すれば
http://www.accessclub.jp/vba/help/010.html
ほか膨大な記事があるようだ。
http://oshiete1.goo.ne.jp/qa4721681.html
のNO1回答を見てください。
MOD演算子が別途あります。
この辺の質問者の理解大丈夫か？
ーー
＞コマンドボタンを押すたびにコマンド１、コマンド２を繰り返すにはどのようにしたら良いのでしょうか
この意味はわからない。
コマンドボタンを１つ儲け、押すたびに、２つのルーティンを交互に実行したいのか
ーー
＞mod関数を使用してあまり０，１で行いたいのですがいまいちわかりません
この表現の意味こそ、＞いまいちわかりません
Togle的なことをやりたいのか？
参考
http://www.sophia-it.com/content/%E3%83%88%E3%82%B0%E3%83%AB
＝＝
コマンドボタンを１つ、シートに張りつける。このクリックイベントに
Private Sub CommandButton1_Click()
Static x As Boolean
If x = True Then
MsgBox "A"
x = Not x
Else
MsgBox "B"
x = Not x
End If
End Sub
のようなことを、したいのか。
MsgBox "A"は実際では、やりたい処理が入る。

お礼

分かりにくい質問をして申し訳ありませんでした。
それにもかかわらず回答していただきありがとうございます。

回答No.2

a987654

御参考までに
マクロは実行するたびに内部変数を初期化します。
（初期化させない方法もありますが、）前回実行の結果を
残して次の実行に使えるようにセルを1つ使います。
この場合Ａ１又はＢ１がそれです。
どうしてもＭＯＤを使いたいなら例１ Macroをお使いください。
言われているような使い方でしたら例２ Macroの方が解りやすい
と思います。
下記処理の後で
if i=1 then
　　処理１
else
　　処理２
end if
となります。

' 例１ Macro
i=Cells(1, 1)
Cells(1, 1)= (i + 1) Mod 2

'
' 例２ Macro
'
i=Cells(1, 2)
If i = 0 Then Cells(1, 2) = 1 Else Cells(1, 2) = 0
End Sub

お礼

分かりにくい質問をして申し訳ありませんでした。
それにもかかわらず回答していただきありがとうございます。

回答No.1

kybo

何がしたいのかよくわりませんが、参考まで。

Sub macro()
Static I As Integer
MsgBox "コマンド" & I Mod 2 + 1 & "です"
I = I + 1
End Sub

お礼

分かりにくい質問をして申し訳ありませんでした。
それにもかかわらず回答していただきありがとうございます。