inserer texte dans plusieurs cellules

TEMAGOULTFARID · 25 Février 2020

Bonjour,
j'ai trouver ce bout de vab qui me plait bien et qui fonctionne.Ma question est la suivante:
est-ce possible de mettre une lettre ou un texte a la placxe du chiffre "45"
est ce possible de mettre une plaGe de cellule exemple A1:A30.
Par avance, merci

Sub essai()
Dim Plage As Range
Set Plage = Union([A1], [A20], [A30])
Plage.Value = 45
End Sub

sylvanu · 25 Février 2020

Bonsoir TEMAGOULTFARID,
Vous pouvez définir la plage comme vous voulez, la syntaxe est Range("A1:A30") avec des guillemets et deux points de séparation.
La valeur peut être quelconque, si c'est un texte il doit être entre guillements.

VB:

Sub essai2()
Dim Plage As Range
Set Plage = Range("A1:A30")
Plage.Value = "Texte"
End Sub

TEMAGOULTFARID · 26 Février 2020

sylvanu à dit:
Bonsoir TEMAGOULTFARID,
Vous pouvez définir la plage comme vous voulez, la syntaxe est Range("A1:A30") avec des guillemets et deux points de séparation.
La valeur peut être quelconque, si c'est un texte il doit être entre guillements.

VB:

Sub essai2() Dim Plage As Range Set Plage = Range("A1:A30") Plage.Value = "Texte" End Sub

Bonjour,
Cela fonctionne très bien et je vous en remercie énormément.
bien a vous
au plaisir
Farid

inserer texte dans plusieurs cellules

TEMAGOULTFARID

XLDnaute Occasionnel

sylvanu

XLDnaute Barbatruc

TEMAGOULTFARID

XLDnaute Occasionnel

Discussions similaires