程序问答   发布时间:2022-06-01  发布网站:大佬教程  code.js-code.com
大佬教程收集整理的这篇文章主要介绍了如何将一维值数组分配给 Delphi 中的 Excel 列大佬教程大佬觉得挺不错的,现在分享给大家,也给大家做个参考。

如何解决如何将一维值数组分配给 Delphi 中的 Excel 列?

开发过程中遇到如何将一维值数组分配给 Delphi 中的 Excel 列的问题如何解决?下面主要结合日常开发的经验,给出你关于如何将一维值数组分配给 Delphi 中的 Excel 列的解决方法建议,希望对你解决如何将一维值数组分配给 Delphi 中的 Excel 列有所启发或帮助;

这是今天在这里对答案的评论中出现的观点的 MCVE。答案 与从变体数组的第二维传输值的任务有关 进入工作表的垂直列。建议使用 Excel 的 WorhSheetFunction.Transpose 将变体的数据分配到目标单元格中​​。很公平。

下面的代码创建一个一维值数组,然后尝试将其分配给一列单元格 在工作表中。如果你运行它,你会看到结果是

A1 = 1
A2 = 1
A3 = 1
@H_262_11@

这是代码

procedure AssignArray;
var
  Excel,WB,Values : oleVariant;
begin
  Excel := CreateoLeobject('Excel.Application');
  Excel.Visible := True;
  WB := Excel.WorkBooks.Add;
  try
    Values := VararrayCreate([0,2],varVariant);
    Values[0] := 1;
    Values[1] := 2;
    Values[2] := 3;

    WB.ActiveSheet.Range('A1:A3') := Values;
    Showmessage('Here');
  finally
    WB := UnAssigned;
    Excel := UnAssigned;
  end;
end;
@H_262_11@

您将获得所有 3 行中数组的第一个值。谷歌搜索这个结果发现 WriTing an array to a range. Only getTing first value of array 其中所有三个答案都说使用 Transpose。很好,但我的问题是,如何避免重复 在我的情况下,源数据是一维数组的第一个值问题。转置一维 数组没有意义...

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)

大佬总结

以上是大佬教程为你收集整理的如何将一维值数组分配给 Delphi 中的 Excel 列全部内容,希望文章能够帮你解决如何将一维值数组分配给 Delphi 中的 Excel 列所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错,欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。
标签:中的