<div class="msgheader">QUOTE:</div><div class="msgborder"><b>以下是引用<i>hhzjxss</i>在2008-7-26 13:15:00的发言:</b><br/></div><p>一样的,都是调用腾老大的临时对话框,不同的是一个是批命令一个是VBA</p><p>s = InputBox("输入QQ号码")<br/>ActiveWorkbook.FollowHyperlink "<a href="http://wpa.qq.com/msgrd?V=1&amp;Uin">http://wpa.qq.com/msgrd?V=1&amp;Uin</a>=" & s & "&amp;Menu=yes"<br/></p>