msgbox
对于某些具有特殊功能的excel表格,有时需要在打开Excel工作表时能够出现提示对话框,对表格的功能、操作以及制作的有关信息等进行说明。以下是seo实验室小编为您带来的关于使用Excel的Open事件及MsgBox函数制作提示对话框,希望对您有所帮助。
使用Excel的Open事件及MsgBox函数制作提示对话框
1、启动Excel并打开工作表,打开Visual Basic编辑器,在工程资源管理器中双击"ThisWorkbook"选项打开当前工作簿的“代码”窗口,如图1所示。具体程序代码如下所示:
Private Sub workbook_open()
Dim msg As String '声明变量
msg="欢迎使用小小公积金查询系统!"&vbCrLf
msg=msg&"请在单元格中输入身份证号进行查询!"&vbCrLf '赋值变量
msg=msg&"作者:郭刚"&vbCrLf
msg=msg&"制作日期:2013年1月"&vbCrLf
MsgBox msg,,"欢迎" '显示欢迎对话框
End Sub
图1 在“代码”窗口中输入代码
2、切换到Excel工作表,保存当前文档后关闭文档。当再次打开该文档时,将自动打开提示对话框,如图2所示。
图2 打开文档时显示提示欢迎对话框
excel2003财务常用函数使用总结
1.ACCRINT
用途:返回定期付息有价证券的应计利息。
语法:ACCRINT(issue,first_interest, settlement,rate,par,frequency, basis)
参数:Issue为有价证券的发行日,First_interest是证券的起息日,Settlement是证券的成交日(即发行日之后证券卖给购买者的日期),Rate为有价证券的年息票利率,Par为有价证券的票面价值(如果省略par,函数 ACCRINT将par看作$1000),Frequency为年付息次数(如果按年支付,frequency = 1;按半年期支付,frequency = 2;按季支付,frequency = 4)。
2.ACCRINTM
用途:返回到期一次性付息有价证券的应计利息。
语法:ACCRINTM(issue,maturity,rate, par,basis)
参数:Issue为有价证券的发行日,Maturity为有价证券的到期日,Rate为有价证券的年息票利率,Par为有价证券的票面价值,Basis为日计数基准类型(0 或省略时为30/360,1为实际天数/实际天数,2为实际天数/360,3为实际天数/365,4为欧洲30/360)。
3.AMORDEGRC
用途:返回每个会计期间的折旧值。
语法:AMORDEGRC(cost,date_purchased,first_period,salvage,period,rate,basis)
参数:Cost为资产原值,Date_purchased为购入资产的日期,First_period为第一个期间结束时的日期,Salvage为资产在使用寿命结束时的残值,Period是期间,Rate为折旧率,Basis是所使用的年基准(0 或省略时为360 天,1为实际天数,3为一年365天,4为一年 360天)。
猜你喜欢:
1.excel2010中宏点击按钮打开自定义对话框的操作方法
2.excel表格address函数怎样设置对某单元格引用
3.怎么在excel中使用pi函数
4.手把手教你用“Excel表格自动求积公式”
5.通过Excel对话框获取帮助信息的方法