Data Validation Source Formula show up in Cell B1

[bobaol]

Hello, I have a Data Validation Source Formula in cell A1. The Source is =Dropdown!$E$4:$E$216 . What I want to do is in cell B1, list out this formula as text. Cell B1 would be ''=Dropdown!$E$4:$E$216 or something like that. I want to do this because in cell A2, the data validation source is =Instructions!$A$15:$A$28 . So, in cell B2, I want cell B2 to say ''=Instructions!$A$15:$A$28. or something like that. Then cell A3 is different, and so on. Thanks in advance.

 

[StephenCrump]

Is a VBA solution acceptable?

What version of Excel are you running?

 

[bobaol]

VBA is acceptable, function is acceptable. I am on Excel Office 365 ProPlus. Thanks.

 

[StephenCrump]

	A	B	C	D
1	B	=$D$2:$D$5		ValidList
2	6	=MOD(A2,3)=0		A
3	Something else	No formula		B
4				C
5				D
Sheet4

Cell Formulas
Range	Formula
B1:B3	B1	=GetFormula(A1)

Cells with Data Validation
Cell	Allow	Criteria
A1	List	=$D$2:$D$5
A2	Custom	=MOD(A2,3)=0

Function GetFormula(r As Range) As String

    GetFormula = "No formula"
    On Error Resume Next
    GetFormula = r.Validation.Formula1
    
End Function