Macros VBA pour insérer du texte dans Word ou Excel

VBA (Visual Basic for Applications) permet de personnaliser Microsoft Office 2007/2010. Que ce soit pour insérer du texte dans un document Word ou une cellule Excel, une macro peut le faire.

Exécuter une macro

• Les macros s'exécutent depuis l'Éditeur Visual Basic (VBE). Accès : Alt+F11 dans Word/Excel → « Insertion » → « Module ». Collez la macro dans la fenêtre. F5 pour l'exécuter.

Macro pour insérer du texte dans Word

• Utilise l'objet Selection et la méthode TypeText. Remplacez « Your text goes here » par votre texte :

  Sub TypeTextMethod()
  Dim MyText As String
  MyText = "Your text goes here"
  Selection.TypeText (MyText)
  End Sub

Macro pour insérer du texte dans Excel

• Il faut indiquer la cellule cible et le texte. Cette macro place « Your text goes here » en A1 (objet Range ligne 3). Modifiez Range pour changer la cellule :

  Sub InsertText()
  ' InsertText Macro
  Range("A1").Select
  ActiveCell.FormulaR1C1 = "Your text goes here"
  Range("A2").Select
  End Sub