我用EXCEL模板设计打印厂检单的时候，希望能做到如果某个指标没有数据，生成EXCEL表的时候，自动删除这一行，代码应该怎么写？比如：

外观：无色液体

含量：99%以上

比重：

希望EXCEL表生成的时候，自动把比重这一行整个删除。

非常感谢！

蓝老师，抱歉，文件不方便发，全是公司数据。

打印厂检单的对应表是“COA",表结构见附件。

我打印模块用的代码如下：

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:coa.xls

Dim Filter As String
With e.Form.Controls("ComboBox1")
    If .Value IsNot Nothing Then
        Filter = "productname = \'" & .Value & "\'"
    End If
End With
With Forms("销售管理").Controls("ComboBox4")
    If .Value IsNot Nothing Then
        If Filter > "" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "salesinvoiceno = \'" & .Value & "\'"
    End If
End With
With e.Form.Controls("ComboBox2")
    If .Value IsNot Nothing Then
        If Filter > "" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "salesbatchno = \'" & .Value & "\'"
        Tables("sales").Filter = Filter
    End If
End With
Dim book As new XLS.Book(projectpath & "attachments\\COA.xlsx")
Dim fl As String = projectpath & "reports\\COAtest.xlsx"
book.build()
book.save(fl)
Dim proc As new process
proc.file = fl
proc.start()

附件是目前打印出来的效果。希望做的是下面几行空白的，能自动删除掉。

谢谢！