Excel: ajouter du contenu dans des cellules

balzo -  
 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 Messages postés 232 Statut Membre 183
     
    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 Messages postés 9042 Statut Contributeur 1 199
     
    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