Abbreviation for "Rear Derailleur" as "RD"

[Sammy in Taiwan]

Can any one help me to make an abbreviation in excel file?

This is the example:
"Rear Derailleur" to "RD"
"Front Suspension Fork" to "FSF"

Thanks for your help!

 

[Anne Troy]

In what way, Sammy? You can just do a Find/Replace or create an Autocorrect
entry (in Word, if it's not available in Excel).
*******************
~Anne Troy

www.OfficeArticles.com
www.MyExpertsOnline.com

 

[Sammy in Taiwan]

Is there any function that I can use on excel for this job? precisely I
should say: make an acronym for it!

Anne, thanks for your response.

"Anne Troy" 來函：

 

[Anne Troy]

I'm sorry if I wasn't clear, Sammy. What do you mean "make an acronym"? What
will happen if we accomplish your goal? You'll type RD and the words Rear
Derailleur will appear? Sorry.
*******************
~Anne Troy

www.OfficeArticles.com
www.MyExpertsOnline.com

 

[Bob Phillips]

Probably best to write a UDF

Function Acronyms(text)
Dim i As Long
Dim sTemp

If TypeName(text) = "Range" Then
If text.Count > 1 Then
Exit Function
End If
End If

For i = 1 To Len(text)
If Mid(text, i, 1) Like "[A-Z]" Then
sTemp = sTemp & Mid(text, i, 1)
End If
Next i
Acronyms = sTemp
End Function


and use like

=Acronyms(A1)