VBA调试错误,来个大神帮我改改
Sub 生成分页符()
Dim hang%
hang = 1
If Cells(1, hang) <> "" Then
Cells(14, hang).HPageBreaks.Add Before:=Selection
LEI = hang + 34
Else
End If
End Sub
将Before:=Selection改为Before=Selection试试看。
热门标签:
Sub 生成分页符()
Dim hang%
hang = 1
If Cells(1, hang) <> "" Then
Cells(14, hang).HPageBreaks.Add Before:=Selection
LEI = hang + 34
Else
End If
End Sub
将Before:=Selection改为Before=Selection试试看。