如果是语句可以直接在要换行的位加一个空格一个下划:
Dim MyPath As String, MyName As String, _
tmpPath As String
如果是字符串可以加以加一个空格一个&和一个空格加一个下划线:
x = "ABCDEFG" & _
"HIJKLMNO"
strsql = "select 经销商,核心企业,笔数,金额 from 业务统计 where 核心企业 in ( '" & Cells(3, 4) & "', '" & Cells(4, 4) & "') group by 经销商,核心企业"
去掉show。
空格_
示例:
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False