用VBA命令控件指定条件打印

试编写代码示例如下：

Private Sub CommandButton1_Click()
    Dim sText, sPrintArea
    
    '1只要B40：D40单元格有文本就打印A35：Q62区域