代碼如下:PublicFunctionMySumDimSasdoubleDimbmysum=0foreachbinquifb.font.strikethrough=falsethenmysum=mysum b.valueendifnextendfunction第二步:在單元格c15中輸入公式:=mysum,為例,例如，對定義函數(shù)中的某個單元格求和，在sum函數(shù)中添加一個條件，即如果該單元格有刪除線，則不會計入該單元格的值中,如圖:第一步:在visualbasic模式下插入模塊，從定義函數(shù)創(chuàng)建。
為例。例如，對定義 函數(shù)中的某個單元格求和，在sum 函數(shù)中添加一個條件，即如果該單元格有刪除線，則不會計入該單元格的值中。如圖:第一步:在visualbasic模式下插入模塊，從定義 函數(shù)創(chuàng)建。代碼如下:PublicFunctionMySumDimSasdoubleDimbmysum = 0 foreachbinquifb . font . strike through = false thenmysum =mysum b . valueendifnextendfunction第二步:在單元格c15中輸入公式:= mysum
{1。
