=SUBSTITUTE(B1,A1,"")
Regards
Rajan verma
+91 7838100659 [IM-Gtalk]
-Original Message-
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Behalf Of Saravanan
Sent: 27 October 2012 10:52
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Compre cells, e
Sub test()
Call compare_strings(Range("a1"), Range("b1"), Range("c1"))
End Sub
Sub compare_strings(rng1 As Range, rng2 As Range, rng3 As Range)
Dim i As Long, mis_m As String, k As Long
mis_m = ""
If Len(rng1.Value) < Len(rng2.Value) Then
For i = 1 To Len(rng2.Value)
I