关于单元格处置字符串长度过长报错

关于单元格处理字符串长度过长报错
写了一段vba程序，大致是：当符合一定条件，单元格=单元格 & “%”，运行报错。
测试下来，发现当单元格中的字符串长度>160+位时，系统报“运行时错误‘1004’应用程序定义或对象定义错误”。
个人估计是字符串长度过长所致。
求解决方法。
非常感谢。
------解决方案--------------------------------------------------------
我记得一个单元格的最大长度好像上千了，不会是160吧。
------解决方案--------------------------------------------------------
Sub test()
    Application.ActiveCell = Application.ActiveCell & "%"
    
End Sub

Application.ActiveCell里面的内容是640个字符，都不会出错；


------解决方案--------------------------------------------------------
肯定和长度没关系，打印err.number看看吧
------解决方案--------------------------------------------------------
放个数据和格式看看
------解决方案--------------------------------------------------------
Private Sub Worksheet_Activate()
    Dim wuxian As Integer
    For wuxian = 0 To 9999 Step 1
        Cells(1, 1) = Cells(1, 1) & "fdadsfdsa"
    Next wuxian
End Sub


测试，没报错
------解决方案--------------------------------------------------------
把代码贴出来看看，怀疑是对象引用错误