18721107673
if公式是数字段的用法用vlookup代替excel中数字段if公式的用法用vlookup代替比如:判断g5单元格的数字如果:0-9不打折:折扣为1.0如果:10-19 :折扣为0.90如果:20-29 :折扣为0.85如果:30-39 :折扣为0.80如果:40-49 :折扣为0.75如果:50-59 &...
Len和LenB的用法Sub Len和LenB的用法() Dim NeiRong As String Dim Lie_ChangDu As Integer Dim ZhenShi_ChangDu_1 As Integer Dim ZhenShi_ChangDu_2 As Integer dim AA as string '--------------------------------- &nb...
用vba模拟vlookup函数'--*************************************************************************************Public Sub 用vba_的变量设置vlookup_函数() Set EL_App = GetObject(, "Excel.Application") '--定义excel变量 Dim...
vba定位透视表最后列的列号定位透视表最后列的列号-----------------------Public Sub 透视表Z02和03_基础档案_属性标志_变动表() '--行标签:科目编码和名称 '--列表签:各种常规核算(比如:客户,部门,职员,供应商核算) '--数值区:年度(计数) '--最后列:...
金蝶科目余额表中,常用数据的查询sql语句金蝶科目余额表中,常用数据的查询sql语句 --1.***查询*****************<本期的借贷方发生>和<本年借贷方发生>额 --查询出:科目余额表中(t_Balance)-- --各科目的--每个月的本期发生和本年累计的数字...
金蝶常用基础档案表数据字典01. 供应商表 :t_Supplier02.客户&n...
vba设置某列的列宽,某列用变量表示 '为各列的宽度赋值 Hang_FenZu = 第几列(比如:10,即第10列) EL_App.Worksheets("jch01-06").Columns(Hang_FenZu).ColumnWidth = 15 -----------------------Sheet1.Range("a:b")....
vba判断excel某列的最后行这里以第1列,即第A列为例ZhHang = EL_App.Worksheets("jch01-05").Range("A1048576").End(xlUp).Row----A列最后一行: LastRow = Cells(Rows.Count, 1).End(xlUp).Row...
如何设置VMware虚拟机随主机开机和关机而自动启动和关闭---------------------------------------------------------------*****************************************************************************************设置主机开机自动启动,指定VMware虚拟机同时启动一、创建[开机]自启动脚本新建vm_start.bat"C:\P...
清除excel中工作表保护密码 ----------------------------------------------------------------- --1.登录excel中的vba中, --2.新建模块 --3.将下面的代码复制到模块中 --4.打开设置了工作表保护的页签 --5.执行...