网购省钱利器：Excel追价宝-用Excel追踪心仪商品的价格

Cellfarmer · 发表于 2016-1-3 10:27

针对V3版本：
打开VBE,Module3,最后一段，加入粗体一句设置图片的倒影效果：
If picmode < 4 Then

      For i = 1 To piccount
         If ActiveSheet.Shapes(i).TopLeftCell.Address = "$R$2" Then ActiveSheet.Shapes(i).delete
      Next i
      Range("R2").Select
      ActiveSheet.Pictures.Insert(picfilename).Select
      Selection.Top = Range("R2").Top
      Selection.Left = Range("R2").Left
      Selection.ShapeRange.Reflection.Type = msoReflectionType2
      Range("R1").Value = picfilename

End If

Sheet1.Range("H3").Select
Sheet1.Protect

黑暗中的杀手 · 发表于 2016-1-5 09:32

支持一下

______落幕╮ · 发表于 2016-1-8 15:33

ganls 发表于 2015-11-5 09:17
输入网址总是显示“出错啦”，不知道咋回事，已按照文档操作还是不行！有其他人遇到过吗？

我也是同样的问题

松松1218 · 发表于 2016-1-16 23:32

好东西大家享！谢谢！

fengyuyifeng · 发表于 2016-1-20 15:11

看着不错的一款软件。
excel功能还挺强大。

786232 · 发表于 2016-1-27 13:32

又一神器啊

ttpod5230 · 发表于 2016-1-30 20:31

感谢分享，。

excel_ex · 发表于 2016-2-19 22:01

原来还可以这么用，谢谢哦，收下学习下

欧麦咖 · 发表于 2016-2-20 14:26

精品，收藏了。

plzhangying · 发表于 2016-2-21 07:51

感谢分享！！！

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