![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
No.1ベストアンサー
- 回答日時:
やりようは幾らでもありますが、たとえば
sub macro1()
dim i
for i=1 to 10
if i mod 2 = 0 then
msgbox i & " is even"
else
msgbox i & " is odd"
end if
next i
end sub
他にも、WorksheetfunctionのOddとかEvenとか使ってみたり、単純に2で割り算した答えがどうかとか。
No.3
- 回答日時:
一例です。
1ビット目がオンの場合は奇数、オフの場合は偶数です。
Sub Macro1()
Dim i As Long
For i = 1 To 10
If (i And 1) = 0 Then '偶数ならと言うコード
MsgBox "偶数です"
Else
MsgBox "奇数です"
End If
Next
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBA Userformで一部別シートに転記がしたいのですが 2 2023/05/24 13:08
- Visual Basic(VBA) Excel VBA ユーザーフォーム 複数のユーザーフォームの閉じ方。 2 2022/04/27 11:29
- Visual Basic(VBA) 数字が「0」の列を削除するため、下記のコードを実行しましたが、コンパイルエラーSubまたはFunct 3 2022/12/04 00:00
- Visual Basic(VBA) 【追加】ファイルを閉じてダイアログで保存した時だけ処理の実行をする 3 2022/03/23 15:43
- Visual Basic(VBA) 複数のcsvファイルをExcelに一括変換したい 2 2023/03/03 12:44
- Visual Basic(VBA) VBAの繰り返し処理について教えてください。 3 2022/08/02 13:21
- Visual Basic(VBA) 【Excel VBA】自動メール送信の機能追加 5 2022/09/29 12:53
- Visual Basic(VBA) ①ExcelVBAでカレンダーを作り、別のユザーフォームで日付を入力したいのですがエラーになります。 1 2023/02/17 18:39
- Visual Basic(VBA) いつもお世話になっております、VBAで教えて頂きたいのですが 2 2022/05/05 22:20
- Visual Basic(VBA) 稀に1円合いません? Sheet1から金額と個数を貼り付ける下記コードで、金額を切り上げるコードを何 3 2022/09/05 15:11
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
JANコード、ITFコードの作成
-
JOBコードってなんでしょうか?
-
VBA ダブルクリックするたびに...
-
一番難しい ギターコード
-
ウクレレのコード
-
エクセルVBAでコマンドボタ...
-
見苦しい電気コードを短くすっ...
-
草刈の際に電源ケーブルを切断...
-
洗濯機にアースをする場合、1.6...
-
Jeff Beck「Red Boots」のコー...
-
さだまさし関白宣言と雨宿りの...
-
ギターのTAB譜の記号 N.C....
-
カッコウ をギターで・・・
-
松任谷由実 真夏の夜の夢のイ...
-
ドライアーのコードから煙が出...
-
この英語のとこ出したけどその...
-
◎PPMのコードをお教えいただ...
-
電源コードをござの下にくぐら...
-
500マイルのアルペジオ教えてく...
-
ギターほぼ初心者におすすめの...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ギターのTAB譜の記号 N.C....
-
VBA ダブルクリックするたびに...
-
マイクロソフト 一時使用コード...
-
パソコンから出てる有線コード...
-
JAN コードとITFコードの違い...
-
Gmailを開いた状態でもうひとつ...
-
片側がUSBで片側がイヤホンジャ...
-
ドライアーのコードから煙が出...
-
JANコード、ITFコードの作成
-
マイナーの裏コードは存在する?
-
◎PPMのコードをお教えいただ...
-
DLookupがうまく出来ません
-
草刈の際に電源ケーブルを切断...
-
JISコードがわからない
-
『車の中でかくれてキスをしよ...
-
コードを白く塗りたい
-
【EXCEL-VBA】PDFファイルを開...
-
【マクロ】PasteSpecialメソッ...
-
CODE関数から他の文字コードの...
-
サイトによってコード譜が違う...
おすすめ情報