最近有个同事需要编写个宏,Excel-VBA中需要用到类似php中的swith-case的功能,翻了下,将VBA中类似的示例代码列出来供需要的人参考:

Select Case income	Case Is <= 0		profitrank = "<=0"	Case[......]

Read more

好吧,其他部门的同事找我帮忙写个宏,写好了本机调试OK,他发给别人就不灵了,经过他的尝试,原来是安全设置的问题,求教了下经验,发布出来给碰到同样问题的孩子一个解决办法:本文针对的是Excel 2007。1.首先要显示出开发工具,如果没有,点Excel左上的开始按钮,点Excel选项,然后[……]

Read more

Firefox下调试Greasemonkey的脚本,各位肯定发现在Firefox的查看元素或者是firebug中,如果js错误的话是根本不会输出错误的。那么如何来查看错误呢?经过查找,在很久的一个回答中找到了解决办法,调试的实惠使用浏览器控制台(Ctrl+Shift+J)即可。当然控制台会输出所[……]

Read more

尝试了一些注入system等指令,是无效的,几经周转,在stackoverflow找到了解决办法,竟然简单到爆……把原始换行“\n”换为“\r”即可实现当前行输出。示例代码:

<?phpwhile (true) {	sleep(1);	echo "Now time:&q[......]

Read more

Excel-VBA-取指定行列单元格内容有两个函数,一个是Range一个是cells。cells(1,1)代表第一行第一列,也就是A1单元格,在VBA中,与Range(“A1″)所指单元格一样也可以写成cells(1,”A”)。[……]

Read more

调试不能老msgbox弹出来看值吧,所以,Debug.Print出现了,这个函数的功能是将调试值输出到立即窗口。进入Excel的宏编辑界面,如果当前窗口没有立即窗口,则按Ctrl+G或者通过点击视图-立即窗口,将立即窗口展示到当前界面。然后在需要调试的地方用Debug.Print 变[……]

Read more

有时候写的函数啥的需要在单元格变动后进行计算更新其他表格,因为if判定嵌套太多实在是让人蛋疼,所以索性用宏来响应单元格变更,如果是目标范围单元格,则用对应函数计算更新。示例代码如下:

Private Sub Worksheet_Change(ByVal Target As Range)	rem 如[......]

Read more