2022-11-15 21:33来源:m.sf1369.com作者:宇宇
excel 2010进入VB编辑器的具体步骤如下:;我们需要准备的材料分别是:电脑、Excel表格。;
1、首先我们打开需要编辑的Excel表格,点击打开文件中的“选项”。
;
2、然后我们在弹出来的窗口中点击打勾自定义功能区中的“开发工具”。;
3、然后我们点击打开开发工具中的“Visual Basic”即可。
用途:将字符串中的全角(双字节)英文字母更改为半角(单字节)字符。
语法:ASC(text)
参数:Text为文本或包含文本的单元格引用。如果文本中不包含任何全角英文字母,则文本不会被更改。
实例:如果A1=excel,则公式“=ASC(A1)”返回excel。
比如:
打开VB软件,新建标准EXE。
建立一个图片框,名称改为A。建立一个命令按钮,caption改为按钮。
点击按钮进入代码编辑器,输入代码。
A.print "1234567890"
A.print tab(3);"mm" ;tab(7);"mm"
"1234567890"是用来确定字符位的,能清楚的看到tab函数的结果。
代码中,tab(3)所以“mm”从第三字符开始显示,tab(7)所以第二个“mm”从第七个字符位开始显示。
第一,首先用EXCEL画框命令画文件的大体框架。
第二,插入入公司LOGO图片,编写公司名称,文件编号,编写人,审核人,批准人等字样。
第三,开始加入作业流程具体内容编写PFD图,插入作业流程完整的过程图片。
第四,对过程图片做一些标注说明。
第五,编写技术要求,列举岗位所需生产材料等内容。
第六,打印预览,调整页面边宽等参数,一个岗位尽量作为一页,如内容多,也可分两页。
第七,重命名,并以此页为模版,制作后面的其他岗位指导书。
Microsoft Excel是Microsoft为使用Windows和Apple Macintosh操作系统的电脑编写的一款电子表格软件。直观的界面、出色的计算功能和图表工具,再加上成功的市场营销,使Excel成为最流行的个人计算机数据处理软件。
你要隐藏哪个工作就写哪个工作表
如
Subaa()
Sheets("sheet1").Visible=0
EndSub
这是隐藏sheet1这个工作表的,=2时尝试深度隐藏,=-1时显示工作表,=0时一般隐藏,可在工作表点右键取消隐藏,深度隐藏时,在工作表中不能取消隐藏。
首先在vb中引用microsoftexcelobjectlibrary
假设c盘根目录下有个1.xls的文件
…………
问题补充:
你的要求很简单,
一行指令恐怕不行,
最少要三行
代码如下:
privatesubform_load()
dimxlappasexcel.application
dimxlbookasexcel.workbook
dimxlsheetasexcel.worksheet
dimiasinteger
setxlapp=createobject("excel.application")
setxlbook=xlapp.workbooks.open("c:\1.xls")
setxlsheet=xlbook.worksheets(1)'引用第1张工作表
fori=3to100step3'想到哪行就把100改成几
xlsheet.range(cells(i,1),cells(i,2)).merge'合并a1:b2单元格
next
xlsheet.rows(10).rowheight=100'把第10行高度设为100
xlbook.save
xlapp.application.quit
setxlapp=nothing'表忘释放引用
endsub
运行一下,看看满足要求否。
excel 2010进入VB编辑器的具体步骤如下:我们需要准备的材料分别是:电脑、Excel表格。
1、首先我们打开需要编辑的Excel表格,点击打开文件中的“选项”。
2、然后我们在弹出来的窗口中点击打勾自定义功能区中的“开发工具”。
3、然后我们点击打开开发工具中的“Visual Basic”即可。
添加引用MicrosoftExcel12.0ObjectLibrary(视你的office版本不同有所差异)然后就可以用这个来编程啦DimxlappAsExcel.Application‘代表excel程序DimwkBookAsExcel.Workbook'代表excelworkbook(也就是excel工作簿文件.xls.xlsx)DimwkSheetAsExcel.Worksheet'代表excel的工作页xlapp.Application.EnableEvents=False'禁止宏等提示的运行SetwkBook=xlapp.Workbooks.Open(ExcelFileName)'wkBook对象,把ExcelFileName替换为你的真实文件比如app.path&"\"&"百家姓.xls"SetwkSheet=wkBook.Worksheets(1)'选中某个sheet用工作页名字(Sheet1,Sheet2...)or序号
在vba编辑器中添加一窗体(UserForm1),在需要悬浮的工作表代码窗口中添加代码如下:
Private Sub Worksheet_Activate()UserForm1.Show 0End SubPrivate Sub Worksheet_Deactivate()Unload UserForm1End Sub
listbox不是表格,可以多列、多行。
效果就像windows文件夹打开后的样子。
要做表格,可以使用表格控件。
vb提供了两种。
也可以在vb中插入excel表格。