三九宝宝网宝宝百科宝宝知识

Excel VBA公式

02月09日 编辑 39baobao.com

[Excel中的宏是什么概念?谁可以给我个全面点的]EXCEL中的宏实际上是一段VBA程序(是嵌入在EXCEL中的VB程序)。这种嵌入程序(宏)可以用EXCEL自带的记录功能自动产生(在EXCEL菜单“工具”中的“宏”功能中可以自动记录您对EXCEL表...+阅读

Sub test()

'这段代码是用来去除A列+B列的双条件重复值

Dim r%, i% '定义变量

Dim arr, brr '定义变量

Dim d As Object '定义变量

Set d = CreateObject("scripting.dictionary") ' 创建字典项目--d

With Worksheets("sheet1")

r = .Cells(.Rows.Count, 1).End(xlUp).Row '取得"sheet1"工作表的A列末行的行号,貌似下面没用着这个变量

arr = .Range("a2:b12") '将"sheet1"工作表的区域 a2:b12 赋值给数组arr

For i = 1 To UBound(arr) 'UBound(arr)为数组arr的下标,数组从上至下循环一次

xm = arr(i, 1) & "+" & arr(i, 2) '用加号来合并A、B列的值

d(xm) = "" '将合并后的值赋值为字典的Key,对应的ITEM值为空。字典的key具有单一性,这样就可以去除重复。

Next

m = 14 '设置变量m的初始值

For Each aa In d.keys '将字典的key值循环一次

m = m + 1 'm值每次加1

.Cells(m, 1).Resize(1, 2) = Split(aa, "+") '在"sheet1"工作表的A15开始,输出双条件不重复值。Split用来分开加号左右的两个值

Next

End With

End Sub

以下为关联文档:

EXCEL中的宏是什么意思宏可以做什么 所有你想同时完成的事情都可以让宏来一次完成,并且所有会不断重复的命令(比如说话或其他动作)都可以事先宏里面定义好 1、什么是宏? 宏是微软公司为其OFFICE软件包...

Excel宏是什么大概意思所谓宏,就是一些命令组织在一起,作为一个单独命令完成一个特定任务。Microsoft Word中对宏定义为:“宏就是能组织到一起作为一独立的命令使用的一系列word命令,它能使日常工作变...

EXCEL表格的宏是什么意思EXCEL表格的宏是指基于VB的一种宏语言VBA脚本,主要用于扩展Microsoft Office软件如Excel的功能。 Visual Basic for Applications(VBA)是Visual Basic的一种宏语言,是微软开发...

EXCEL软件中的宏是什么意思宏是微软公司为其OFFICE软件包设计的一个特殊功能,目的是让用户文档中的一些任务自动化。OFFICE中的WORD和EXEAL都有宏。 如果在Word中重复进行某项工作,可用宏使其自动执行。...

怎么用delphi把Excel Word文件中生成到PDF文件你好,OFFICE 07以上版本另存为-选择PDF格式就行了,如果是2007以下的版本,请看下面。 1.PDFFactory Pro虚拟打印机,安装后,在任何文档中,选择打印时,选择打印机为pdfFactoryPro,就能...

新车购置税计算公式是什么在上面的购置税计算公式中,车辆不含税价格是指车辆价格减去增值税之后的价格,而并非买车时发票上的价格,这一点需要特别注意。实际缴纳购置税的时候,车主需要按当地车管所内部数...

高中会考:物理化学生物会考知识点总结公式方程式非金属单质(F2 ,Cl2 , O2 , S, N2 , P , C , Si) 1, 氧化性: F2 + H2 === 2HF F2 +Xe(过量)===XeF2 2F2(过量)+Xe===XeF4 nF2 +2M===2MFn (表示大部分金属) 2F2 +2H2O===4HF+O2 2F2 +2...

2003excel怎样把每个sheet表生成单独的excel表有,用宏 1。打开你的Excel 文件。 2。按ALT+F11 会打开VBA编辑窗口 3。在VBA编辑窗口 单击 插入--模块。 4。把下面的代码复制,粘贴到模块的空白处 Sub aa() Dim r As Workshe...

java中poi怎么生成excel网上好多啊 我给你找了一个例子 view plaincopy to clipboardprint? public static void main(String[] args) { try { String filepath = "d:\\问题清单.xls"; FileInputStrea...

推荐阅读
图文推荐