wshcw
wshcw
关注数: 366
粉丝数: 228
发帖数: 3,317
关注贴吧数: 842
我想学改一下这个宏文件,请帮帮我. 我想在下列程序中增加差生人数,差生率以及<60的改为两段,即59.9-40,<=39其中一部分模块的宏代码如下:Sub 历史分析()'' 历史分析 Macro' 太阳风 记录的宏 2005-9-3'' Range("A11:H11").Select ActiveCell.FormulaR1C1 = "历史" Range("I11:N11").Select ActiveCell.FormulaR1C1 = "分数段" Range("A12").Select ActiveCell.FormulaR1C1 = "班级" Range("A13").Select ActiveCell.FormulaR1C1 = "1" Range("A14").Select ActiveCell.FormulaR1C1 = "2" Range("A15").Select ActiveCell.FormulaR1C1 = "3" Range("A16").Select ActiveCell.FormulaR1C1 = "4" Range("A17").Select ActiveCell.FormulaR1C1 = "5" Range("A18").Select ActiveCell.FormulaR1C1 = "6" Range("A19").Select ActiveCell.FormulaR1C1 = "总计" Range("B12").Select ActiveCell.FormulaR1C1 = "人数" Range("B13").Select ActiveCell.FormulaR1C1 = "=COUNTIF(成绩输入!R[-11]C[-1]:R[207]C[-1],""=1"")" Range("B14").Select ActiveCell.FormulaR1C1 = "=COUNTIF(成绩输入!R[-12]C[-1]:R[206]C[-1],""=2"")" Range("B15").Select ActiveCell.FormulaR1C1 = "=COUNTIF(成绩输入!R[-13]C[-1]:R[205]C[-1],""=3"")" Range("B16").Select ActiveCell.FormulaR1C1 = "=COUNTIF(成绩输入!R[-14]C[-1]:R[204]C[-1],""=4"")" Range("B17").Select ActiveCell.FormulaR1C1 = "=COUNTIF(成绩输入!R[-15]C[-1]:R[203]C[-1],""=5"")" Range("B18").Select ActiveCell.FormulaR1C1 = "=COUNTIF(成绩输入!R[-16]C[-1]:R[202]C[-1],""=6"")" Range("B19").Select ActiveCell.FormulaR1C1 = "=COUNTIF(成绩输入!R[-17]C[-1]:R[201]C[-1],"">0"")" Range("C12").Select ActiveCell.FormulaR1C1 = "总分" Range("C13").Select ActiveCell.FormulaR1C1 = "=SUM('1'!R[-11]C[6]:R[19]C[6])" Range("C14").Select ActiveCell.FormulaR1C1 = "=SUM('2'!R[-12]C[6]:R[18]C[6])" Range("C15").Select ActiveCell.FormulaR1C1 = "=SUM('3'!R[-13]C[6]:R[17]C[6])" Range("C16").Select ActiveCell.FormulaR1C1 = "=SUM('4'!R[-14]C[6]:R[16]C[6])" Range("C17").Select ActiveCell.FormulaR1C1 = "=SUM('5'!R[-15]C[6]:R[35]C[6])" Range("C18").Select ActiveCell.FormulaR1C1 = "=SUM('6'!R[-16]C[6]:R[34]C[6])" Range("C19").Select ActiveCell.FormulaR1C1 = "=SUM(成绩输入!R[-17]C[6]:R[201]C[6])" Range("D12").Select ActiveCell.FormulaR1C1 = "平均分" Range("D13").Select ActiveCell.FormulaR1C1 = "=RC[-1]/RC[-2]" Range("D14").Select ActiveCell.FormulaR1C1 = "=RC[-1]/RC[-2]" Range("D15").Select ActiveCell.FormulaR1C1 = "=RC[-1]/RC[-2]" Range("D16").Select ActiveCell.FormulaR1C1 = "=RC[-1]/RC[-2]" Range("D17").Select ActiveCell.FormulaR1C1 = "=RC[-1]/RC[-2]" Range("D18").Select ActiveCell.FormulaR1C1 = "=RC[-1]/RC[-2]" Range("D19").Select ActiveCell.FormulaR1C1 = "=RC[-1]/RC[-2]" Range("E12").Select ActiveCell.FormulaR1C1 = "及格人数" Range("E13").Select ActiveCell.FormulaR1C1 = "=COUNTIF('1'!R[-11]C[4]:R[19]C[4],"">=60"")" Range("E14").Select ActiveCell.FormulaR1C1 = "=COUNTIF('2'!R[-12]C[4]:R[18]C[4],"">=60"")"
吧主:您主页里的"EXCEL各页名"无法下载 您个人主页里的"EXCEL各页名"无法下载,请重新加载。
谁有word试卷王2.0的升级包,给发一份。 word试卷王2.0很好用,但语文试卷中作文纸还没有,据说是注册用户用向编者索取升级包,升级包中有作文纸功能,谁有就送一份,我的信箱是:
[email protected]
再向老师请教,在各种字符中如何提取汉字字符 前段时间,向juyouhh老师请教了汉字字符统计的自定义函数和公式,该公式的技术含量很高(公式、函数虽不是十全十美,但完全能处理现实工作中的复杂问题),现再向老师请教:在各种各样的字符混杂的情况下,如何提取汉字字符。
用excel如何生成标准的大九九乘法口诀表 要求:1、生成全部为中文小写数字的大九九乘法口诀表(九九八十一句)。2、格式要符合标准,如:一一得一(一一○一最好)、八四三十二、八九七十二3、样表已上传至“求助”文件夹中。以上要求,请老师帮助解决,谢谢了!
juyouhh老师,您又有两封邮件。 uyouhh老师: 数组公式改为>=33088后,汉字能统计了,但"dsASDFfasf1234124地克格勃"这一行统计又错了,统计结果为13 真是解决了汉字本身问题,又添了全角字母、数字的麻烦。
juyouhh老师,请查您的邮件。 juyouhh老师,汉字统计方面的邮件已发给您,其中:附件一不小心一个表格就占有10M多。
为什么注册计算机时对话框白白的一片,什么也看不见? 我的电脑在使用中提示"注册计算机",打开后却什么也看不清,白白的一片。
如何生成标准的学校校历 只需输入第一周每一天(星期日)的日期就可生成学校校历,并且还要每逢1日自动显示月份(元旦只显示年份),不显示日期,也不必要设置单元格。 样表已上传,请老师帮助解决,谢谢了。
造字文件EUDC.TTE应怎样恢复最好 我将造字文件EUDC.TTE保存后,待windowsxp系统出现问题,重装系统后,将该文件复制到字体文件夹C:\WINDOWS\Fonts,此时原来所造的字又被重新恢复,但造字程序又被破坏。如何才能做到两全其美的目的,请各位高手赐教。
在这个EXCEL表格中,怎样才能提高输入速度,请高手帮忙。 我们最近组织的会计从业资格考试,需要填写应考人员的信息,其中就有身份证号,因身份证为15位或18位,所以,表格空有18个小单元格,没办法,样表就是这样,第次输入身份证号时,每打一位数字,就得按一下TAB键,然后输入下一位数,很烦人。有没有其他办法,能让他自动跳转,从而,实现连续输入,提高输入速度。请各位老师赐教,谢谢了。
请juyouhh等老师帮忙 juyouhh老师: 谢谢您的指导,经测试数组公式=SUM(ISNUMBER(F4:H4)*{20,20,60})很好用,但我还是再想问一下,昨天问您的那个公式,我把F4:H4中的某个单元格或几个单元格数值由1改为其它任意数值,为什么合计数不改变。不知是何原因,请再指教。(该公式引用单元格中如果不含文本,则简单。但正因为含有文本,数值与文本相乘之后出错)
求插入日期比系统日期提前3天 请问用能否实现比系统日期提前3天吗?
求能统计汉字个数的EXCEL函数或公式 多数人写的宏会出现把全角数字及全角字母当作汉字统计,哪位高人会,请帮忙。
用EXCEL如何统计汉字字符个数 在EXCEL表格中常常涉及到统计学生成绩时需解决:1、如何用函数统计汉字个数2、如何用函数有效性或条件格式判定姓名中有非法字符(如:含有数字、符号、英文字母等非汉字字符)我想请高手帮忙解决此问题,谢谢了。我的信箱是:
[email protected]
首页
1
2
3
下一页