の原因となるエラーを見つけることができません。各ワークブック、ワークシート、および変数を削除できますが、エラーは削除されません。エクセルVBA - オブジェクト変数Iが無効にされますしている</p> </blockquote> <p>を設定していない - 私は</p> <blockquote> <p>ランタイムエラー91の原因となっている以下のコードを持って「実行時エラー91」
Dim r As Long, c As Long
Dim snowq As Workbook, CAQual As Workbook, qsum As Worksheet, CAqsum As Worksheet
For r = 2 To 8
For c = 2 To 4
combinedReports.Worksheets("combinedQualities").Cells(r, c).Value = _
snowq.Worksheets("qsum").Cells(r, c).Value + CAQual.Worksheets("CAqsum").Cells(r, c).Value
Next
Next
最初のワークブックとワークシートは、コード内ではなく、同じモジュール内にあることに注意してください。
ご協力いただければ幸いです。
EDIT:
これは実際のワークブックとワークシート(S)を設定含むモジュールの上面である:
'Create new workbook
Dim combinedReports As Workbook, combinedCsats As Worksheet, combinedQualities As Worksheet, combinedTickets As Worksheet
Set combinedReports = Workbooks.Add
Sheets("Sheet1").name = "Combined CSAT's"
Set combinedCsats = combinedReports.Sheets("Combined CSAT's")
Sheets.Add After:=ActiveSheet
Sheets("Sheet2").name = "Combined Qualities"
Set combinedQualities = combinedReports.Sheets("Combined Qualities")
Sheets.Add After:=ActiveSheet
Sheets("Sheet3").name = "Combined Tickets"
Set combinedTickets = combinedReports.Sheets("Combined Tickets")
あなたは何かをDim''dしましたが、 'Set'はオブジェクトにありませんでした。たとえば、 'Set snowq ='で始まるコード行はどこですか? – braX
これは別のワークブックなので、そこに設定されていますか?それは(他のワークブックとそれに関連するシートと共に)ここでも設定されるべきですか? – sbagnato
他のワークブックに「Dim」した後は、ここで 'Set'しなければなりません。 – braX