The purpose of the following example of Excel VBA macro is to get the acronym or an abbreviation of each of the first letter of any given words.
Function Acronym(Words As Variant) As String Dim aWord() As String, ix As Integer aWord = Split(Words.Value, " ") For ix = 0 To UBound(aWord) Acronym = Acronym & UCase(Left(aWord(ix), 1)) Next ix End Function
Using Split function and space as delimiter, we create an array of word. Then using simple for … to loop, we do looping of each word and take the first letter of each word in array using Left function.
By using iteration and array like this, we will get the acronym of the word in question.
We can directly use the function in Excel formula bar with a reference to the cell that contains the collection of words we want to make an acronym from it as input.
For the details information of each function in use, Split/Ucase/Left, select each function and push F1 while in the Visual Basic Editor.
You can also do this with a formula.
=LEFT(A1,1)&MID(A1,FIND(” “,A1)+1,1)&MID(A1,FIND(” “,A1,FIND(” “,A1)+1)+1,1)
JP, you are the best
Pingback: debt consolidation companies
Pingback: reverse mortgage calculator
Pingback: debt consolidation programs
Pingback: debt consolidation loan
Pingback: debt help
Pingback: reverse mortgage companies
Pingback: debt consolidation companies
Pingback: Alternative Energy Projects
Pingback: white label dating
Pingback: debt collection agency
Pingback: collection agency rates
Pingback: rapidrecoverysolution.com
Pingback: Dog Snuggie
Pingback: Pop Over HERE
Pingback: free credit report no credit card
Pingback: Rollercoaster Creator
Pingback: How to test drive cars
Pingback: Know your car
Pingback: rewardzone mastercard
Pingback: wedding photographer calgary
Pingback: uv light air purifiers
Pingback: hier klicken
Pingback: ??????????? pc
Pingback: schnell abnehmen
Pingback: mens silver bracelet
Pingback: Escorts Montreal
Pingback: Tucson Realtor
Pingback: Buy Quality Backlinks
Pingback: Gaming Keyboard Review
Pingback: Compare Car Quotes
Pingback: red deer photographer services
Pingback: Radiology technician salary in NJ
Pingback: amazon coupons amazon coupons
Pingback: ???????? new single
Pingback: tatuaggi lettere
Pingback: devis assurance auto
Pingback: web design
Pingback: tide coupon 2012
Pingback: Th Cannabis Seeds
Pingback: free money poker
Pingback: best wallet
Pingback: De Vestir Juegos
Pingback: sexe amateur
Pingback: SEO Services
Pingback: pleasure bon bon
Pingback: permanent magnet generator
Pingback: ????? ????
Pingback: Forex Trading