Hi Yasser
I do not really understand what you want to do??
I think it is better if you give whole formula, and try to explain more fully.. it is difficult to know if you want
address ... like
A1
or address string like
"A1"
Without full formula it is difficult to know???
If gave up because I cannot understand question??
If what Hans has done is what you want, then here is another way to do similar…
Code: Select all
Sub TraschWkBk() ' https://www.eileenslounge.com/viewtopic.php?f=30&t=31784
Debug.Print Range("A1").Address(, , , External:=True) ' or rSchool.Address(, , , True)
Dim strEval As String
Let strEval = "=RIGHT(""" & Range("A1").Address(, , , External:=True) & """,LEN(""" & Range("A1").Address(, , , External:=True) & """)-SEARCH(""]"",""" & Range("A1").Address(, , , External:=True) & """))"
Debug.Print strEval
Debug.Print Evaluate(strEval)
End Sub
Alan
I am having difficulty logging in with this account just now.
You can find me at DocAElstein also