Excel 2000のマクロで教えてください。
あるセルに関数をいれるマクロを設定しております。
変数% = 8
Range(Cells(126, 20), Cells(155, 19 + 2 *
変数%)).FormulaR1C1 =
"=(RC[-18]-R[-1]C[-18])/0.04*100"
このマクロを走らせると、たまに、
「'Cells'メソッドは失敗しました。'_Global'オブジェクト」
という、エラーがでます。
どういう意味なのでしょうか。
うまくいくときもあるので、よくわかりません。
すみませんが、教えてください。
No.2ベストアンサー
- 回答日時:
#1です。
> Worksheets("Sheet1") ).Selectとなっていて、
> いきなり、Range・・・
> だったのがいけなかったのでしょうか。
この場合 Range より、次に続く Cells に対するオブジェクトの指定が重要だと思っています。
経験上そう感じているだけなので、何故かは説明出来ませんが、、、
この回答への補足
With Worksheets(Sheetname$)
.Range(Cells(126, 20), Cells(155, 19 + _
2 * 変数%)).FormulaR1C1 = _
"=(RC[-18]-R[-1]C[-18])/0.04*100"
End With
として、再実行してみましたが(数式は、若干変更しました)、同様のエラーがでてしまいました。。他に、なにか策はありますでしょうか。
Sheetname$や、変数%には、ちゃんと値が入っているようです。
すみません。"."を見落としていました!
Cellsの前に"."をつけ、実行してみましたところ、うまくいきました!
ありがとうございました。
No.1
- 回答日時:
推測ですが、対象オブジェクトを見失う事があるようです。
With Worksheets("Sheet1")
.Range(.Cells(126, 20), .Cells(155, 19 + 2 * _
変数%)).FormulaR1C1 = _
"=(RC[-18]-R[-1]C[-18])/0.04*100"
End With
のようにWithで括る( . が重要)などして明示的に指定してあげると大丈夫だと思います。
この回答への補足
ありがとうございます!!
非常に困っていていましたので、ずっと待っていました。
オブジェクトの指定がされていなかったみたいです。
Worksheets("Sheet1") ).Select
となっていて、
いきなり、Range・・・
だったのがいけなかったのでしょうか。
解決できるか実施してみます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルVBA 3 2022/06/23 20:00
- Visual Basic(VBA) セルS2に入力した「月」と一致したB列の右隣へセルS110の値を転記する下記マクロを実行するとエラー 2 2022/12/06 17:32
- Excel(エクセル) エクセルのマクロを教えてください 2 2022/05/13 10:21
- Visual Basic(VBA) 【VBA】ボタンに登録したマクロがエラーになる 4 2022/07/25 17:47
- Visual Basic(VBA) エラーコード1004 6 2022/06/09 14:12
- Visual Basic(VBA) ExcelVBAのマクロについて。 9 2022/05/04 14:50
- Visual Basic(VBA) Excelで下記のようにマクロを作ったところ、一回目は実行できたのですが、二回目以降「実行時エラー1 1 2022/03/25 08:08
- Visual Basic(VBA) エクセルのマクロとシートの保護について教えてください。 1 2022/10/18 08:36
- Excel(エクセル) R列の1111/11/11以外、且つQ列の×の条件で該当行のAからAE列までオレンジに塗りつぶす 2 2022/07/02 10:18
- Visual Basic(VBA) エクセルVBA(実行時エラー438)の対処法を教えてもらえないでしょうか 3 2023/04/22 13:43
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
Worksheets メソッドは失敗しました。のエラー処理のやり方
Visual Basic(VBA)
-
'Cells'メソッドは失敗しました '_Global'オブジェクト
Word(ワード)
-
アクセスVBAで既に開いているエクセルを閉じたい
Yahoo!ショッピング
-
-
4
Rangeメソッドは失敗しました。globalオブジェクトについて
Excel(エクセル)
-
5
アクセスからエクセルのシートを追加して、名前をつける方法
Excel(エクセル)
-
6
AccessVBAで作成したExcelファイルを削除する方法は?
Visual Basic(VBA)
-
7
マクロの「Rangeメソッドは失敗しました’Globalオブジェクト」エラーの解決方法について
Excel(エクセル)
-
8
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
9
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
10
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
11
Access VBAから使用したExcelプロセスを閉じる方法について
Visual Basic(VBA)
-
12
ACCESSでVBAから選択クエリの抽出条件を指定したい
Access(アクセス)
-
13
ACCESSのフォーム、開くんですが、見えないようにするには
Access(アクセス)
-
14
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
15
マクロの「SaveAs」でエラーが出るのを解消したいです(再)
Visual Basic(VBA)
-
16
日付型のフィールドに空白を入れる方法を教えてください
その他(データベース)
-
17
ACCESSでデータ読み取り専用を解除する方法
その他(データベース)
-
18
Access VBAで行ラベルが定義されていないというエラーが出ます
Access(アクセス)
-
19
EXCELで特定のセルに表示された項目をヘッダーやフッターに出力するには
Excel(エクセル)
-
20
ACCESSのVBAにてExcelのシートをコピーしたい
その他(データベース)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
worksheetFunctionクラスのVloo...
-
「Columns("A:C")」の列文字を...
-
VBAからPDFファイルにパスワー...
-
VBAで既に開いている別アプリケ...
-
エクセルマクロエラー「'Cells'...
-
エクセル/保護したシート上の埋...
-
実行時エラー 3265「要求された...
-
WSH createobjectで指定出来る...
-
ExcelのVBAについて(グラフ操作)
-
エクセルのVBAの標準モジュール...
-
VBScriptでCSVファイルのデータ...
-
コンパイルエラーの対処がわか...
-
Excelでフィルタをかけると警告...
-
【VB】【エクセル操作】 SaveAs...
-
エクセルVBAでcode128のバー...
-
VB6 ファイルのリネームの仕方
-
オブジェクト変数の取得について
-
マクロ初心者です。 インデック...
-
UserForm1.Showでエラーになり...
-
Word2007数式でIMEオン/オフを...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
worksheetFunctionクラスのVloo...
-
「Columns("A:C")」の列文字を...
-
エクセルのVBAの標準モジュール...
-
実行時エラー 3265「要求された...
-
Excelでフィルタをかけると警告...
-
VBAで既に開いている別アプリケ...
-
エクセルマクロエラー「'Cells'...
-
テキストボックス中の文字列の...
-
VBAで Set wb = Sheets(1).Cop...
-
ある文字列が全て数字であるか...
-
VBAからPDFファイルにパスワー...
-
VBScriptでファイルの日時順(降...
-
EXCEL VBA オートシェイプナン...
-
[VBA]CDOメッセージ送信エラー
-
エクセルVBAで2つの画像を比較...
-
PowerPointVBAでスライドマスタ...
-
UserForm1.Showでエラーになり...
-
上下の位置揃えについて
-
VBAで作成するメール(開封確認...
-
VBAについてです。 初心者です...
おすすめ情報