如何用函数功能，实现VBA单元格功能？

ning84

在VBA中，用字符串实现目标需求：
问：不用VBA，如何用函数，读取字符串"A3",实现下面VBA的功能。

1. Sub ll1()
   
2.    Dim Rng As Range, oRng As Range
   
3.        Set Rng = Selection
   
4.        Set oRng = Range("A3")
   
5.        Rng = "=" & oRng.Address
   
6. End Sub

复制代码

dgerwin

选任何单元格，就把这单元格值改为“=A3”，自定义函数才能解决问题？如是，与VBA无异.

ning84

我要求是单元格为"A3",如何用函数将A3,实现“=A3”的功能。


解决目标，是已知行和列，如何获得行和列交集的单元格。
好像是如何用RC的问题。

ning84

ning84 发表于 2017-9-21 17:47
我要求是单元格为"A3",如何用函数将A3,实现“=A3”的功能。

用ADDRESS函数能解决第一步。

=ADDRESS(3,1,4)

如果将示例复制到空白工作表中，可能会更易于理解该示例。
　       
A
B
1
公式
说明（结果）
2
=ADDRESS(2,3)
绝对引用($C$2)
3
=ADDRESS(2,3,2)
绝对行号，相对列标(C$2)
4
=ADDRESS(2,3,2,FALSE)
在R1C1引用样式中的绝对行号，相对列标(R2C[3])
5
=ADDRESS(2,3,1,FALSE,"[Book1]Sheet1")
对其他工作表的绝对引用([Book1]Sheet1!R2C3)
6
=ADDRESS(2,3,1,FALSE,"ETSHEET")
对其他工作表的绝对引用('ETSHEET'!R2C3)

详见

ADDRESS函数_百度百科  https://baike.baidu.com/item/ADD ... /7831011?fr=aladdin

excel函数实例教程：[7]ADDRESS函数使用方法_百度经验  http://jingyan.baidu.com/article/546ae185613ecf1148f28c4e.html