无效的财产分配？

我使用下面的macros，在input到数据库之前按摩数据。 标准是，第76或77栏中不能有任何内容，第82栏必须包含数字“99”。 如果所有这些标准都满足，那么第6列需要说“返回”。 我得到错误的参数数量或无效的属性分配错误。

Sub V_11() Dim mySheet As Worksheet, myBook As Workbook 'Define your workbooks and worksheets as variables Set myBook = Excel.ActiveWorkbook Set mySheet = myBook.Sheets("Sheet1") Dim i As Integer, j As Integer 'Define a couple integer variables for counting j = 2 For i = 2 To mySheet.UsedRange.Rows.Count If IsEmpty(mySheet.Cells(i, 76, 77).Value) And mySheet.Cells(i, 82) = "99" Then mySheet.Cells(i, 6).Value = "Returned" ' . . . place the text "N/A" into the cell in row "j" in Sheet2. End If Next End Sub 

Answer 1

mySheet.Cells(i, 76, 77).Value值不是有效的语句。

你需要把它分成2个if语句

 If IsEmpty(mySheet.Cells(i, 76)) And IsEmpty(mySheet.Cells(i, 77)) And mySheet.Cells(i, 82) = "99" Then