返回首页
当前位置: 主页 > Excel教程 > Excel VBA教程 >
  • Excel打印工作簿的操作和方法 日期:2014-11-23 22:04:36 点击:266 好评:2

    本文介绍excel打印工作簿的方法。一次性打印多个excel工作簿文件的方法是这样的: 1.把所有需要打印的excel文件放在一个文件夹下面。 2.执行文件打开,弹出打开对话框。 3.选择需要打印的excel工作簿文件。 4.单击左小角的工具按钮,选择打印。 上面的步骤就是excel打印工作簿的方法。 附:打印工作簿截图:...

  • 如何实现Excel2007文档逆序打印 日期:2014-10-22 22:24:17 点击:260 好评:0

    在Word2007中,只要依次点击左上角Office徽标打印,在打开的打印设置窗口中点击选项按钮,在接着出现的Word选项窗口中切换到高级标签页,然后勾选打印项中的逆序打印页面选项,这样打印机打印时就会从最后一页开始逆序打印到第一页,打印完毕后,最后一页自然处于最底下,而第一页处于最上面,如此则无须逆序重排文档,直...

  • 如何利用ExcelVBA解决棘手的数据提取问题 日期:2014-09-27 22:47:22 点击:451 好评:8

    今天同事问了个我一个数据提取的问题。他的需求是这样的: 他有1个工作簿,里面有100个工作表。他希望把每个工作表里的第6行的b6:i6数据复制到一起, 也就是说他要把工作表里的第6行,汇总在一起。比如这样: 他说如果你没办法,那他只能手动来复制100个工作表,提取这数据了。 我想了下说,我用VBA编程试试。 差不多10分钟...

  • Excel VBA实现按名称循环出现特定次数 日期:2014-09-27 22:21:42 点击:284 好评:4

    我们常常遇到这样的问题: 把一些名称重复输入个N行,N是特定的,比如说。 结果大概这样: 为什么我们要做这样的事情呢。其实这样的应用场景很多,比如说促销活动选品,不同类目名称要有不同的个数。类目属性调整,不同类目也是不同的属性项,也就有了不同的次数。不同行业也有各自不同的场景。 以往基本上就是手动来做,...

  • 让Excel筛选后的序号自动连续 日期:2014-09-27 22:20:43 点击:320 好评:4

    前几天一个教程客户问我这样的问题: 如何实现筛选后的序号还是连续,而不是中断的。 如图A列这样: 而不是B列那样。我是这样思考的 首先和筛选有关,那就只有subtotal函数而已。具体定义大家可以百度等地方。 然后序号连续的一种可能就是计数。每下拉1个,就加1. 所以最后函数公式A3= =SUBTOTAL(3,$B$2:$B3)。3代表计数的...

  • Excel for VBA:对象枚举循环For each 日期:2014-09-27 22:16:17 点击:809 好评:0

    分享下所学的VBA。下面代码很适合财务童鞋做报表。 首先假定你的工作簿打开就是3个工作表的打开Excel ,按alt+F11,进入编辑器,然后插入模块。 框里输入 Sub addchange() '添加9个然后统一改名为1-12月 Worksheets.Add Count:=9 '添加12-3个工作表,对象.方法(setting...

  • Excel小bug-无法打开数据透视表源文件 日期:2014-09-26 14:16:09 点击:258 好评:8

    Excel刷新透视表为何出现无法打开数据透视表源文件。截图 原因我后来找到了。 源文件问题我找到了,算是excel的bug 文件名[,}出现这符号就会造成引用出错。也就是说excel文件名称出现中括号,大括号,刷新透视表就会出现这问题。...

  • Excel VBA实现文件自杀 日期:2014-09-26 14:15:28 点击:322 好评:2

    分享一段代码: '关闭文件时执行'文件自杀代码 Private Sub Workbook_BeforeClose(Cancel As Boolean) ActiveWorkbook.ChangeFileAccess xlReadOnly '将文件设置为只读模式 Kill ActiveWorkbook.FullName '删除文件 Application.Quit '退出程序 End Sub 大家可以拿个没用的excel文件试试。自杀的无影无踪哦。...

  • Excel最近工作报表里用的编程代码 日期:2014-09-25 21:10:56 点击:252 好评:0

    工作报表不能分享大家看,让可以让大家瞧瞧我这简单的代码,O(_)O哈哈~。具体如下: Sub 清空销量2() '清空后6月导入的数据 res = MsgBox(准备清空销量数据, vbYesNo) '对话框的设置 If res = vbNo Then Range(a3).Select '光标定位A2 Else Range(a3:n25).ClearContents '清空该区域 MsgBox 已经清空销量数据 Range(a3).Sel...

  • Excel vba实现字母全部转小写 日期:2014-09-03 22:52:24 点击:262 好评:0

    今天来分享一段代码。大家先进入vba编辑器中,然后插入模块使用,复制进去。 具体代码如下: '将A列转字母全部转换成小写 Sub test1() '设置TEST为过程的名称 Dim x As Integer '声明X为整数变量 For x = 1 To Range(A65536).End(xlUp).Row '设置X的范围为1到A列最后空白单元格的行数 Range(A x) = LCase(Range(A x)) '附...

推荐内容