下記のマクロをエクセル95で動かすと正常に終わるのですが、エクセル2000で
動かすとデバッグエラーで止まります。
何処がおかしいのでしょうか教えてください。
出来れば言語の意味も教えてください。
Sub 送信メニュ()
Dim i, C_COUNT, folda, work, tuki
i = MsgBox("加工業者別の発注基礎資料を作成します。", 1, "着色加工計画作成システム")
If i <> 1 Then Exit Sub
Sheets("msg2").Select
Call gafalse
folda = "C:\aa着色加工計画\"
tuki = Sheets("ACT").Cells(5, 12).Text→最初にここでデバッグエラーになります。
tuki = Val(Right(tuki, 2))
If tuki = 12 Then
tuki = 1
Else
tuki = tuki + 1
End If
tuki = Format(Str(tuki), "00")
Workbooks.Add
F_NAME = "加計" + tuki + "月.XLS"
ActiveWorkbook.SaveAs Filename:=folda + F_NAME, _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
Windows("加工品.xls").Activate
Sheets("masta").Select
C_COUNT = Sheets("masta").Cells(2, 3).Text
For count = 1 To C_COUNT 'C_COUNT
Windows("加工品.xls").Activate
Sheets("masta").Select
Cells(3, 5) = count
i = count
M_KAKOBA(count) = "sheet" + i
Call 送信
Next count
Application.CutCopyMode = False
ActiveWorkbook.SaveAs Filename:=folda + F_NAME, _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
ActiveWindow.Close
End Sub
No.2
- 回答日時:
マクロを実行したとき、そのブックに「ACT」というシート名のワークシートはありますか?
そのエラーは主に配列を使用したときに出るんですが、
例えば、配列で最初10までの定義をしてないのに、11番目の配列に代入しようとするときに出ます。
定義していない(存在しない)ものに代入したり、変数に存在しない値を代入したりとかはしてないですか?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 前回ご教授いただいたコードに覚えたてのループ処理で品名りんごAから順に20回for nextでループ 7 2023/01/13 22:01
- Visual Basic(VBA) 【Excel VBA】自動メール送信の機能追加 5 2022/09/29 12:53
- Visual Basic(VBA) VBA 請求書自動作成 3 2022/04/24 01:58
- Excel(エクセル) エクセルVBAでオブジェクトが必要です 2 2022/09/10 16:37
- Visual Basic(VBA) エクセル マクロ(A1:A10)までの中で一番多く出た数字をB10に表示 6 2023/04/25 17:01
- Visual Basic(VBA) A列B列C列 3 2023/04/26 18:11
- Visual Basic(VBA) Sheet3から2つの条件でオートフィルターで抽出した個数をSheet2へ入力するマクロで、一つ目の 4 2023/01/12 23:40
- Visual Basic(VBA) ファイル全てを .xlsm に変更したところ、プログラムが途中で落ちてしまっています 17 2022/12/07 12:03
- Visual Basic(VBA) excel vbaでvlooupの変数がわかりません。 7 2022/05/30 09:35
- Visual Basic(VBA) Sheet2からオートフィルターで売上日を抽出した件数をカウントし、その件数をSheet1のセルB1 2 2023/01/12 12:24
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
多元配列の0初期化
-
ポインター引数の関数でコンパ...
-
10Mバイトて文字数に すると何...
-
UTF-8で5~6バイトになる文字コ...
-
COBOLのCOMP形式について
-
number 改行が追加できない
-
エクセルシート名の制限を変更...
-
ビットスワップとバイトスワッ...
-
バイナリとBCDコード
-
memcmp バイナリデータの比較方法
-
char str[256]の256の意味は?
-
DataGridViewの特定列に入力さ...
-
Javaで日本語1文字のバイト数
-
Excel VBA メール作成について ...
-
機種依存文字をチェックしたい。
-
3バイト文字(UTF-8)をprintfで...
-
unicode←→JISコード
-
ビットからバイトへの変換
-
2byte文字の判定
-
データの値の近いものをグルー...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
pythonにCでのexternはありますか
-
python 3.10で 同じlistに同じ...
-
CSVから構造体へ代入
-
VBScriptでカレントディレクト...
-
マクロの書き換え箇所がわかり...
-
Perlで変数中のエスケープされ...
-
UWSCにおける変数の扱い方
-
VB2010での連立方程式の計算
-
なぜかわかりませんscanf()の戻...
-
c言語 グローバル変数
-
ポインター引数の関数でコンパ...
-
10Mバイトて文字数に すると何...
-
UTF-8で5~6バイトになる文字コ...
-
Excel VBA メール作成について ...
-
char str[256]の256の意味は?
-
エクセルシート名の制限を変更...
-
stable diffusionのエラー
-
COBOLのCOMP形式について
-
Excel 1セル当りの文字数が2...
-
DataGridViewの特定列に入力さ...
おすすめ情報