Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
8974 / 13655 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【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枚作成されます。
処理中データ数／９、答えが整数の場合
改ページのプログラム作動のようにすれば出来るのかな？
と思っているのですが、割り算の答えで小数点が出た場合
整数にする方法は分かったのですが、
整数かどうかを判別する方法が分かりません。

どなたか教えて下さい。
【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 さん
ありがとうございました。
大変参考になりました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
8974 / 13655 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free