J
JMay
In cell A1 I have:
A,B,C,D,E
In Cell I have:
=LEN(A1)-(LEN(SUBSTITUTE(A1,",",""))-1)
which produces 5 << as I expect
I'm wanting to enter this formula via VBA (a button) as follows:
Sub FindUnique()
ActiveSheet.Range("C3").Formula =
"=LEN($A$1)-(LEN(SUBSTITUTE($A$1),"","",""""))-1)"
End Sub
but it doesn't work. What am I doing wrong here...???
TIA,
A,B,C,D,E
In Cell I have:
=LEN(A1)-(LEN(SUBSTITUTE(A1,",",""))-1)
which produces 5 << as I expect
I'm wanting to enter this formula via VBA (a button) as follows:
Sub FindUnique()
ActiveSheet.Range("C3").Formula =
"=LEN($A$1)-(LEN(SUBSTITUTE($A$1),"","",""""))-1)"
End Sub
but it doesn't work. What am I doing wrong here...???
TIA,