简单VBA求教

zxc554657357

VBA目的是A1=4的话，就复制A5到B1，现在遇到两个问题，求教
1、复制的是数值，必须手动双击回车才行，怎样才能直接以图片形式显示，
2、想把图片放到表2里，如果把图片位置改成 表2 要怎么改呢( sheet2!. )？


if(Range("A1").Value2==4){Range("B1").Value2=Range("a5")};

cidanji

1. function U(){
   
2.         if(Range("A1").Value2==4){Range("B1").Formula2=Sheet2.Range("A5").Formula2};
   
3. }

复制代码

zxc554657357

cidanji 发表于 2024-4-18 11:18

谢谢您，但是Sheet2这里是报错误不知道为什么，您再帮我看一下吧，

cidanji

zxc554657357 发表于 2024-4-18 14:17
谢谢您，但是Sheet2这里是报错误不知道为什么，您再帮我看一下吧，

进入一下VBE编辑器再回JSA就可以了，或改为下面代码用工作表名称引用。

这里不得不说WPS JSA缺陷，原因是不支持工作表codename，只支持name

1. function U(){
   
2.         if(Range("A1").Value2==4){Range("B1").Formula2=Sheets("Sheet2").Range("A5").Formula2};
   
3. }

复制代码

zxc554657357

cidanji 发表于 2024-4-18 14:30
进入一下VBE编辑器再回JSA就可以了，或改为下面代码用工作表名称引用。

这里不得不说WPS JSA缺陷，原 ...

确实，向您说的，我也查了下WPS宏编辑器和VBA区别还是挺大的，受限挺多，感谢感谢， 我先拿去研究研究。