主题：请问：为什么我直接粘贴数据进项目的时候会很卡的，有没有优化的程序呢，或者操作？

看你datacolchanged事件代码。

具体例子发上来测试。

这个是datacolchanged中的代码：

'自动行高
Tables("d2").AutoSizeRows()
' d206 改变时自动在 d205 输入今天的日期
Select Case e.DataCol.name
    Case "d206"
        e.DataRow("d205") = Date.Today
End Select

 不这个代码去掉，看是否有问题 Tables("d2").AutoSizeRows()

你自动行高的代码，可以单独做个按钮处理。或者是，autosizerow一行，而不是全部 http://www.foxtable.com/webhelp/scr/1564.htm