天气
模块内容加载中...
自定义模块
模块内容加载中...
自定义模块
模块内容加载中...
做it的朋友经常遇到修改报价表的问题！用个小小的vba吧！
2010-7-26 20:54:43 阅读48 评论0 262010/07 July26
Sub 修改报价()
'
' Macro1 Macro
' 宏由 zheng 录制，时间: 2010/7/20
'Cells(1, 1).Row
'
' Range("E4").Select
' With Selection.Interior
' .ColorIndex = 3
' .Pattern = xlSolid
' .PatternColorIndex = xlAutomatic
' End With
msg = MsgBox("请事先做好原件的备份！", vbYesNoCancel, "警告!")
If msg = vbYes Then
z = InputBox("请输入增加的金额")
For i = 4 To Cells(Rows.Count, "E").End(xlUp).Row
Cells(i, "E") = Cells(i, "E") + z
'
' Macro1 Macro
' 宏由 zheng 录制，时间: 2010/7/20
'Cells(1, 1).Row
'
' Range("E4").Select
' With Selection.Interior
' .ColorIndex = 3
' .Pattern = xlSolid
' .PatternColorIndex = xlAutomatic
' End With
msg = MsgBox("请事先做好原件的备份！", vbYesNoCancel, "警告!")
If msg = vbYes Then
z = InputBox("请输入增加的金额")
For i = 4 To Cells(Rows.Count, "E").End(xlUp).Row
Cells(i, "E") = Cells(i, "E") + z
见与不见
2009-12-20 21:17:33 阅读50 评论0 202009/12 Dec20
你见，或者不见我
我就在那里
不悲不喜
你念，或者不念我
情就在那里
不来不去
你爱，或者不爱我
爱就在那里
不增不减
你跟，或者不跟我
我的手就在你手里
不舍不弃
来我的怀里
或者
让我住进你的心里
默然 相爱
我就在那里
不悲不喜
你念，或者不念我
情就在那里
不来不去
你爱，或者不爱我
爱就在那里
不增不减
你跟，或者不跟我
我的手就在你手里
不舍不弃
来我的怀里
或者
让我住进你的心里
默然 相爱
小小批处理，为菜鸟测试网络
2008-10-20 19:59:08 阅读232 评论1 202008/10 Oct20
@echo off
title by 15605331818
title by 菜鸟
echo.
echo.
set /p gw="请输入要ping的ip地址，或者是网络地址:"
echo.
echo.
echo 请等待20秒，程序正在测试......
ping -n 20 %gw% >%temp%\ip.txt
for /f "tokens=3 delims= " %%a in ('find /c "Request timed out" %temp%\ip.txt') do (
if %%a geq 5 (msg %username% 丢包率大于5%%,请检测线路,你感觉网速如何？) else (msg %username% 路线正常)
)
del %temp%\ip.txt
pause
@echo off
:main
cls
color fc
echo.
echo.
echo.
echo *********线路不通的原因有以下三种情况********
echo.
set/p= (1)首先让我们来测试一下tcp/ip协议，或者你的网卡有问题吗请选择输入<nul
echo.
echo.
set/p= (2)首先让我们来测试一下网关协议，或者你的网卡有问题吗请选择输入<nul
title by 15605331818
title by 菜鸟
echo.
echo.
set /p gw="请输入要ping的ip地址，或者是网络地址:"
echo.
echo.
echo 请等待20秒，程序正在测试......
ping -n 20 %gw% >%temp%\ip.txt
for /f "tokens=3 delims= " %%a in ('find /c "Request timed out" %temp%\ip.txt') do (
if %%a geq 5 (msg %username% 丢包率大于5%%,请检测线路,你感觉网速如何？) else (msg %username% 路线正常)
)
del %temp%\ip.txt
pause
@echo off
:main
cls
color fc
echo.
echo.
echo.
echo *********线路不通的原因有以下三种情况********
echo.
set/p= (1)首先让我们来测试一下tcp/ip协议，或者你的网卡有问题吗请选择输入<nul
echo.
echo.
set/p= (2)首先让我们来测试一下网关协议，或者你的网卡有问题吗请选择输入<nul
关于淄博网通封锁共享上网的问题
2008-2-27 19:03:39 阅读594 评论1 272008/02 Feb27
近来有很多淄博的网友，问我是如何突破网通的封锁，共享上网的！
我在2008年的1月16日是，打开页面显示了淄博网通通过使用南京信风，封锁路由设备限制家庭共享上网的页面！我在第一时间致电10060，我问：为什么一个家里一台台式机，和一台笔记本为何不能同事上网！服务小姐表示爱莫能助！我只有问候网通老总的母亲，并祝愿淄博的网通，早日倒闭！
然后我只有自己想办法解决问题，因为我自己的家的网关，路由设备，是我自己用linux搭建的，所以与各位网友用路由器共享上网的方式，有一点点不同，因为简单的将我用的是软路由，是用iptables修改ip包头来nat的，大家的用的路由器可能是用的嵌入式linux核心，修改包的方式，与我这里有一点点的不同。不过我想既然我的方式能顺利达到上网的目的，我想各位网友也能从中得到启示，顺利突破网通封锁的！
以下代码是我写的简单的linux脚本！如果你想把它变成你的防火墙，可以查找linux的相关资料。
#！/bin/sh
Lan=你的内部网络ip/子网掩码
echo 1 >/proc/sys/net/ipv4/ip_forward
iptables -t nat -A POSTROUTING -s $Lan -o ppp0 -j MASQUERADE
然后客户端安装2.5共享神盾，之后可确保你可以上网，速度并无影响
如果你收到arp病毒影响，还可以使用下面的批处理来绑定你的ip和网关
@echo off
::
我在2008年的1月16日是，打开页面显示了淄博网通通过使用南京信风，封锁路由设备限制家庭共享上网的页面！我在第一时间致电10060，我问：为什么一个家里一台台式机，和一台笔记本为何不能同事上网！服务小姐表示爱莫能助！我只有问候网通老总的母亲，并祝愿淄博的网通，早日倒闭！
然后我只有自己想办法解决问题，因为我自己的家的网关，路由设备，是我自己用linux搭建的，所以与各位网友用路由器共享上网的方式，有一点点不同，因为简单的将我用的是软路由，是用iptables修改ip包头来nat的，大家的用的路由器可能是用的嵌入式linux核心，修改包的方式，与我这里有一点点的不同。不过我想既然我的方式能顺利达到上网的目的，我想各位网友也能从中得到启示，顺利突破网通封锁的！
以下代码是我写的简单的linux脚本！如果你想把它变成你的防火墙，可以查找linux的相关资料。
#！/bin/sh
Lan=你的内部网络ip/子网掩码
echo 1 >/proc/sys/net/ipv4/ip_forward
iptables -t nat -A POSTROUTING -s $Lan -o ppp0 -j MASQUERADE
然后客户端安装2.5共享神盾，之后可确保你可以上网，速度并无影响
如果你收到arp病毒影响，还可以使用下面的批处理来绑定你的ip和网关
@echo off
::
6条法则让你变得富有!
2007-10-21 16:46:13 阅读143 评论2 212007/10 Oct21
大多数人之所以跟钱之间总有不可逾越的鸿沟，是因为他们不知道钱的活动能力。钱，跟人一样，是有生命的。每一块钱就是你的一个职员，你的目标是让你的职员勤奋工作，经过时间的沉淀，人员会日益壮大，工作效率会越练越高，他们会帮你赚更多的钱，积累到一定的财富时，你就可以作为董事长早日享受退休生活。这里有六条关于财富的法则，也许你能因此获得通向财富之门的万能钥匙。
第一条了解小钱的威力
很多人常常跟我说，很想投资就是没钱，其实他们的误区在于，很多人都认为投资得有一大笔钱才能开始，总存有我手头上的钱暂不宽裕的心理，他们认为投资一次性至少也得是万儿八千的，否则就没什么意义。但是富翁的钱也是从1块钱攒起来的，财务自由不是一天就可以实现的。我家的一个邻居汪太太，刚到美国的时候就在餐厅里刷盘子，她把遗弃的各种废旧瓶子都积攒了起来卖钱，看上去值不了几个钱的东西她从来也不放过。现在她的资产已经超过千万了，所有的积蓄都是她从不起眼的小钱投资开始的。我这里并不是建议大家要如此的朴素，但这段经验是有价值的，别忽略从小钱开始。
第二条财务自由的准备
你现在节约下来的每一块钱，都是你将来的财务自由的每一块坚固基石。攒钱是如此，花钱也是如此，花20块钱和40块钱也许一次起来有什么区别，但时间长了，所产生的贫富差异却十分悬殊。钱始终在为你工作，你拥有钱的越多，工作起来效率就会越高，收益就会越显著。有了这些钱，你就可以不必再给别人打工，可以在家里陪孩子，享受退休生活，周游世界。如果你当前有收入来源，那么你就从今天开始积累财富，可能一次只有5块、10块钱，但每一次微不足道的积累都将成为你实现财务自由之路的基石。
第一条了解小钱的威力
很多人常常跟我说，很想投资就是没钱，其实他们的误区在于，很多人都认为投资得有一大笔钱才能开始，总存有我手头上的钱暂不宽裕的心理，他们认为投资一次性至少也得是万儿八千的，否则就没什么意义。但是富翁的钱也是从1块钱攒起来的，财务自由不是一天就可以实现的。我家的一个邻居汪太太，刚到美国的时候就在餐厅里刷盘子，她把遗弃的各种废旧瓶子都积攒了起来卖钱，看上去值不了几个钱的东西她从来也不放过。现在她的资产已经超过千万了，所有的积蓄都是她从不起眼的小钱投资开始的。我这里并不是建议大家要如此的朴素，但这段经验是有价值的，别忽略从小钱开始。
第二条财务自由的准备
你现在节约下来的每一块钱，都是你将来的财务自由的每一块坚固基石。攒钱是如此，花钱也是如此，花20块钱和40块钱也许一次起来有什么区别，但时间长了，所产生的贫富差异却十分悬殊。钱始终在为你工作，你拥有钱的越多，工作起来效率就会越高，收益就会越显著。有了这些钱，你就可以不必再给别人打工，可以在家里陪孩子，享受退休生活，周游世界。如果你当前有收入来源，那么你就从今天开始积累财富，可能一次只有5块、10块钱，但每一次微不足道的积累都将成为你实现财务自由之路的基石。