1、如图所示，函数staddress就是我们自定义的函数！下面我们看一下如何编写代码的？
2、在工作表中，点击菜单栏【开发工具】，在其工具栏内，点击【visual basic】!
3、会进入VBA编辑界面！点击菜单栏【插入】，在其下拉菜单中，选择【模块】！
4、会弹出模块编辑窗口！
5、在代码编辑窗口输入以下代码：Function staddress(选择区域 As Range, 引用方式 As Integer)If 引用方式 = 1 Then st锾攒揉敫address = 选择区域.Address(1, 1)ElseIf 引用方式 = 2 Then staddress = 选择区域.Address(0, 0)End IfEnd Function
6、在单元格中输入自定义函数staddress,点击函数图标，会弹出函数staddress对话框!
7、用鼠标选择区域，在引用方式中输入“1”。
8、点击【确定】，单元格中会显示选择区域的绝对地址，如果在引用方式中选择“2”，则会显示相对地址。
