主题：复制粘贴问题

我从foxtable做的表格里复制数据，粘贴到公司一个用易语言做的软件中，都贴到一行去了，请问有办法解决吗

 

 

 粘贴这些数据

 

此主题相关图片如下：121.png

 

 粘贴到易语言做的软件的表格中  就这样了

此主题相关图片如下：121111.png

这个是易语言做的软件自身的问题。不是foxtable能够解决的

又试了下

 

从EXCEL表中复制到 易语言软件中  没问题，

 

从易语言软件中复制到 foxtable软件中也没问题。

foxtable复制到EXCEL表没有问题，不行就多复制一下了

foxtable 支撑这个功能吧，

 

设计个按钮，用代码实现把选中行的数据，直接导出保存到固定路径的EXCEL表格的sheet 1里， EXCEL表格原来的数据不覆盖，而是把新数据加到EXCEL中

参考：http://www.foxtable.com/webhelp/topics/1148.htm

再问下，能在不打开EXCEL的情况下，在fotable这边把，EXCEL表中，从几行到几行，几列到几列的内容 加到剪切板中吗

这个要另外使用vba操作，参考：http://www.foxtable.com/webhelp/topics/2121.htm

Cut

移动单元格或单元格区域。
该方法有一个参数，用于指定要剪切到的目标区域。如果省略该参数，将把该区域复制到剪贴板。如下面的例子就是将单元格区域B1:C4的数据移动到以单元格B3为左上角的单元格区域：

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\Report.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
Dim Rg As MSExcel.Range = Ws.Range("B1:C4")
Rg.Cut(Ws.Range("B3"))
App.Visible = True

 

 

我用的这个代码，按照说明，我把B3删除，后报警如下，请问怎么回事？

 

异常来自 HRESULT:0x800A03EC

我测试没有问题。有存在这个文件吗"D:\Report.xls"？另外要处理的文件不能处于打开状态