[VBA]Créer une zone de texte dans Excel
Raph04
Messages postés
182
Statut
Membre
-
gbinforme Messages postés 15481 Date d'inscription Statut Contributeur Dernière intervention -
gbinforme Messages postés 15481 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Je souhaiterais créer une Zone de texte en VBA pour la mettre directement dans un Excel (pas un formulaire).
Ensuite je souhaiterais copier les valeurs de certaines cellules pour les mettre les une à la suite des autres dans la Zone de textecréée juste avant.
Je n'ai pas trouver la fonction pour créer la Zone de texte. Quand j'enregistre une Macro, il ne met rien du tout lorsque je créer la Zone de texte... comme si la Zone de texteété apparue par miracle ou qu'elle avait toujours été là.
Est ce que vous connaissez la fonction pour créer la Zone de texteavec des paramètres d'entrée comme la je pourrais adapter sa taille et son emplacement.
Merci
PS : Je suis sur Excel 2007
Je souhaiterais créer une Zone de texte en VBA pour la mettre directement dans un Excel (pas un formulaire).
Ensuite je souhaiterais copier les valeurs de certaines cellules pour les mettre les une à la suite des autres dans la Zone de textecréée juste avant.
Je n'ai pas trouver la fonction pour créer la Zone de texte. Quand j'enregistre une Macro, il ne met rien du tout lorsque je créer la Zone de texte... comme si la Zone de texteété apparue par miracle ou qu'elle avait toujours été là.
Est ce que vous connaissez la fonction pour créer la Zone de texteavec des paramètres d'entrée comme la je pourrais adapter sa taille et son emplacement.
Merci
PS : Je suis sur Excel 2007
A voir également:
- Zone de texte vba
- Alternative zone telechargement - Accueil - Outils
- Texte de chanson gratuit pdf - Télécharger - Vie quotidienne
- Traitement de texte gratuit - Guide
- Texte de barra - Guide
- Ce logiciel gratuit et léger est parfait pour remplacer Word, même sur un vieux PC - Guide
2 réponses
bonjour
Un petit exemple pour t'aider à démarrer avec les paramètres de base :
Un petit exemple pour t'aider à démarrer avec les paramètres de base :
Sub créer_zone_texte()
'
' créer_zone_texte Macro
'
ActiveSheet.Shapes.AddTextbox(msoTextOrientationHorizontal, 71.25, 45#, _
221.25, 144.75).Select
Selection.Name = "Ma_zone"
Selection.ShapeRange.Fill.Visible = msoTrue
Selection.ShapeRange.Fill.Solid
Selection.ShapeRange.Fill.ForeColor.SchemeColor = 27
Selection.ShapeRange.Fill.Transparency = 0#
Selection.ShapeRange.Line.Weight = 0.75
Selection.ShapeRange.Line.DashStyle = msoLineSolid
Selection.ShapeRange.Line.Style = msoLineSingle
Selection.ShapeRange.Line.Transparency = 0#
Selection.ShapeRange.Line.Visible = msoTrue
Selection.ShapeRange.Line.ForeColor.SchemeColor = 64
Selection.ShapeRange.Line.BackColor.RGB = RGB(255, 255, 255)
Selection.Characters.Text = Range("F2").Text _
& " " & Range("K7").Text
With Selection.Characters(Start:=1, Length:=26).Font
.Name = "Arial"
.FontStyle = "Normal"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
End Sub
Amicales salutations.
Le Pingou.
Désolé, je n'avais pas vu ton message hier quand je préparais le mien ;-)
J'espère que Raph04 aura ainsi son point de départ à adapter.
Bonne journée.