一个不知所云的问题，是关於excel的。。想不到。。

关于网友提出的“ 一个不知所云的问题，是关於excel的。。想不到。。
”问题疑问，本网通过在网上对“ 一个不知所云的问题，是关於excel的。。想不到。。
”有关的相关答案进行了整理，供用户进行参考，详细问题解答如下：

问题： 一个不知所云的问题，是关於excel的。。想不到。。
描述:

以下是原代码，不知为什麽粘贴上去後在excel当中看不到任何不同一个就是一个但是在预览当中却有两个我粘贴的内容。而且是接着的。。
if (j=3) and not query3.Eof then
      begin
   
      excelworksheet1.Range['a9','l9'].Copy(EmptyParam);
 
      excelworksheet1.Range[excelworksheet1.Cells.Item[d1+8,1],excelworksheet1.Cells.Item[d1+8,12]].Select;
      excelworksheet1.Paste;
      excelworksheet1.Range[excelworksheet1.Cells.Item[d1+8,1],excelworksheet1.Cells.Item[d1+8,12]].RowHeight:=77.25;
       end;
           end
      else
       begin
      d2:=j mod 3;
      if (((j mod 3)=0) and (j<>3) and (not query3.Eof)) then
       begin
       x:=x+15;
       d1:=x;
   
       if (((j mod 3)=0) and not (query3.Eof)) then
       begin
       excelworksheet1.Range['a9','l9'].Copy(EmptyParam);
       excelworksheet1.Range[excelworksheet1.Cells.Item[d1+8,1],excelworksheet1.Cells.Item[d1+8,12]].Select;
       excelworksheet1.Paste;
  
       excelworksheet1.Range[excelworksheet1.Cells.Item[d1+8,1],excelworksheet1.Cells.Item[d1+8,12]].RowHeight:=77.25;
       end;
       end;

---

解决方案1:

找找EXCEL的原因...

解决方案2:

if (j=3) and not query3.Eof then
if (((j mod 3)=0) and not (query3.Eof)) then
j=3是两句是一个意思，不知道是不是这个原因

解决方案3:

up

以上介绍了“ 一个不知所云的问题，是关於excel的。。想不到。。”的问题解答，希望对有需要的网友有所帮助。
本文网址链接：http://www.codes51.com/itwd/3497995.html