Sub 練習2()
Dim i As Long
Dim j As Long
For i = 1 To 20
j = i + 20
Cells(i, 1).Value = j
Next
End Sub
' Application.OnTime Now + TimeValue("00:00:05")の一文をいれて 5秒間隔でFOR文を動かしたいのですが考え方がわからずうまく動きません 完成形だとどの様な構文か教えてください。イメージとしてはセルに数字が入ったら5秒待って次の下のセルに+1の数字が入るのを繰り返すような
No.1ベストアンサー
- 回答日時:
>イメージとしてはセルに数字が入ったら5秒待って次の下のセルに+1の数字が入るのを繰り返すような
このような場合は
Application.OnTime ではなく
Application.Wait を使用するのが良いかと。
下記がその例です。
Sub 練習2()
Dim i As Long
Dim j As Long
For i = 1 To 20
j = i + 20
Cells(i, 1).Value = j
Application.Wait Now() + TimeValue("00:00:05")
Next
End Sub
Application.Wait ありました。VBAの本を読んだのですが忘れていました。
ゲームを作る段階での練習でつまずいてこまっていたのですごく助かりました。
No.2
- 回答日時:
こんな感じ?
ちなみに、どんなシーンで使うんですか?
Option Explicit
Dim i As Long
Sub 練習2()
i = i + 1
If i > 20 Then Exit Sub
Cells(i, 1).Value = i + 20
Application.OnTime Now + TimeValue("00:00:01"), "練習2"
End Sub
A列が自動的に数字を発生してB列の適当な列に数字を入れておいてA行とB行が一致したらマウスをクリック もしくはボタンを押すようなゲーム。
yahooゲームのワニワニパニックみたいなゲームなのですが動きが速すぎるので自作で速度調整できる簡単なものと思って、すでに半年以上かかって今この段階です。非常に助かりました。ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) Excel VBA素人です。VBAで図形のセンタリング方法ご教示下さい 2 2023/09/19 10:39
- Excel(エクセル) エクセルでマクロでテキストデータを保存したい 4 2024/01/04 19:31
- Visual Basic(VBA) VBA横データを縦にしたいです 2 2023/08/08 19:38
- Visual Basic(VBA) VBAコードについて 2 2024/03/10 12:41
- Visual Basic(VBA) VBAで質問があります 5 2024/03/16 12:18
- Excel(エクセル) エクセル セルに文字を入力したら別のセルに入力した時間が表示されるようにしたい 3 2023/10/19 03:42
- Visual Basic(VBA) 実行時エラー´5854´ 文字列型パラメーターが長すぎます。 3 2023/06/08 21:17
- Visual Basic(VBA) VBAコードが作動しません。修正したいのですが何処に原因かあるか教えて下さい。 1 2024/01/08 16:23
- Visual Basic(VBA) VBA listBoxについて 2 2024/03/26 16:14
- Excel(エクセル) VBA フォルダ見える化のコードについて 2 2023/06/19 15:04
このQ&Aを見た人はこんなQ&Aも見ています
-


質問58753 このコードでうまく動作しません。どうしたら良いですか Private Sub Wor
Visual Basic(VBA)
-


算術演算子「¥」の意味について
Visual Basic(VBA)
-


VBAの「To」という語句について
Visual Basic(VBA)
-
-
4

改行文字「vbCrLf」とは
Visual Basic(VBA)
-
5

Cのプログラムからアクセスできないファイル名の一括変更方法
C言語・C++・C#
-
6

以下のプログラムの実行結果はどうなると思いますか? その理由も教えてください。
Visual Basic(VBA)
-
7

エクセル タブの下のメニューを選択 実行するコード
Visual Basic(VBA)
-
8

考えた式の戻り値が期待通りにならない
Excel(エクセル)
-
9

【ExcelVBA】dictionaryの重複判断の基準(セル結合だと違う値として認識される)
Visual Basic(VBA)
-
10

【ExcelVBA】5万行以上のデータ比較の効率的な処理方法について
Visual Basic(VBA)
-
11

VBA 2次元配列の出力
Visual Basic(VBA)
-
12

vbe でのソースコード参照(msgbox)について
Excel(エクセル)
-
13

Visualbasicの現状について教えてください
Visual Basic(VBA)
-
14

VBA Application.Matchについての質問です
Visual Basic(VBA)
-
15

ExcelのVBAコードについて教えてください。
Visual Basic(VBA)
-
16

VB.net 文字列から日付型へ変更したい
Visual Basic(VBA)
-
17

C言語 関数、変数の宣言について
C言語・C++・C#
-
18

Excel VBAについて。こんな動作をさせるためにはどう書けばよいでしょうか。
Visual Basic(VBA)
-
19

COPYコマンドで、最後に1文字「Hex1A」が付くのはなぜ?外し方は?
その他(プログラミング・Web制作)
-
20

ダブルクリックで貼り付けた画像からリンクのみ削除し、画像を残したい。
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAでCOPYを繰り返すと、処理が...
-
【マクロ】並び替えの範囲が、...
-
【マクロ】オートフィルター を...
-
Vba Array関数について教えてく...
-
Vba 型が一致しません(エラー1...
-
【ExcelVBA】値を変更しながら...
-
vbsでのwebフォームへの入力制限?
-
エクセルのマクロについて教え...
-
【ExcelVBA】5万行以上のデー...
-
VBAでセルの書式を変えずに文字...
-
【マクロ】開いているブックの...
-
Vba セルの4辺について罫線が有...
-
vb.net(vs2022)のtextboxのデザ...
-
Excel VBA 選択範囲の罫線色の...
-
【マクロ】売上一覧YYYYMMDDHHS...
-
エクセルの改行について
-
VBAで特定の文字が入った行をコ...
-
WindowsのOutlook を VBA から...
-
Excel 範囲指定スクショについ...
-
【マクロ】シートの変数へ入れ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Vba セルの4辺について罫線が有...
-
vbsでのwebフォームへの入力制限?
-
【ExcelVBA】5万行以上のデー...
-
【マクロ】売上一覧YYYYMMDDHHS...
-
【マクロ】開いているブックの...
-
【マクロ】並び替えの範囲が、...
-
エクセルの改行について
-
エクセルのマクロについて教え...
-
vb.net(vs2022)のtextboxのデザ...
-
VBAでCOPYを繰り返すと、処理が...
-
VBA ユーザーフォーム ボタンク...
-
エクセルのVBAコードと数式につ...
-
エクセルのVBAコードについて教...
-
[VB.net] ボタン(Flat)のEnable...
-
【マクロ】変数を使った、文字...
-
改行文字「vbCrLf」とは
-
質問58753 このコードでうまく...
-
【マクロ】シートの変数へ入れ...
-
ワードの図形にマクロを登録で...
-
算術演算子「¥」の意味について
おすすめ情報











