祝生日快乐

遨游向燕赵，
天高爽气晶。
豁然逢光晶，
君门春意生。
春去有来日，
不言意不快。
赋诗思共乐，
失风鼓唅呀

“牛逼”的卓越亚马逊

1、2009年12月22日，卓越亚马逊网站上的一些价格高昂的书籍以25元的低价出售，这些书包括《二十四史》《资治通鉴》《全宋词》等，价格从800多到5000不等，网友们纷涌购买，随后卓越亚马逊单方面取消订单。
2、2010年1月23日，卓越亚马逊将原价为559元的移动硬盘标价为118元。在错误发生的2天后，卓越亚马逊取消了订单。

一个月之内，卓越亚马逊发生两次乌龙事件，采取了同样的方法，为了降低损失而取消订单。网上批评、谩骂、指责一片。

个人认为，卓越亚马逊敢这么做，至少说明它觉得网上的消费者拿他没办法。为何会这样呢？

首先，卓越亚马逊认为发货并不能代表危机公关成功，挽回以前损失的信誉，反而会亏损上百万，相比利润，信誉算个屁（在中国都一样）；同时卓越亚马逊认为消费者都是贪蝇头小利者。

假使卓越亚马逊发货，你也许会有“这个冤大头，赚到了”的想法抑或是“卓越，铁血真汉子”的想法。即使你占到了便宜，当你下次购买其他产品时，发现当当更便宜，你会不去当当购买吗？同样的，如果你抵制卓越亚马逊，当你看到卓越亚马逊的价格较其他网站低的话，你能有坚定的抵制的贞操吗？

我做不到，你呢？

PS:本文并非赞同卓越的做法，而是想说明，在利益面前，其他的都是一片浮云。

1月12日：百度被黑，多数群众表示影响不大

据官方声明系由于www.baidu.com 在美国域名注册商处的信息被非法篡改所致，但据推特上消息，百度被黑的真正原因是：伊朗圣战军的新任领袖阿卜杜.阿卜杜拉（abaidu.abaidula)看百度不爽，犯了名讳，so攻击之。
但目前尚不知阿卜杜.阿卜杜拉是否向拍《杜拉拉》老徐发出警告

Are You kidding？

A陀收到一条邮件，后面附一句“Sent from my Verizon Wireless BlackBerry”，不懂，问B陀啥意思
B陀答曰，“本消息从俺哒黑莓无线手机发送”
A陀：“扯吧，你！！！肯定是句彦语之类的。”

提醒

今天早晨出门几乎被一辆蒙迪欧给撞了，要知道 ，我400度的近视没带眼镜，居然可以看清楚是什么车，可见当时情形多么危急。
这件事提醒我有三：

1.要感谢上帝；
2.早上出门要早点，不要匆匆忙忙；
3.一定要走斑马线，死也要有尊严。

胃口太好

　　在飞机坠毁的地方，仅剩的那位幸存者倚靠在树旁，把刚刚啃光的骨头扔到旁边的骨头堆里，这时，他看到救援队到来了。

　　“老天爷啊，我得救了！”他欣慰地喊道。

　　但是救援队并没有继续往前走，他们被那堆人骨头吓傻了——很明显，这个家伙把同伴们都吃了。那个幸存者羞愧地低下了头，说，“不要责备我，我也是为了活下去才吃了他们，这样做没什么不对的。”

　　救援队的队长稍稍向前迈了一步，摇摇头，一脸不可思议的神情，说，“人为了生存是不择手段的，我不怪你。可是老大，你们的飞机昨天才失事啊……”

Are you fucking kindding？

还能比这再丢人点吗？
点击看大图

原文地址：
http://comment2.news.sohu.com/viewdebate.action?id=125151287&topicId=264756496

EXCEL VBA笔记(不断更新中)

页面已转至：http://blog.jjuv.com/excel-vba

作为一个非IT专业人士，VBA的代码在不停的Google中忘记，为了方便自己查询，特作此笔记用以详细记录在代码中碰到的问题。
如果以下内容侵犯了您的版权，请来信告知，我会立刻删除。如无特殊说明，本笔记遵循《署名-非商业性使用-相同方式共享 2.5 中国大陆》方式进行共享
更新时间：Jul 02, 2009@10:30

Q1.Excel 中命名过的名称在vba中怎么使用
A1. 若某单元格或区域被命名为”aa”，则VBA中引用这个区域，range("aa")

Q2.VBA定义名称
A1.Sheets("工作表名称").range("单元格区域").Name="定义的名称"

Q3.如何在可以运行窗体的同时可以操作EXCEL工作簿（如何在工作表和窗体间切换）
A3.userform1.show vbmodeless
增加一个vbmodeless即可。
来源：http://club.excelhome.net/thread-348925-1-1.html
作者：tonyibm

Q4.获取人名拼音首字母的excel函数
A4.http://blog.jjuv.com/2009/04/19/first-letter-of-the-chinese-names-excel-function.html

Q5.Excel工作簿中工作表分别保存为文件
A5.http://blog.jjuv.com/2009/03/13/excel-worksheet-saved-as-files-separately.html

Q6.如何将excel工作薄中的单列数据复制到不同的新工作簿中
A6.http://blog.jjuv.com/2009/03/10/how-to-excel-in-a-separate-job-thin-data-replication-to-a-different-new-workbook.html

Q7.VBA中获取文件名的方法
A7.http://blog.jjuv.com/2008/03/02/vba-in-the-way-of-access-to-documents.html

Q8.选择性粘贴数值
A8.
ar=ActiveWorkbook.Sheets(1).Columns("L:L")
ThisWorkbook.Sheets("汇总").Columns("E:E")=ar

Q9.如何修改单元格触发宏运行；
A9.例子如下：
Private Sub Worksheet_Change(ByVal Target As Range)
Dim mo As String
If Target.Count > 1 Then Exit Sub
If Target.Address <> "$D$3" Then Exit Sub '(此处地址需用大写)
mo = Target.Value
If mo = 6 Or mo = 12 Then
MsgBox mo & "月需要填写相关资料"
Rows("29:56").Hidden = False
Else
Rows("29:56").Hidden = True
End If
End Sub

Q10.如何取消筛选
A10.AutoFilterMode = False

Q11.判断EXCEL表格中已使用的行数
A11.Sheets("sheet1").UsedRange.Rows.Count

Q12.向单元格中写入公式
A12.普通公式：range("a1")="=sum(a2:a4")"
数组公式：Range("g18").FormulaArray = "=SUM((fa_cat='28-AC1-5'!A18)*(RIGHT(fa_change,2)=""折旧"")*(fa_depr))"

封

封者，封也。
第一个封，是《辞海》中的第六个释义，限制
第二个封，是下面这个意思

而五人者亦得以加其土封。——明·张溥《五人墓碑记》

Flickr, bing无法访问, 而verycd在检修中，这个夏天！

Scratch Card, I hope you like it.
We don’t or can’t know the truth twenty years ago.

一周年

一周年，时间过的是那么的快 ，对于有些人来说真个是度日如年。