☆[置顶][原创]校园智能广播控制系统20090606新版发布!

» 阅读该日志全文...

Excel 自动批量打印代码

该日志由 roczyl 发表于 2009-11-17

Sub my_print()

Dim pagestart, pageend As Integer
Dim pagecell As String
On Error GoTo errdeal
pagecell = "k3"
pagestart = Int(InputBox("请输入需打印的起始序号,如1", , "1"))
pageend = Int(InputBox("请输入需打印的结束序号,如50", , "1"))
   
For i = pagestart To pageend Step 1
    Range(pagecell).Select
    ActiveCell.FormulaR1C1 = i
     ActiveSheet.Calculate
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Next i

Exit Sub
errdeal:
End
End Sub

Excel VBA常用技巧

该日志由 roczyl 发表于 2009-06-23

很好的 excel vba 技巧集锦,工作的好帮手。
 第1章Range(单元格)对象
 第2章Worksheet(工作表)对象
 第3章Wordbook(工作簿)对象
 第4章Shape(图形)、Chart(图表)对象
 第5章Application对象
 第6章使用对话框
 第7章菜单和工具栏
 第8章控件与用户窗体

» 阅读该日志全文...

该日志标签: 编程 , 技巧 , vba , excel

主流打印机驱动的官方下载地址

该日志由 roczyl 发表于 2009-05-21

该日志标签: 惠普 , hp , 爱普生 , epson , canon , 官方 , 驱动 , 打印机 , 佳能 , 下载

Excel实用技巧精华版整理

该日志由 roczyl 发表于 2009-05-17

    从身份证号码中提取性别
    Q:A1单元格中是15位的身份证号码,要在B1中显示性别(这里忽略15位和18位身份证号码的判别)
B1=if(mod(right(A1,1),2)>0,"male","female")
请问这个公式有无问题,我试过没发现问题。但在某个网站看到作者所用的是如下公式:B1=if(mid(A1,15,1)/2=trunc(mid(A1,15,1)/2),"female","male")
提取性别(无论是15位还是18位)
=IF(LEN(A1)=15,IF(MOD(MID(A1,15,1),2)=1,"男","女"),IF(MOD(MID(A1,17,1),2)=1,"男","女"

» 阅读该日志全文...

该日志标签: 技巧 , excel

Excel中用VBA的SQL不打开其他工作簿获得数据

该日志由 roczyl 发表于 2009-05-17

excelvba中使用sql建立与工作簿的连接,查询数据记录后复制到当前工作表中,可实现不打开其他Excel文件获取数据到本文件中,同时可使用SQL的强大功能分类获取。

» 阅读该日志全文...

该日志标签: sql , vba , excel

在Exce中用VBA控制单元格中的数据有效性

该日志由 roczyl 发表于 2009-05-16

    这两天忙着给全镇小学六年级模拟考试算分数、统计,领导给的要求挺复杂,因本人过于追求完美,所以在excel中编了个小程序,解决了很多问题。提高了效率,也学到了很多vba的知识。平时可没动力学习,呵呵。才发现编程有时候确实是一件有趣的事。
    今天学会了一招,就是不会的东西,可以通过录制宏,再看代码。真好!

» 阅读该日志全文...

该日志标签: vba , exce , 数据有效性

在Excel中创建下拉列表输入数据

该日志由 roczyl 发表于 2009-05-15

    在excel中可以采用下拉列表的方式快速输入数据。创建下拉列表方法如下:
    1、首先选中需要显示下拉列表的单元格或单元格区域。
    2、单击菜单上“数据→有效性”命令。
    弹出“数据有效性”窗口。
    3、在弹出“数据有效性”窗口中,在窗口中选择“设置”选项卡,在“允许”下拉列表中选择“序列”选项。
    4、弹出带有“来源”框的“数据有效性”新窗口。
    5、在带有“来源”框的“数据有效性”新窗口中,举例如:在“来源”下框中输入“姓名,年龄,性别,出生年月”(请注意:逗号“,”为半角),然后点“确定”即可。
    这样我们就可以看到原所选单元格中已经创建好了一个下拉列表。这样,用户今后在输入数据的时候就可以免去敲击键盘了,只需要用户用鼠标进行选择即可。

» 阅读该日志全文...

该日志标签: 数据有效性 , 下拉列表 , excel

[转]WORD页码随意设

该日志由 roczyl 发表于 2009-03-18

    可以在一篇文档中任意插入多段不同的连续的页码,选取“设置页码格式”,还可以指定从任意数字开始计页码。一般第一页是封面,第二页是目录,第三页是摘要,第四页往后是正文。正文要编上页码,而封面、目录和摘要可能不需要页码。以前没有过多地研究过这个问题,往往是用的笨办法,将封面,目录,摘要单独做个word文档。正文单独做一个,然后再插入页码打印,不再笨下去了!!

» 阅读该日志全文...

HP Q2612A 加粉图解

该日志由 roczyl 发表于 2009-03-16

HP q2612a 加粉图解

附件: hp.doc (337 K,已下载140次,上传于2009-03-16 12:17)

该日志标签: 加粉 , q2612a

Total: 12Page 1 of 212Next ›