[求助]能否帮设计一个函数

shrubco

经常要汇总一些数据

设置了条件格式，但是很想把不符合条件的数据汇总到一起

版主能否帮忙设计一下，另外还想实现一个自动去符号功能

附上样本

[此贴子已经被作者于2004-12-9 15:56:09编辑过]

老鬼

你说的第一个功能没法用自定义函数实现，你所说的汇总到一起不知道是什么意思，是放到同一个下拉列表吗？第二个功能你可以设个按钮，按钮指定宏为如下程序：Sub test()

For Each cel In Application.Selection

cel.Value = Mid(Trim(cel.Value), 2)

Next

End Sub

foxxp

加了一个函数AlertIt

[此贴子已经被作者于2004-12-12 16:44:14编辑过]

shrubco

alertit好像的确可以用！是用宏吗？不过楼上的能否告诉我，这个宏怎么做的？代码我看不太懂

老鬼

以下是引用foxxp在2004-12-12 16:40:25的发言：

加了一个函数AlertIt

好像只考虑了上限，没有考虑下限

foxxp

鬼兄:版主的眼睛是雪亮的.

不过不是没有考虑,因为楼主只说"超标",没说"欠标",所以没加.

楼主:在Excel的界面中,按Alt-F11(菜单为:工具-宏-Visual Basic编辑器),会出现Microsof Visual Basic窗口,在其中的"工程 - VbProject"子窗口中可选择你想加代码的电子表格(因为同时打开的电子表格可能有多个),如果没有这个子窗口,可以按Ctr-R(菜单为:视图-工程资源管理器),点击插入模块,或者在"工程 - VbProject"子窗口中的相应电子表格展开模块(可以看到已有的模块),然后就可以加代码,或者查看修改原来的代码了.

老鬼

呵呵，没听过“欠标”~~~~~~