創建排序時類型不匹配

Question

我不斷收到類型與下面的代碼不匹配，特別是SortFields.Add行。我想知道是什麼導致這個問題？謝謝！

worksheet.select 
With worksheet.Sort 
      .SortFields.Clear 
      .SortFields.Add(Rng, xlSortOnCellColor, xlAscending, , xlSortNormal). _ 
            SortOnValue.Color = RGB(255, 255, 0) 
      .SetRange = consolidated_sheet.Range("A3:K" & row) 
      .Header = xlNo 
      .MatchCase = False 
      .Orientation = xlTopToBottom 
      .SortMethod = xlPinYin 
      .Apply 
     End With 

Answer 1

也許你在這之後是：

With worksheet.Sort 
     .SortFields.Clear 
     .SortFields.Add rng, xlSortOnCellColor, xlAscending, , xlSortNormal 
     .SortOnValue.Color = RGB(255, 255, 0) 
     .SetRange consolidated_sheet.Range("A3:K" & row) 
     .Header = xlNo 
     .MatchCase = False 
     .Orientation = xlTopToBottom 
     .SortMethod = xlPinYin 
     .Apply 
End With 

，而在你的代碼中有：

• 不需要括號包圍SortFields.Add（）方法的參數

• 之前的一個點延續線，而不是相反的

，並在那裏你必須：

• 已宣佈RNG爲有效Range參考