« A » comme Alpha, « B » comme Bravo, « C » comme Charlie. Vous avez déjà entendu ces phrases ?
Ceux-ci sont appelés le code alphabétique militaire (également connu sous le nom de code alphabétique de l'OTAN). Il est souvent utilisé par des personnes (en particulier les gars du centre d'appels) pour communiquer le nom, l'adresse e-mail ou l'adresse du domicile/du bureau.
Générer le code de l'alphabet militaire dans Excel
Dans mon premier emploi, j'ai eu un projet où je devais faire du démarchage téléphonique pour obtenir des informations sur les dispositifs médicaux. Comme nous étions en contact avec des gens du monde entier avec toutes sortes d'accents, il était parfois difficile de partager notre nom et notre e-mail ou d'obtenir les leurs. C'est alors que j'ai commencé à me fier aux codes de l'alphabet militaire pour communiquer clairement. J'ai vu beaucoup de gars de centre d'appels faire cela efficacement.
Dans cet esprit, j'ai créé un modèle Excel dans lequel vous pouvez saisir une chaîne de texte et générera automatiquement le code de l'alphabet militaire pour le texte saisi.
Quelque chose comme indiqué ci-dessous :
Dès que vous entrez le texte et appuyez sur Entrée, il générera automatiquement le code de l'alphabet militaire pour chaque alphabet de la chaîne de texte.
Notez que dans ce cas, les chiffres et les caractères spéciaux seront affichés tels quels. En outre, cela fonctionnerait avec les deux cas - inférieur ou supérieur.
Étant donné que ce classeur contient une macro, dès que vous l'ouvrez, vous pouvez voir une barre jaune avec le bouton - Activer le contenu. Vous devez cliquer sur ce bouton pour que cela fonctionne.
Comment créer ce modèle de générateur de code alphabet militaire
Ce modèle fonctionne uniquement sur la magie VBA. Il existe quelques boucles dans la procédure événementielle Worksheet Change qui vérifie simplement chaque alphabet et récupère le mot de code pour cet alphabet.
Voici le code VBA qui fait le travail :
Private Sub Worksheet_Change (ByVal Target As Range) 'créé par Sumit Bansal de 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. Colonne 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 To alphabetcount + 1 alphabet = Mid(Range(Target.Address), i, 1) If Range("A2:A27").Find(alphabet) Is Nothing Then result = result & ", " & alphabet Else result = result & ", " & Range("A2:A27").Find(alphabet).Offset(0, 1) End If Next i Cells(TargetRow, TargetColumn + 1) = Mid(result, 3, Len (résultat) - 4) End If End Sub
Si vous souhaitez modifier quelques-uns de ces mots de code en fonction de votre public/région, vous pouvez simplement le modifier dans la colonne B du fichier de téléchargement. Le code choisirait automatiquement les codes modifiés.
Notez que puisque ce classeur contient une macro, vous devez enregistrer le fichier au format .xls ou .xlsm.
J'espère que cela vous aidera la prochaine fois que vous essaierez de communiquer des noms, des identifiants de messagerie ou des adresses avec des personnes lors d'une conversation téléphonique.
Faites-moi savoir ce que vous pensez de ce modèle Excel en laissant un commentaire ci-dessous.
Autres modèles Excel que vous pourriez aimer :
- Modèle de matrice de priorisation des tâches.
- Modèle de générateur d'e-mails.
- Modèle de suivi des congés des employés.
- Modèle de calculatrice de feuille de temps des employés.
- Calendrier intégré à un modèle de liste de tâches.
