作者:乔山办公网日期:
返回目录:excel表格制作
Excel表格不同于FoxPro等其他数据库软件,对输入值的限定采用百【数据有效性】功能(高版本称为”数据验证“)。
如图:可以设度置文本长度为3-5个字符,当输入字符数不在此范围时,将弹出警告对话框。
但这个限定可以回输入文本也可以输入数值。如果要限定必须是文本而不能是纯数字、且长度在3-5个字符之间的话,可以使用自定义,如图,公式为:=(LEN(A1)>2)*(LEN(A1)<6)*ISERR(-A1)
其答他复杂条件限制,一般都通过公式来设置。
1、选中A1单元格
2、点击数据-数据有效性
3、允许:序列;来源:第一种,第二种,第三种
4、确定,通过选择,查看效果
选中该列-》右键-》设置单元格格式-》选你想要 类型!
很简单,将常量换成相应数值,如下:
Dim woexcel
Set woexcel = CreateObject("Excel.Application")
woexcel.DisplayAlerts = False
woexcel.Visible = True
woexcel.Workbooks.Open ("c:\activex.xlsx")
'将工作表第一张表格设7a64e59b9ee7ad94339置为活动
woexcel.Worksheets(1).Activate
'设置纸张类型
woexcel.ActiveSheet.PageSetup.PaperSize = 9
'打印方向设置为横向:
woexcel.ActiveSheet.PageSetup.Orientation = 2
说明:
'xlLandscape 2 横向模式。
'xlPortrait 1 纵向模式。
'xlPaper11x17 17 11 英寸 x 17 英寸
'xlPaperA3 8 A3(297 毫米 x 420 毫米)
'xlPaperA4 9 A4(210 毫米 x 297 毫米)
'xlPaperA4Small 10 A4(小)(210 毫米 x 297 毫米)
'xlPaperA5 11 A5(148 毫米 x 210 毫米)
'xlPaperB4 12 B4(250 毫米 x 354 毫米)
'xlPaperB5 13 A5(148 毫米 x 210 毫米)
vba中支持系统常量,但是vbs中没有这些常量,应该换成相应数值,数值可以在vba帮助中查找。