EXCEL中DoWhile为啥只能运行120行就卡死了，谢谢各位大神

更新时间2018-11-18 11:40:25

Sub PL板分列()

'

' PL板分列 macro

'

' 快捷键: Ctrl+d

'

   Do While ActiveCell.Value <> ""

    Selection.TextToColumns Destination:=ActiveCell, DataType:=xlDelimited, _

        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _

        Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar _

        :="*", FieldInfo:=Array(Array(1, 1), Array(2, 1)), TrailingMinusNumbers:=True

    Cells.Find(What:="PL", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _

        xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _

        , MatchByte:=False, SearchFormat:=False).Activate

    Loop

End Sub

因为你电脑的内存小，实际电脑对你要运行的运算预读、计算处理数据的量过大，调用指令较多，计算过的因为通道拥堵无法输出，需要后续处理的信息却进不到内存进行预读，于是就会卡死！加大你的内存条是解决的途径。

相关标签:谢谢，大神