当前位置:主页 > Office办公

最新发布

excel 如何快速提取收支记录 实例操作教程
excel 如何快速提取收支记录 实例操作教程

第一个反应也是,if函数啊,判断第一列是支出,就把金额取到支出列,第一列是收入,就把金额取到收入列。所以这个问题绝对不难。具体的公式录入如下: =IF(A2=C1,B2,0) 注意公式写完不能马上拖拽,考虑到向下和向右的拖拽引用,所以要加上必要的美元符号,实现相对混合引用。 =IF($A4=C$1,$B4,0) A和B为什么加美元符号,防止公式向右拖拽,变成B列。 1为什么加美元符号,放置公式向下拖拽的时候,变成2或者更多行。

495 次浏览
利用excel中vba代码随机生成姓名列表的方法
利用excel中vba代码随机生成姓名列表的方法

数字可以使用rand、RANDBETWEEN函数来随机生成。可是姓名如何弄呢,本文介绍使用VBA自动随机生成姓名。  具体的随机生成姓名如下介绍:  第一步,新建一个excel工作薄  这个工作薄里面包含两个工作表,分别是“姓名数据”和“生成随机姓名”。  其中的“姓名数据”工作表,有三列数据:百家姓、男子名、女子名,是我们之前已经输入好了的。  第二步,切换到“生成随机姓名”工作表,单击“生成随机姓名”按钮,excel会出现一个输入框,提示我们输入要生成的人名数。比如我们输入100,单击“确定”,此工作表A列就会随机生成姓名100个。  下面提供随机生成姓名的VBA代码,使用方法是按下ALT+F11组合键,打开VBE编辑器,插入——模块,复制下面的代码,然后为了操作方便,我们在“生成随机姓名”工作表中插入了一个按钮,将这段代码指定给按钮。Sub 随机生成姓名() Dim Arr, Arr2, Arr3, I%, N&, S As Boolean, Str$, Dic, A&, B& N = Val(InputBox("请输入要生成的人名数:"))     '输入要生成的随机人名数量 If N = 0 Then Exit Sub      '如果未输入或点了取消则退出程序 Set Dic = CreateObject("scripting.dictionary")  '创建字典项目,用于清除生成的重复的人名 With Sheet1     '从sheet1中读取数据并随机生成姓名     Arr = .Range(.[a2], .Cells(.Rows.Count, 1).End(3))  '读取百家姓放入数组     Arr2 = .Range(.[b2], .Cells(.Rows.Count, 2).End(3))    '读取男子名常用字放入数组     Arr3 = .Range(.[c2], .Cells(.Rows.Count, 3).End(3))     '读取女子名常用字放入数组     Do  '循环执行         Str = ""       '先清空用于存储生成的名字的变量         S = Rnd > 0.5   '用取得的随机数来判断生成男子名还是女子名         I = 2 + IIf(Rnd > 0.8, 0, 1)    '用随机数确定生成的名字的字符数(80%的几率为三个字)         If S Then   '如果是男子名,则             A = Int(Rnd * (UBound(Arr) - 2)) + 2    '取得姓对应的数组下标             B = Int(Rnd * (UBound(Arr2) - 2)) + 2   '取得名字的对应下数组下标             Str = Arr(A, 1) & Arr2(B, 1)    '串接名字             If I > 2 Then   '如果名字的字符数大于2,则再得一次名字的字符下标并串接给字符串变量                 B = Int(Rnd * (UBound(Arr2) - 2)) + 2                 Str = Str & Arr2(B, 1)             End If         Else    '如果是女子名,则取对应的女子名数组内容,处理方式同上             A = Int(Rnd * (UBound(Arr) - 2)) + 2             B = Int(Rnd * (UBound(Arr3) - 2)) + 2             Str = Arr(A, 1) & Arr3(B, 1)             If I > 2 Then                 B = Int(Rnd * (UBound(Arr3) - 2)) + 2                 Str = Str & Arr3(B, 1)             End If         End If         Dic(Str) = ""   '将随机姓名放入字典中     Loop Until Dic.Count = N    '如果字典项目数量达到输入的数值则跳出循环 End With With Sheet2     '将结果写入sheet2中     .Cells.Clear    '清空原有内容     If Dic.Count > 65536 Then   '防止数量太多时无法转置及数据超出单元格最大行号的情况         Arr = Dic.keys         For N = LBound(Arr) To UBound(Arr)             Cells((N Mod 65536) + 1, N \ 65536 + 1) = Arr(N)         Next N     Else    '数量少时直接转置         .[a1].Resize(Dic.Count, 1) = Application.Transpose(Dic.keys)    '转置字典的keys值     End If End With Set Dic = Nothing   '清空字典项目 End Sub

873 次浏览
Excel BETADIST 函数 使用实例教程
Excel BETADIST 函数 使用实例教程

此函数已由 BETA.DIST 函数替换,新函数可以提供更好的精确度,其名称更好地反映其用法。旧函数仍可用于与早期版本 Excel的兼容。但是,如果不需要向后兼容,那么应考虑直接使用新函数,因为新函数能更准确地描述其功能。Excel 2003+BETADIST 函数返回 Beta 概率密度函数。Beta 分布通常用于研究样本中一定部分的变化情况。Beta 概率密度函数。=BETADIST(x, alpha, beta, [A], [B]) 参数 X 必需。 用来计算其函数的值,介于值 A 和 B 之间 。 Alpha 必需。 分布参数。 Beta 必需。 分布参数。 A 可选。 x 所属区间的下界。 B 可选。 x 所属区间的上界。 要点 如果省略 A 和 B 的值,BETA.DIST 使用标准的累积 beta 分布,即 A =0,B = 1 。

383 次浏览
excel 提取批注的方法,都是通过VBA代码完成提取的
excel 提取批注的方法,都是通过VBA代码完成提取的

excel提取批注内容到单元格,使用excel内置命令无法完成。excel提取批注方法一:  比如下图所示A2:A9单元格区域都添加了批注,将这些批注内容提取到C2:C9单元格区域里面。比如A2单元格的批注内容是:没有销量,对应的C2单元格显示的内容就是:没有销量。  excel提取批注的操作步骤如下:  按ATL+F11,打开VBE编辑器,单击插入——模块,复制粘贴下面的代码到右边的编辑窗口。然后回到excel工作表,在C2单元格输入公式:=pizhu(A2),下拉复制即可提取批注。Public Function pizhu(i As Range)   pizhu = i.Cells.Comment.Text End Function  通过编写上面的自定义函数来提取批注,可方便的调用,就如同使用普通公式一样使用。  使用上面的这个提取批注的不完美之处在于,如果原有单元格的批注内容编辑更新后,上面的方法不会自动更新,只有双击重新编辑单元格公式才会更新。如果需要自动更新可以在代码前面添加一句:Application.Volatile True   '自定义函数自动刷新。

556 次浏览
如何使用Excel来制作批命令完成重复工作
如何使用Excel来制作批命令完成重复工作

在日常工作中我们会不定时的整理一下电脑上的电子档案资料,于是就会把某些资料按照某种类别归档到某个文件夹下。或者有时候,我们需要建立很多文件夹来存放不同的资料。 常规的做法是“右键——新建文件夹”这样的步骤去一个个的建立文件夹,然后再把文件复制到对应文件夹下。当然这种方法也没问题,可遇到大批量制作,这种操作效率就太低了。 下面,我们来看看批量操作的办法,主要操作办法就是借助表格工具和批命令。主要操作办法为在Excel里面批量创建需要生成的文件夹名称,然后再使用表格的便利性,批量生成命令。 在此,我们用到了一个简单的命令“MD”命令。这个命令主要是用于创建文件和文件夹。具体生成的命令如下图。特别需要注意的是,“MD”后面有一个空格不能忽略了。 把上一步生成的命令复制到记事本里面,然后另存为后缀名为"Bat"的脚本文件。这里,我生成了一个“makedoc.bat”的批命令脚本文件。 双击运行上一步生成的这个“makedoc.bat”脚本文件。接下来我们可以看到,在当前目录下生成了一堆文件夹。 

376 次浏览
excel vb随机函数中的Rnd函数,并配合取整函数int来介绍vb随机函数的使用过程
excel vb随机函数中的Rnd函数,并配合取整函数int来介绍vb随机函数的使用过程

第一,vb随机函数介绍  Rnd 函数是vb随机函数。  Rnd 函数的作用是返回小于 1 但大于或等于 0 的值。比如0.871445835、0.056236863这样的随机小数。第二,vb随机函数实例介绍1.比如要在A1单元格生成一个这样的随机小数,可以这样写代码:Sub 随机数() [A1] = Rnd End Sub2.又比如要生成20以内的随机数,可以这样写:Sub 随机数() [A1] = Int(Rnd * 20) End Sub  总结:RND是vb随机函数,可以取到的数在0~1之间不包括1, =INT(RND*10)可以是0~9的整数。3. 如何使用vb随机函数产生两个数字之间的任意数字?比如生成28到95之间的随机整数。可以这样写:

602 次浏览
Excel LOOKUP 函数(数组形式)使用实例教程
Excel LOOKUP 函数(数组形式)使用实例教程

LOOKUP 函数(数组形式)从提供的数组的第一行或第一列查找指定的值,返回数组最后一行或最后一列中同一位置的值。Excel 2003+LOOKUP 函数(数组形式)从提供的数组的第一行或第一列查找指定的值,返回数组最后一行或最后一列中同一位置的值。数组的最后一列或最后一行中相同位置的值。=LOOKUP(lookup_value, array) =LOOKUP(查找值, 数组) 参数 lookup_value 必需。 查找值。 array 必需。 包含要与 lookup_value 进行比较的文本、数字或逻辑值的单元格区域。 如果数组列数多于行数LOOKUP 会在第一行中搜索 lookup_value 的值。 如果数组是正方的或者行数多于列数,LOOKUP 会在第一列中进行搜索。 使用 HLOOKUP 和 VLOOKUP 函数,可以通过索引以向下或遍历的方式搜索,但是 LOOKUP 始终选择行或列中的最后一个值。 要点 如果 LOOKUP 函数找不到 lookup_value,则会与 数组中小于或等于 lookup_value 的最大值进行匹配。 数组中的值必须按升序(按小到大)排列,否则LOOKUP函数可能无法返回正确的值。各类型数值升序排列如下: 数字:-1、0、1、2; 文本:a、b、c、D、e(不区分大小写); 逻辑值:FALSE、TRUE 实例

Excel的TODAY函数使用方法图解教程
Excel的TODAY函数使用方法图解教程

Excel TODAY函数的使用方法教程TODAY函数作用:自动返回当前计算机系统的日期。 如写作时间为2021年2月10日,则Excel默认就会返回2021/2/10,在输入该函数之前单元格格式为“常规”,Excel会自动将单元格格式更改为“日期”。 若要显示为数字格式,则必须将单元格格式更改为“常规”或“数字”。操作步骤:1、输入“=”2、输入TODAY函数(会出现提示列表,直接在列表上双击,出现左括号);3、选择需要统计的单元格区域,再输入右括号,最后按Enter键确认; 提示:不管您何时打开工作薄,当需要在工作表上显示当前日期时,TODAY 函数非常有用。WPS下一页

503 次浏览
Excel的NETWORKDAYS函数使用方法图解教程
Excel的NETWORKDAYS函数使用方法图解教程

Excel的NETWORKDAYS函数使用方法教程NETWORKDAYS 函数作用:返回两个日期之间有多少个工作日数值。 请注意:这个函数的工作日不包括周末和专门指定的假期。 例如通过使用函数 NETWORKDAYS,计算某一特定时期内工程的工作天数。NETWORKDAYS函数语法:NETWORKDAYS(start_date, end_date, [holidays])参数具体填写内容:Start_date    必需。 输入或选择开始日期的日期。End_date    必需。 输入或选择终止日期的日期。Holidays    可选。 列出不需要参加两个日期计算相差的单元格区域,例如:国家非周末的法定假日以及其他非法定假日,例如5.1劳动节当天,该单元格区域必须是包含日期的单元格,或是表示日期的数字。重要:  以上三个参数必须使用正确的日期格式。 例如参数中的日期以文本形式输入,则会出现问题,当参数不是有效日期时,则 NETWORKDAYS 返回#VALUE!错误值。

457 次浏览
Excel COUPNCD 函数 使用教程
Excel COUPNCD 函数 使用教程

返回一个表示在结算日之后下一个付息日的数字。Excel 2003+此函数为财务函数中计算持续期的函数,返回一个表示在结算日之后下一个付息日的数字。函数名由Coupon(券)+Next(下一个)+Coupn(券)+Date(日期)四个单词组合而成。下一个付息日期。=COUPNCD(settlement, maturity, frequency, [basis]) =COUPNCD(结算日, 到期日, 频率, [日计数基准类型]) 注意:应使用 DATE 函数输入日期,或者将日期作为其他公式或函数的结果输入。 例如,使用函数 DATE(2016,6,27) 输入 2016 年 6 月 27 日。 如果日期以文本形式输入,则会出现问题。

307 次浏览
共计75934条记录 上一页 1.. 5181 5182 5183 5184 5185 5186 5187 ..7594 下一页