Excel将一个sheet页才分多个

命令如下：  Sub CFGZB() Dim myRange As Variant Dim myArray Dim titleRange As Range Dim title As String Dim columnNum As Integer myRange = Application.InputBox(prompt:="请选择标题行：", Typ

>>阅读原文<<