剪贴板问题

时间:2008-09-19 15:15:25

标签: ms-access access-vba

我有一个我目前支持的遗留应用程序,当人们从数据表视图中复制大量数据时遇到问题。

App是在MS Access中构建的,正在复制的行数可能会非常大(有时会有数千行)。

有趣的是,你可以粘贴数据,但随后Access会将数据“呈现”为不同的格式,并在很长一段时间内成为CPU限制。

MS Access窗口右下角进度条旁边的状态消息是

  

渲染数据格式:Biff5

Biff5是“二进制交换文件格式(BIFF)版本5”根据Source

应用程序代码在任何地方都不使用BIFF5,因此我认为这不是应用程序问题。

我无法在网络上的任何地方找到有关此错误的任何数据,所以我认为这对stackoverflow来说是一个很好的问题。

那么,有人可以帮忙吗?

4 个答案:

答案 0 :(得分:1)

您是否可以将查询导出到Excel?而不是尝试复制粘贴?

答案 1 :(得分:0)

我不确定问题是什么,但有时你会遇到一些非常古怪的错误。你试过在不同的机器上运行吗?不同的操作系统?是否可以将数据粘贴到Excel中,然后使用导入功能导入Access?你可以直接导入数据而不是粘贴它吗?

答案 2 :(得分:0)

我们都在这里使用相同的操作系统,我正在研究在上一个维护窗口中发送的某些更新导致这种情况的可能性,因为在此之前这不是问题并且没有新的版本那个时期的软件。

尝试了很多机器,同样的问题。

问题实际上是从Access中的数据表视图复制并粘贴到Excel,而不是奇怪的方式。

以下是用例

访问 - > “从数据表复制”(正常Ctrl + C) - > “粘贴到Excel”(正常Ctrl + V) (这很好用!)

当你回到Access继续工作时,它是CPU绑定做“渲染数据格式化”的事情,我在上面提到过。

说实话,我很难过,这有点奇怪。

答案 3 :(得分:0)

尝试通过VBA进行复制粘贴操作:

用户选择要复制的数据后,您可以在单击表单中的按钮时执行以下代码,然后在Excel中执行pastespecial:

---用户选择的数据---

RunCommand acCmdCopy

   Dim xlApp As Object  
   Set xlApp = CreateObject(Class:="Excel.Application")

   'New Excel Workbook
   Dim xlWbook As Object   'Excel.Workbook
   Set xlWbook = xlApp.Workbooks.Add

   'Paste in excel
   xlWSheet.Range("A1").Select
   xlWSheet.PasteSpecial Link:=False, DisplayAsIcon:=False, Format:="Biff5"