Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


8963 / 13644 ツリー ←次へ | 前へ→

【30087】割り算について ちゃー 05/10/19(水) 15:15 質問[未読]
【30091】Re:割り算について Jaka 05/10/19(水) 16:10 回答[未読]
【30097】Re:割り算について ちゃー 05/10/19(水) 16:52 お礼[未読]

【30087】割り算について
質問  ちゃー  - 05/10/19(水) 15:15 -

引用なし
パスワード
   VBA初心者です。
どなたか助けてください。

ラベルの帳票を作成する事になりました。
ラベルは印刷一枚に対して8枚作成されます。
処理中データ数/9、答えが整数の場合
改ページのプログラム作動のようにすれば出来るのかな?
と思っているのですが、割り算の答えで小数点が出た場合
整数にする方法は分かったのですが、
整数かどうかを判別する方法が分かりません。

どなたか教えて下さい。

【30091】Re:割り算について
回答  Jaka  - 05/10/19(水) 16:10 -

引用なし
パスワード
   これでいいでしょうか?

Dim A1 As Double
A1 = 5.0001
If A1 = Int(A1) Then
  MsgBox "整数"
Else
  MsgBox "整数以外"
End If

【30097】Re:割り算について
お礼  ちゃー  - 05/10/19(水) 16:52 -

引用なし
パスワード
   Jaka さん
ありがとうございました。
大変参考になりました。

8963 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free