代码隐藏在哪儿呢

gbtt520

fxl447098457 发表于 2016-11-26 20:55
人家这个明显是一个收费的东西，你也拿来论坛.pojie.窃取别人的劳动成果。我觉得做人要有起码的坚持。。有 ...

破解什么的,只是我自己学习用,我又不是拿去赚钱,,
这个打印程序我自己也做了一个,只是有一些功能没人家做的好而已
你要可以发一个给你

34682189

Sub wvRw()
Call wvpanduan
On Error Resume Next
Set shtda(1) = wvSheet1
Set shtda(2) = wvSheet2
Set shtda(3) = wvSheet3
Set shtda(4) = wvSheet4
Set shtda(5) = wvSheet5
Set shtda(6) = wvSheet6
Set shtda(7) = wvSheet7
Set shtda(8) = wvSheet8
Set shtda(9) = wvSheet9
Set shtda(10) = wvSheet10
Set shtda(11) = wvSheet11
Set shtda(12) = wvSheet12
Set shtda(13) = wvSheet13
Set shtda(14) = wvSheet14
Set shtda(15) = wvSheet15
Set shtda(16) = wvSheet16
Set shtda(17) = wvSheet17
Set shtda(18) = wvSheet18
Set shtda(19) = wvSheet19
Set shtda(20) = wvSheet20

        Dim m%
        Dim m2%
        Dim gs%
        Dim i%
        Dim j%
        Dim ri%
        
wvr:
If ActiveSheet.CodeName = "shtke" Then
    With shtsys

在隐藏模块里。但你说是本论坛的前辈的作品，就不发源码了。

gbtt520

34682189 发表于 2016-11-27 13:14
Sub wvRw()
Call wvpanduan
On Error Resume Next

你发上来这些是啥

gbtt520

34682189 发表于 2016-11-27 13:14
Sub wvRw()
Call wvpanduan
On Error Resume Next

只是不想挖坟让人家出来而已,要不我发上来一个简单的,看你行不行

34682189

和这个是一样的原理。

gbtt520

34682189 发表于 2016-11-27 16:05
和这个是一样的原理。

大神大神怎么做到的,有没有教程,不想说的话有没有书可以介绍的!!!

34682189

http://club.excelhome.net/thread-968072-1-1.html

34682189

没什么技术含量。只是根据版主的一个主题受到的启发。版主没有公布方法，我也不便公布。

gbtt520

34682189 发表于 2016-11-27 16:26
http://club.excelhome.net/thread-968072-1-1.html

这个帖子我也看过,没看懂,!!!
本来只想学点图片和文本输出的东西的,结果越搞越复杂,都不知道自己在干嘛了

microyip

上面已经有大神说了，这种收费性质的，就不应该在公开里询问，太不厚道了，只能各凭本事，自个有办法解就解，没法就不应该这么到处问嘛。