文档里面的DEMO:
http://www.vbaexpress.com/forum/articles.php

不过没什么东西