如何通過自動化在Excel中創建共享公式

Question

我只需編寫一個VC自動化程序，方法是導入Excel 2003的類型庫，然後使用這些類。如何通過自動化類創建共享公式。我無法在MS文檔中找到與創建共享公式有關的屬性/方法。

謝謝

Answer 1

我們可以使用Range.copy來創建共享公式。

而此方法的參數是目標範圍。

請看下面的示例：

Excel.Worksheet objWorkSheet =（Excel.Worksheet）Globals.ThisWorkbook.ActiveSheet;

 Excel.Range oResizeRange; 
     objWorkSheet.Cells[1, 5] = "1.33"; 
     objWorkSheet.Cells[2, 5] = "1.565"; 
     objWorkSheet.Cells[3, 5] = "1"; 
     objWorkSheet.Cells[4, 5] = "1"; 
     objWorkSheet.Cells[5, 5] = "1"; 
     objWorkSheet.Cells[6, 5] = "1"; 
     oResizeRange = objWorkSheet.get_Range("E8", "E8").get_Resize(Missing.Value, 1); 
     oResizeRange.Formula = "=SUM(E2:E6)"; 
     objWorkSheet.Range["F1"].Formula = "=E1*10"; 
     objWorkSheet.Range["F1"].Copy(objWorkSheet.get_Range(oWS.Range["F2"], objWorkSheet.Range["F8"])); 

這是一個C＃示例，我在VC中找到了相同的方法。