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