说明: VBA窗体的导入功能 Private Sub CommandButton1_Click() hh = Range("C56636").End(xlUp).Row '提取m列的末行号 If hh = 2 Then Range("B" & hh + 1) = "'001" If hh > 2 Then Range("B" & hh).AutoFill Destination:=Range("b" & hh & ":b" & hh + 1), Type:=xlFillDefault Range
<qq_15945949> 上传 | 大小:44kb