VBA中操作Excel常用方法总结

要用VBA来关闭工作簿，用Workbook.Close 方法即可，而要退出Excel，则用Application.Quit 方法。
下面是一些代码示例： 关闭活动工作簿，如果工作簿有更改，提示是否保存：

代码如下:

Sub CloseWorkbook()
    ActiveWorkbook.Close
    End Sub

如果要避免出现提示，可添加“SaveChanges”参数，如直接保存并关闭工作簿：

代码如下:

Sub ClostAndSaveWorkbook()
    ActiveWorkbook.Close Savechanges:=True
    End Sub

将上述代码中的“True”改为“False”，则直接关闭工作簿而不保存。
关闭所有打开的工作簿，并提示是否保存：

代码如下:

Sub CloseAllWorkbooks()
    On Error Resume Next
    Workbooks.Close
    End Sub

退出Excel，并提示对有更改的工作簿进行保存：

代码如下:

Sub QuitExcel()
    Application.Quit
    End Sub

保存活动工作簿并退出Excel：

代码如下:

Sub SaveActiveWorkAndQuit()
    ActiveWorkbook.Save
    Application.Quit
    End Sub

下面的代码在退出Excel时都不会提示是否保存工作簿。
保存所有打开的工作簿并退出Excel：

代码如下:

Sub SaveAllAndQuit()
    For Each wbk In Workbooks
    wbk.Save
    Next
    Application.Quit
    End Sub

退出Excel，所有的改动都不保存：

代码如下:

Sub QutiAndNoAlerts()
    Application.DisplayAlerts = False
    Application.Quit
    End Sub

下面列举了一些VBA的常用操作：

打开一个新工作簿

代码如下:

Workbooks.Add

获得第一个工作簿的名称

代码如下:

Workbooks(1).Name

获得打开的工作簿数目

代码如下:

Workbooks.Count

激活第二个打开的工作簿

代码如下:

Workbooks(2).Activate

激活工作簿Chap02.xls

代码如下:

Workbooks("Chap02.xls").Activate

当前活动的工作簿存盘为NewChap.xls

代码如下:

ActiveWorkbook.SaveAs Filename:="NewChap.xls"

关闭第一个工作簿

代码如下:

Workbooks(1).Close

关闭当前活动的工作簿，不保存变化

代码如下:

ActiveWorkbook.Close SaveChanges:=False

关闭所有打开的工作簿

代码如下:

Workbooks.Close

如果你运行了最后一个例子，那么现在你所有的工作簿都已经关闭了。
在你要在工作表上使用前，请确保先打开一个新工作簿。
当你除了单个工作表时，你必须知道如何在工作簿里添加新的工作表，知道如何选择一个或一组工作表，知道如何命名、复制、移动和删除工作表。
在VB里，每个任务都需要一个专门的方法或属性。

添加一个新工作表

代码如下:

Worksheets.Add

获得第一个工作表的名称

代码如下:

Worksheets(1).Name

选择名为“Sheet3”的工作表

代码如下:

Worksheets(3).Select

选择第一，第三和第四个工作表

代码如下:

Worksheets(Array(1,3,4)).Select

激活名为“Sheet1”的工作表

代码如下:

Worksheets(“Sheet1”).Activate

将工作表“Sheet2”移动到工作表“Sheet1”之前

代码如下:

Worksheets("Sheet2").Move Before:=Worksheets("Sheet1")

重命名工作表“Sheet2”为“Expenses”

代码如下:

Worksheets("Sheet2").Name = "Expenses"

获得当前工作簿里的工作表数目

代码如下:

Worksheets.Count

删除当前工作簿里的工作表“Expenses”

代码如下:

Worksheets("Expenses").Delete

赞 (0)

相关推荐

  • 用vba实现将记录集输出到Excel模板

    复制代码 代码如下: '************************************************  '** 函数名称:  ExportTempletToExcel  '** 函数功能:  将记录集输出到 Excel 模板  '** 参数说明:  '**            strExcelFile         要保存的 Excel 文件  '**            strSQL               查询语句,就是要导出哪些内容  '**         

  • VBA将excel数据表生成JSON文件

    ADODB.Stream创建UTF-8+BOM编码的文本文件. 然后遍历数据区,格式化数据,输出即可. 小数据还行,大数据没测试. 另,使用fso创建的文本文件编码为ANSI,ajax解析json时出现乱码无法正常解析. Sub ToJson() '创建UTF8文本文件 myrange = Worksheets("sheet1").UsedRange '通过有效数据区来选择数据 'myrange = ActiveWorkbook.Names("schoolinfo"

  • excel vba 限制工作表的滚动区域代码

    ScrollArea属性使用以A1样式的区域引用形式(字符串类型)返回或设置工作表允许滚动的区域.当设置了工作表滚动区域之后,用户不能选定滚动区域之外的单元格,但仍然可以选定区域之外的其他对象(例如图形.按钮等),同时工作表的一些相应功能可能被禁止(例如工作表全选.选中整行或整列等). 在VBE中的工程管理窗口选择相应工作表对象,然后在其属性窗口中设置ScrollArea属性,即可限制工作表中滚动的区域,如图所示. 但是Excel不会记忆该项设置,当再次打开该工作簿时,ScrollArea属性将

  • Excel VBA连接并操作Oracle

    以下是通过Excel 的VBA连接Oracle并操作Oracle相关数据的示例Excel 通过VBA连接数据库需要安装相应的Oracle客户端工具并引用ADO的相关组件,引用ADO相关组件可按如下步骤操作: 1.打开VBA编辑器,在菜单中点选"工具","引用": 2.确保"Microsoft ActiviteX Data Objects 2.8 Library"和"Microsoft ActiviteX Data ObjectS Rec

  • excel vba 高亮显示当前行代码

    代码: 复制代码 代码如下: Private Sub Worksheet_SelectionChange(ByVal Target As Range) ThisWorkbook.Names.Add "XM", Target End Sub 这几行代码的作用是,当选择新的单元格时,将这个单元格(或者区域)定义为名称"XM",在条件格式设置中可以引用这个名称. 如下面的附件,将代码粘贴完成后,返回工作表中,选择A4:I15,点击菜单"格式-条件格式"

  • php 备份数据库代码(生成word,excel,json,xml,sql)

    单表备份代码: 复制代码 代码如下: <?php    class Db    {        var $conn; function Db($host="localhost",$user="root",$pass="root",$db="test")        {          if(!$this->conn=mysql_connect($host,$user,$pass))          die(

  • Node.js实现Excel转JSON

    Node.js实现Excel转JSON

    一直在做一个关于网上选课的系统,选用了时下比较流行的node.js.今天在想怎么把学生或者老师的信息导入进去,涉及数量比较多一点,我手边又正好有一部分excel的表格.就想把excel转成json然后倒入到mongodb中去. 搜了下网上的资料,有不少.大部分都是C#或python的,要吗自己编译,要吗各种缺库运行不了.google了一下发现居然node里面是有这个module的.网址是https://www.npmjs.com/package/xls-to-json.. 步骤的话大概记录下吧:

  • VBA中操作Excel常用方法总结

    要用VBA来关闭工作簿,用Workbook.Close 方法即可,而要退出Excel,则用Application.Quit 方法. 下面是一些代码示例: 关闭活动工作簿,如果工作簿有更改,提示是否保存: 复制代码 代码如下: Sub CloseWorkbook()     ActiveWorkbook.Close     End Sub 如果要避免出现提示,可添加"SaveChanges"参数,如直接保存并关闭工作簿: 复制代码 代码如下: Sub ClostAndSaveWorkbo

  • 在PHP中操作Excel实例代码

    复制代码 代码如下: <?php //指定页面编码,防止出现中文乱码的情形 header('Content-type: text/html; charset=gb2312'); //启动Excel $ms_excel=new COM("excel.application") or die("不能打开Excel应用程序"); //在网页中显示当前的Excel版本 echo "Excel版本:{$ms_excel->Version}\n"

  • asp.net中操作Excel助手相关代码

    复制代码 代码如下: public partial class ExcelHelper : IDisposable { #region Fileds private string _excelObject = "Provider=Microsoft.{0}.OLEDB.{1};Data Source={2};Extended Properties=\"Excel {3};HDR={4};IMEX={5}\""; private string _filepath =

  • ASP.NET操作EXCEL的总结篇

    ASP.NET操作EXCEL的总结篇

    公元19XX年前,关于EXCEL的操作就如滔滔江水,连绵不绝,真正操作EXCEL我也是从去年下半年开始的,有些比较复杂的年度报表之类的,做起来也有点费力,不过还是都能画出来了,关于EXCEL的报表导出,考虑到导出耗时的问题我主要采用AJAX来做的,分别捕捉几个起止状态,给客户端提示3个状态:正在检索数据...--->准备导出数据...(只是从数据库成功取出,还没有读写excel文件)-->正在读写文件-->导出数据成功,当然如果哪一过程出错,都有对应的提示,只所以想到写这篇文章,主要是因

  • Android操作Excel文件的功能实现

    Android中操作Excel文件导出报表时主要采用开源库jxl,最早用在java上,但也可用于Android.与之类似的POI,因为依赖库众多,所以只能用于java,而不能用于Android. 使用jxl需要在Android工程中导入jxl.jar包,jxl可以完成Excel的基本读写操作,其支持与不支持的情况如下: 1.jxl只支持Excel2003格式,不支持Excel2007格式.即支持xls文件,不支持xlsx文件. 2.jxl不支持直接修改excel文件,但可通过复制新文件覆盖原文件

  • java使用POI操作excel文件

    java使用POI操作excel文件

    一.POI的定义 JAVA中操作Excel的有两种比较主流的工具包: JXL 和 POI .jxl 只能操作Excel 95, 97, 2000也即以.xls为后缀的excel.而poi可以操作Excel 95及以后的版本,即可操作后缀为 .xls 和 .xlsx两种格式的excel. POI全称 Poor Obfuscation Implementation,直译为"可怜的模糊实现",利用POI接口可以通过JAVA操作Microsoft office 套件工具的读写功能.官网:htt

  • java操作excel表格详解

    java操作excel表格详解

    目录 使用场景 什么是easyExcel 写入表格 1.引入依赖 2.先创建与表对应的实体类 3.生成表格 读取表格 1.实体类 同上. 2.解析 3.测试 总结 使用场景 1.将用户信息导出为excel表格(导出数据....) 2.将Excel表中的信息录入到网站数据库(习题上传....)大大减轻网站录入量!开发中经常会设计到excel的处理,如导出Excel,导入Excel到数据库中! 操作Excel目前比较流行的就是Apache POI和阿里巴巴的easyExcel ! 这里我们主要使用e

  • python中使用xlrd、xlwt操作excel表格详解

    python中使用xlrd、xlwt操作excel表格详解

    最近遇到一个情景,就是定期生成并发送服务器使用情况报表,按照不同维度统计,涉及python对excel的操作,上网搜罗了一番,大多大同小异,而且不太能满足需求,不过经过一番对源码的"研究"(用此一词让我觉得颇有成就感)之后,基本解决了日常所需.主要记录使用过程的常见问题及解决. python操作excel主要用到xlrd和xlwt这两个库,即xlrd是读excel,xlwt是写excel的库.可从这里下载https://pypi.python.org/pypi.下面分别记录python

  • java 中JXL操作Excel实例详解

    JXL操作Excel 前言: jxl是一个韩国人写的java操作excel的工具, 在开源世界中,有两套比较有影响的API可 供使用,一个是POI,一个是jExcelAPI.其中功能相对POI比较弱一点.但jExcelAPI对中文支持非常好,API是纯Java的, 并不 依赖Windows系统,即使运行在Linux下,它同样能够正确的处理Excel文件. 另外需要说明的是,这套API对图形和图表的支持很有限,而且 仅仅识别PNG格式. 使用如下: 搭建环境 将下载后的文件解包,得到jxl.jar

  • 用Python的pandas框架操作Excel文件中的数据教程

    用Python的pandas框架操作Excel文件中的数据教程

    引言 本文的目的,是向您展示如何使用pandas来执行一些常见的Excel任务.有些例子比较琐碎,但我觉得展示这些简单的东西与那些你可以在其他地方找到的复杂功能同等重要.作为额外的福利,我将会进行一些模糊字符串匹配,以此来展示一些小花样,以及展示pandas是如何利用完整的Python模块系统去做一些在Python中是简单,但在Excel中却很复杂的事情的. 有道理吧?让我们开始吧. 为某行添加求和项 我要介绍的第一项任务是把某几列相加然后添加一个总和栏. 首先我们将excel 数据 导入到pa

随机推荐