两个sheet之间超链接的复制

cmyjslcs · 发表于 2020-7-6 09:27

各位大神，本人vba小白，有两个sheet，一个是库，一个是查询，库里有超链接，如何将库里的超链接复制到查询sheet，求助，谢谢！详见附件！

wp231957 · 发表于 2020-7-6 09:42

有密码没办法帮

cmyjslcs · 发表于 2020-7-6 09:43

补充：工程密码cmyjslcs

cmyjslcs · 发表于 2020-7-6 09:46

wp231957 发表于 2020-7-6 09:42
有密码没办法帮

工程密码cmyjslcs

wp231957 · 发表于 2020-7-6 09:51

cmyjslcs 发表于 2020-7-6 09:46
工程密码cmyjslcs

我自己做了个简单的测试是可以的

Sub wp()
   Range("g5").Copy
   Range("g7").Select
   ActiveSheet.Paste

End Sub

wp231957 · 发表于 2020-7-6 09:52

cmyjslcs 发表于 2020-7-6 09:46
工程密码cmyjslcs

跨工作表
Sub wp()
   Sheets(1).Range("g5").Copy
   Sheets(2).Activate
   Sheets(2).Range("g7").Select
   ActiveSheet.Paste

End Sub

cmyjslcs · 发表于 2020-7-6 14:03

wp231957 发表于 2020-7-6 09:52
跨工作表
Sub wp()
Sheets(1).Range("g5").Copy

你好！我原先是有一段查询代码的，这个是要加到原来的代码里还是，另外做一个模块？

cmyjslcs · 发表于 2020-7-6 14:10

wp231957 发表于 2020-7-6 09:52
跨工作表
Sub wp()
Sheets(1).Range("g5").Copy

代码看懂了，但是怎么和我原先的代码结合呢？

		自动登录	找回密码
密码			免费注册

[求助] 两个sheet之间超链接的复制