Excel: ajouter du contenu dans des cellules

balzo -  
Bonjour à tous,

Moi je débute en VBA et je voudrais juste faire un macro excel qui affecte à un ensemble de cellules selectionées un texte.
j'ai commencé avec ceci:
Sub Texte()
ActiveCell.FormulaR1C1 = "mon texte"
End Sub
mais ça marche pas.

De l'aide svp
Configuration: Windows XP
Internet Explorer 7.0

2 réponses

  1. xjl
    Salut,

    il faut que tu remplaces ActiveCell par Selection, puis tu sélectionnes une plage de cellules, tu lances ta macro et hop, c'est parti y'en a partout !! ;-)
    0
    1. balzo
      Bonjours XLJ,

      ça marcheuuuuuuuuu !!!!!!!!

      Heureusement qu'il y'a des gens comme vous pour aider

      Trés grand merci.

      Balzo
      0
  2. lermite222 Contributeur
    bonjour,
    essaye avec ceçi
    Sub Mon_texte()
    Dim a$
    a$ = "Montexte"
    Range("B5:B14").Value = a$
    end sub
    ou..
    sub Mon_texte(T as string)
    Range("B5:B14").Value = T
    end sub
    A+
    louis
    0