'A' som i Alpha, 'B' som i Bravo, 'C' som i Charlie. Har du hørt disse sætninger før?
Disse kaldes den militære alfabetkode (også kendt som NATO -alfabetkode). Det bruges ofte af mennesker (især callcenter -fyre) til at kommunikere navn, e -mail -adresse eller adresse på hjemmet/kontoret.
Generer militær alfabetkode i Excel
I mit første job fik jeg et projekt, hvor jeg skulle foretage kolde opkald for at få nogle oplysninger om medicinsk udstyr. Da vi havde forbindelse til mennesker fra hele verden med alle slags accenter, var det - til tider - svært at dele vores navn og e -mail eller få deres. Det var da, jeg begyndte at stole på militære alfabetkoder for at kommunikere klart. Jeg har set mange callcenter -fyre gøre dette effektivt.
Med dette i tankerne har jeg oprettet en Excel -skabelon, hvor du kan indtaste en tekststreng, og den genererer automatisk Military Alphabet -koden for den indtastede tekst.
Noget som vist herunder:
Så snart du indtaster teksten og trykker på Enter, genererer den automatisk den militære alfabetkode for hvert alfabet i tekststrengen.
Bemærk, at i dette tilfælde vil tal og specialtegn blive vist som de er. Dette ville også fungere med begge tilfælde - nedre eller øvre.
Da denne projektmappe indeholder en makro, kan du se en gul bjælke med knappen - Aktiver indhold, så snart du åbner den. Du skal klikke på denne knap for at dette kan fungere.
Sådan oprettes denne skabelon til generering af militær alfabetkode
Denne skabelon fungerer udelukkende på VBA -magi. Der er et par sløjfer inden for proceduren til ændring af regnearkshændelse, der blot kontrollerer hvert alfabet og henter kodeordet for det alfabet.
Her er VBA -koden, der gør arbejdet:
Private Sub Worksheet_Change (ByVal Target As Range) 'oprettet af Sumit Bansal af trumpexcel.com Dim alphabetcount As Integer Dim alphabet As String Dim result As String Dim i As Integer Dim TargetColumn As Integer Dim TargetRow As Integer On Error Resume Next TargetColumn = Target. Column TargetRow = Target.Row If TargetColumn = 4 And Cells (TargetRow, TargetColumn) = "" Then Cells (TargetRow, TargetColumn + 1) = "" Exit Sub End If If TargetColumn = 4 Then alphabetcount = Len (Cells (TargetRow, TargetColumn) )) For i = 1 Til alfabettal + 1 alfabet = Midt (Område (Target.Address), i, 1) Hvis Område ("A2: A27"). Find (alfabet) er ingenting Så resultat = resultat & "," & alfabet Else result = result & "," & Range ("A2: A27"). Find (alphabet) .Offset (0, 1) End If Next i Cells (TargetRow, TargetColumn + 1) = Mid (result, 3, Len (resultat) - 4) End If End Sub
Hvis du gerne vil ændre et par af disse kodeord, så det passer til dit publikum/område, kan du blot ændre det i kolonne B i downloadfilen. Koden vælger automatisk de ændrede koder.
Bemærk, at da denne projektmappe indeholder en makro, skal du gemme filen i .xls- eller .xlsm -format.
Jeg håber, at dette ville hjælpe dig, næste gang du prøver at kommunikere navne, e -mail -id'er eller adresse med folk over en telefonisk samtale.
Lad mig vide, hvad du synes om denne Excel -skabelon ved at efterlade en kommentar herunder.
Andre Excel -skabeloner, du måske kan lide:
- Opgaveprioriteringsmatrixskabelon.
- E -mailgenerator skabelon.
- Medarbejder forlader sporingsskabelon.
- Skabelon til medarbejderes timeseddelberegner.
- Kalender integreret med en opgaveliste-skabelon.
