J'ai "h=E9rit=E9" d'un classeur Excel truff=E9 de Zones de Texte=20
(de la barre d'outils "Contr=F4les") et j'essaye=20
d=E9sep=E9r=E9ment de trouver comment on doit s'y prendre pour=20
en modifier la valeur, via VBA (Excel 2000).
J'ai fait plusieurs essais, du style :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone)
.Characters.Text =3D "NouvelleValeur" 'entre autres
End With
Mais =E7a me r=E9pond toujours "Propri=E9t=E9 ou m=E9thode non g=E9r=E9e =
par cet objet". J'ai beau faire... aucun r=E9sultat ! Grrrr !
Quelqu'un saurait me dire ce qui m'=E9chappe ? Comment=20
attrape-t-on la valeur d'un "TextBox" ??? Merci,
Bonjour Bernard..tu m'étonne! (ou alors je n'ai pas bien compris)
TextBox1.Value = "Remplir le textbox" ou TextBox1.Value = Inputbox("Comment remplir mon textbox" ) a+ Claudy
"Bernard Rey" a écrit dans le message de news:ec5d01c3f0b8$04af6c80$ Bonjour,
J'ai "hérité" d'un classeur Excel truffé de Zones de Texte (de la barre d'outils "Contrôles") et j'essaye désepérément de trouver comment on doit s'y prendre pour en modifier la valeur, via VBA (Excel 2000).
J'ai fait plusieurs essais, du style :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone) .Characters.Text = "NouvelleValeur" 'entre autres End With
Mais ça me répond toujours "Propriété ou méthode non gérée par cet objet". J'ai beau faire... aucun résultat ! Grrrr !
Quelqu'un saurait me dire ce qui m'échappe ? Comment attrape-t-on la valeur d'un "TextBox" ??? Merci,
-- Bernard Rey - Toulouse
Bonjour Bernard..tu m'étonne! (ou alors je n'ai pas bien compris)
TextBox1.Value = "Remplir le textbox"
ou
TextBox1.Value = Inputbox("Comment remplir mon textbox" )
a+
Claudy
"Bernard Rey" <b.rey@PasDeSpam.mvps.org> a écrit dans le message de
news:ec5d01c3f0b8$04af6c80$a601280a@phx.gbl...
Bonjour,
J'ai "hérité" d'un classeur Excel truffé de Zones de Texte
(de la barre d'outils "Contrôles") et j'essaye
désepérément de trouver comment on doit s'y prendre pour
en modifier la valeur, via VBA (Excel 2000).
J'ai fait plusieurs essais, du style :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone)
.Characters.Text = "NouvelleValeur" 'entre autres
End With
Mais ça me répond toujours "Propriété ou méthode non gérée
par cet objet". J'ai beau faire... aucun résultat ! Grrrr !
Quelqu'un saurait me dire ce qui m'échappe ? Comment
attrape-t-on la valeur d'un "TextBox" ??? Merci,
Bonjour Bernard..tu m'étonne! (ou alors je n'ai pas bien compris)
TextBox1.Value = "Remplir le textbox" ou TextBox1.Value = Inputbox("Comment remplir mon textbox" ) a+ Claudy
"Bernard Rey" a écrit dans le message de news:ec5d01c3f0b8$04af6c80$ Bonjour,
J'ai "hérité" d'un classeur Excel truffé de Zones de Texte (de la barre d'outils "Contrôles") et j'essaye désepérément de trouver comment on doit s'y prendre pour en modifier la valeur, via VBA (Excel 2000).
J'ai fait plusieurs essais, du style :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone) .Characters.Text = "NouvelleValeur" 'entre autres End With
Mais ça me répond toujours "Propriété ou méthode non gérée par cet objet". J'ai beau faire... aucun résultat ! Grrrr !
Quelqu'un saurait me dire ce qui m'échappe ? Comment attrape-t-on la valeur d'un "TextBox" ??? Merci,
-- Bernard Rey - Toulouse
Bernard Rey
Bonjour Bernard..
Bonjour Claudy :-)
tu m'étonnes ! (ou alors je n'ai pas bien compris)
Je ne sais pas encore...
ou TextBox1.Value = Inputbox("Comment remplir mon textbox" )
Là c'est moi qui ne vois pas comment ça s'insère dans ma macro :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone) .TextBox1.Value = "Remplir le textbox" 'comme ça ??? End With
Cette syntaxme renvoie toujours la même réponse : "Propriété ou méthode non gérée par cet objet". Pourtant j'arrive bien par exemple à le sélectionner avec :
Mais pour modifier le contenu, bernique ! Je n'arrive d'ailleurs pas non plus à lire le contenu, évidemment.
Re-Grrrr !!!
-- Bernard Rey -Toulouse
"Bernard Rey" a écrit dans le message de
news:ec5d01c3f0b8$04af6c80$ Bonjour,
J'ai "hérité" d'un classeur Excel truffé de Zones de Texte (de la barre d'outils "Contrôles") et j'essaye désepérément de trouver comment on doit s'y prendre pour en modifier la valeur, via VBA (Excel 2000).
J'ai fait plusieurs essais, du style :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone) .Characters.Text = "NouvelleValeur" 'entre autres End With
Mais ça me répond toujours "Propriété ou méthode non gérée par cet objet". J'ai beau faire... aucun résultat ! Grrrr !
Quelqu'un saurait me dire ce qui m'échappe ? Comment attrape-t-on la valeur d'un "TextBox" ??? Merci,
-- Bernard Rey - Toulouse
Bonjour Bernard..
Bonjour Claudy :-)
tu m'étonnes ! (ou alors je n'ai pas bien compris)
Je ne sais pas encore...
ou
TextBox1.Value = Inputbox("Comment remplir mon textbox" )
Là c'est moi qui ne vois pas comment ça s'insère dans ma
macro :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone)
.TextBox1.Value = "Remplir le textbox" 'comme ça ???
End With
Cette syntaxme renvoie toujours la même réponse :
"Propriété ou méthode non gérée par cet objet". Pourtant
j'arrive bien par exemple à le sélectionner avec :
J'ai "hérité" d'un classeur Excel truffé de Zones de Texte
(de la barre d'outils "Contrôles") et j'essaye
désepérément de trouver comment on doit s'y prendre pour
en modifier la valeur, via VBA (Excel 2000).
J'ai fait plusieurs essais, du style :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone)
.Characters.Text = "NouvelleValeur" 'entre autres
End With
Mais ça me répond toujours "Propriété ou méthode non
gérée par cet objet". J'ai beau faire... aucun résultat !
Grrrr !
Quelqu'un saurait me dire ce qui m'échappe ? Comment
attrape-t-on la valeur d'un "TextBox" ??? Merci,
tu m'étonnes ! (ou alors je n'ai pas bien compris)
Je ne sais pas encore...
ou TextBox1.Value = Inputbox("Comment remplir mon textbox" )
Là c'est moi qui ne vois pas comment ça s'insère dans ma macro :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone) .TextBox1.Value = "Remplir le textbox" 'comme ça ??? End With
Cette syntaxme renvoie toujours la même réponse : "Propriété ou méthode non gérée par cet objet". Pourtant j'arrive bien par exemple à le sélectionner avec :
Mais pour modifier le contenu, bernique ! Je n'arrive d'ailleurs pas non plus à lire le contenu, évidemment.
Re-Grrrr !!!
-- Bernard Rey -Toulouse
"Bernard Rey" a écrit dans le message de
news:ec5d01c3f0b8$04af6c80$ Bonjour,
J'ai "hérité" d'un classeur Excel truffé de Zones de Texte (de la barre d'outils "Contrôles") et j'essaye désepérément de trouver comment on doit s'y prendre pour en modifier la valeur, via VBA (Excel 2000).
J'ai fait plusieurs essais, du style :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone) .Characters.Text = "NouvelleValeur" 'entre autres End With
Mais ça me répond toujours "Propriété ou méthode non gérée par cet objet". J'ai beau faire... aucun résultat ! Grrrr !
Quelqu'un saurait me dire ce qui m'échappe ? Comment attrape-t-on la valeur d'un "TextBox" ??? Merci,
-- Bernard Rey - Toulouse
claudy
mais non...tu compliques sub test
TextBox1.Value = "Remplir le textbox" 'tout simplement :-)) end sub
a+
"Bernard Rey" a écrit dans le message de news:ecd601c3f0be$00973d70$
Bonjour Bernard..
Bonjour Claudy :-)
tu m'étonnes ! (ou alors je n'ai pas bien compris)
Je ne sais pas encore...
ou TextBox1.Value = Inputbox("Comment remplir mon textbox" )
Là c'est moi qui ne vois pas comment ça s'insère dans ma macro :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone) .TextBox1.Value = "Remplir le textbox" 'comme ça ??? End With
Cette syntaxme renvoie toujours la même réponse : "Propriété ou méthode non gérée par cet objet". Pourtant j'arrive bien par exemple à le sélectionner avec :
Mais pour modifier le contenu, bernique ! Je n'arrive d'ailleurs pas non plus à lire le contenu, évidemment.
Re-Grrrr !!!
-- Bernard Rey -Toulouse
"Bernard Rey" a écrit dans le message de
news:ec5d01c3f0b8$04af6c80$ Bonjour,
J'ai "hérité" d'un classeur Excel truffé de Zones de Texte (de la barre d'outils "Contrôles") et j'essaye désepérément de trouver comment on doit s'y prendre pour en modifier la valeur, via VBA (Excel 2000).
J'ai fait plusieurs essais, du style :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone) .Characters.Text = "NouvelleValeur" 'entre autres End With
Mais ça me répond toujours "Propriété ou méthode non gérée par cet objet". J'ai beau faire... aucun résultat ! Grrrr !
Quelqu'un saurait me dire ce qui m'échappe ? Comment attrape-t-on la valeur d'un "TextBox" ??? Merci,
-- Bernard Rey - Toulouse
mais non...tu compliques
sub test
TextBox1.Value = "Remplir le textbox" 'tout simplement :-))
end sub
a+
"Bernard Rey" <b.rey@DontSpamMe.mvps.org> a écrit dans le message de
news:ecd601c3f0be$00973d70$a601280a@phx.gbl...
Bonjour Bernard..
Bonjour Claudy :-)
tu m'étonnes ! (ou alors je n'ai pas bien compris)
Je ne sais pas encore...
ou
TextBox1.Value = Inputbox("Comment remplir mon textbox" )
Là c'est moi qui ne vois pas comment ça s'insère dans ma
macro :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone)
.TextBox1.Value = "Remplir le textbox" 'comme ça ???
End With
Cette syntaxme renvoie toujours la même réponse :
"Propriété ou méthode non gérée par cet objet". Pourtant
j'arrive bien par exemple à le sélectionner avec :
J'ai "hérité" d'un classeur Excel truffé de Zones de Texte
(de la barre d'outils "Contrôles") et j'essaye
désepérément de trouver comment on doit s'y prendre pour
en modifier la valeur, via VBA (Excel 2000).
J'ai fait plusieurs essais, du style :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone)
.Characters.Text = "NouvelleValeur" 'entre autres
End With
Mais ça me répond toujours "Propriété ou méthode non
gérée par cet objet". J'ai beau faire... aucun résultat !
Grrrr !
Quelqu'un saurait me dire ce qui m'échappe ? Comment
attrape-t-on la valeur d'un "TextBox" ??? Merci,
TextBox1.Value = "Remplir le textbox" 'tout simplement :-)) end sub
a+
"Bernard Rey" a écrit dans le message de news:ecd601c3f0be$00973d70$
Bonjour Bernard..
Bonjour Claudy :-)
tu m'étonnes ! (ou alors je n'ai pas bien compris)
Je ne sais pas encore...
ou TextBox1.Value = Inputbox("Comment remplir mon textbox" )
Là c'est moi qui ne vois pas comment ça s'insère dans ma macro :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone) .TextBox1.Value = "Remplir le textbox" 'comme ça ??? End With
Cette syntaxme renvoie toujours la même réponse : "Propriété ou méthode non gérée par cet objet". Pourtant j'arrive bien par exemple à le sélectionner avec :
Mais pour modifier le contenu, bernique ! Je n'arrive d'ailleurs pas non plus à lire le contenu, évidemment.
Re-Grrrr !!!
-- Bernard Rey -Toulouse
"Bernard Rey" a écrit dans le message de
news:ec5d01c3f0b8$04af6c80$ Bonjour,
J'ai "hérité" d'un classeur Excel truffé de Zones de Texte (de la barre d'outils "Contrôles") et j'essaye désepérément de trouver comment on doit s'y prendre pour en modifier la valeur, via VBA (Excel 2000).
J'ai fait plusieurs essais, du style :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone) .Characters.Text = "NouvelleValeur" 'entre autres End With
Mais ça me répond toujours "Propriété ou méthode non gérée par cet objet". J'ai beau faire... aucun résultat ! Grrrr !
Quelqu'un saurait me dire ce qui m'échappe ? Comment attrape-t-on la valeur d'un "TextBox" ??? Merci,
-- Bernard Rey - Toulouse
Bernard Rey
mais non...tu compliques sub test TextBox1.Value = "Remplir le textbox" 'tout simplement end sub
Là j'ai droit à "Objet requis"... à la rigueur à "Sub ou Fonction non définie", si je mets :
TextBox(MaZone).Value = "Remplir le textbox"
Bref, je piétine :-/
-- Bernard Rey - Toulouse
mais non...tu compliques
sub test
TextBox1.Value = "Remplir le textbox" 'tout simplement
end sub
Là j'ai droit à "Objet requis"... à la rigueur à "Sub ou
Fonction non définie", si je mets :
mais non...tu compliques sub test TextBox1.Value = "Remplir le textbox" 'tout simplement end sub
Là j'ai droit à "Objet requis"... à la rigueur à "Sub ou Fonction non définie", si je mets :
TextBox(MaZone).Value = "Remplir le textbox"
Bref, je piétine :-/
-- Bernard Rey - Toulouse
Frédéric Sigonneau
Bonjour,
A priori, cette syntaxe de vrait fonctionner :
Sheets("Feuil1").TextBox1.Value = "coucou"
FS -- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
Bonjour Bernard..
Bonjour Claudy :-)
tu m'étonnes ! (ou alors je n'ai pas bien compris)
Je ne sais pas encore...
ou TextBox1.Value = Inputbox("Comment remplir mon textbox" )
Là c'est moi qui ne vois pas comment ça s'insère dans ma macro :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone) .TextBox1.Value = "Remplir le textbox" 'comme ça ??? End With
Cette syntaxme renvoie toujours la même réponse : "Propriété ou méthode non gérée par cet objet". Pourtant j'arrive bien par exemple à le sélectionner avec :
Mais pour modifier le contenu, bernique ! Je n'arrive d'ailleurs pas non plus à lire le contenu, évidemment.
Re-Grrrr !!!
-- Bernard Rey -Toulouse
"Bernard Rey" a écrit dans le message de
news:ec5d01c3f0b8$04af6c80$ Bonjour,
J'ai "hérité" d'un classeur Excel truffé de Zones de Texte (de la barre d'outils "Contrôles") et j'essaye désepérément de trouver comment on doit s'y prendre pour en modifier la valeur, via VBA (Excel 2000).
J'ai fait plusieurs essais, du style :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone) .Characters.Text = "NouvelleValeur" 'entre autres End With
Mais ça me répond toujours "Propriété ou méthode non gérée par cet objet". J'ai beau faire... aucun résultat ! Grrrr !
Quelqu'un saurait me dire ce qui m'échappe ? Comment attrape-t-on la valeur d'un "TextBox" ??? Merci,
-- Bernard Rey - Toulouse
Bonjour,
A priori, cette syntaxe de vrait fonctionner :
Sheets("Feuil1").TextBox1.Value = "coucou"
FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !
Bonjour Bernard..
Bonjour Claudy :-)
tu m'étonnes ! (ou alors je n'ai pas bien compris)
Je ne sais pas encore...
ou
TextBox1.Value = Inputbox("Comment remplir mon textbox" )
Là c'est moi qui ne vois pas comment ça s'insère dans ma
macro :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone)
.TextBox1.Value = "Remplir le textbox" 'comme ça ???
End With
Cette syntaxme renvoie toujours la même réponse :
"Propriété ou méthode non gérée par cet objet". Pourtant
j'arrive bien par exemple à le sélectionner avec :
J'ai "hérité" d'un classeur Excel truffé de Zones de Texte
(de la barre d'outils "Contrôles") et j'essaye
désepérément de trouver comment on doit s'y prendre pour
en modifier la valeur, via VBA (Excel 2000).
J'ai fait plusieurs essais, du style :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone)
.Characters.Text = "NouvelleValeur" 'entre autres
End With
Mais ça me répond toujours "Propriété ou méthode non
gérée par cet objet". J'ai beau faire... aucun résultat !
Grrrr !
Quelqu'un saurait me dire ce qui m'échappe ? Comment
attrape-t-on la valeur d'un "TextBox" ??? Merci,
FS -- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
Bonjour Bernard..
Bonjour Claudy :-)
tu m'étonnes ! (ou alors je n'ai pas bien compris)
Je ne sais pas encore...
ou TextBox1.Value = Inputbox("Comment remplir mon textbox" )
Là c'est moi qui ne vois pas comment ça s'insère dans ma macro :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone) .TextBox1.Value = "Remplir le textbox" 'comme ça ??? End With
Cette syntaxme renvoie toujours la même réponse : "Propriété ou méthode non gérée par cet objet". Pourtant j'arrive bien par exemple à le sélectionner avec :
Mais pour modifier le contenu, bernique ! Je n'arrive d'ailleurs pas non plus à lire le contenu, évidemment.
Re-Grrrr !!!
-- Bernard Rey -Toulouse
"Bernard Rey" a écrit dans le message de
news:ec5d01c3f0b8$04af6c80$ Bonjour,
J'ai "hérité" d'un classeur Excel truffé de Zones de Texte (de la barre d'outils "Contrôles") et j'essaye désepérément de trouver comment on doit s'y prendre pour en modifier la valeur, via VBA (Excel 2000).
J'ai fait plusieurs essais, du style :
With Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone) .Characters.Text = "NouvelleValeur" 'entre autres End With
Mais ça me répond toujours "Propriété ou méthode non gérée par cet objet". J'ai beau faire... aucun résultat ! Grrrr !
Quelqu'un saurait me dire ce qui m'échappe ? Comment attrape-t-on la valeur d'un "TextBox" ??? Merci,
-- Bernard Rey - Toulouse
Daniel.M
Claudy,
mais non...tu compliques sub test
TextBox1.Value = "Remplir le textbox" 'tout simplement :-)) end sub
Bernard ne remplit pas un TextBox mais une Shape.
Et il veut trouver le moyen de remplir le contenu de celle-ci en une seule instruction qui remplacerait les deux suivantes:
Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone).Select Selection.Characters.Text = "Allo le monde"
Alors que celle-ci échoue (faudrait qu'on m'explique à moi aussi) : Workbooks(Classeur).Sheets(Feuille) _ .Shapes(MaZone).Characters.Text = "Allo le monde"
En résumé, pourquoi devoir SELECTionner ?
Salutations,
Daniel M.
Claudy,
mais non...tu compliques
sub test
TextBox1.Value = "Remplir le textbox" 'tout simplement :-))
end sub
Bernard ne remplit pas un TextBox mais une Shape.
Et il veut trouver le moyen de remplir le contenu de celle-ci en une seule
instruction qui remplacerait les deux suivantes:
Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone).Select
Selection.Characters.Text = "Allo le monde"
Alors que celle-ci échoue (faudrait qu'on m'explique à moi aussi) :
Workbooks(Classeur).Sheets(Feuille) _
.Shapes(MaZone).Characters.Text = "Allo le monde"
TextBox1.Value = "Remplir le textbox" 'tout simplement :-)) end sub
Bernard ne remplit pas un TextBox mais une Shape.
Et il veut trouver le moyen de remplir le contenu de celle-ci en une seule instruction qui remplacerait les deux suivantes:
Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone).Select Selection.Characters.Text = "Allo le monde"
Alors que celle-ci échoue (faudrait qu'on m'explique à moi aussi) : Workbooks(Classeur).Sheets(Feuille) _ .Shapes(MaZone).Characters.Text = "Allo le monde"
En résumé, pourquoi devoir SELECTionner ?
Salutations,
Daniel M.
Bernard Rey
Bernard ne remplit pas un TextBox mais une Shape.
Oui.
Et il veut trouver le moyen de remplir le contenu de celle-ci en une seule instruction qui remplacerait les deux suivantes:
Pas tout à fait, car ça ne marche pas non plus en deux lignes. La première marche bien (la Zone de Texte est bien sélectionnée) mais après, ça ne fait plus rien que me mettre des messages d'erreur :-(((
Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone).Select Selection.Characters.Text = "Allo le monde"
Alors que celle-ci échoue (faudrait qu'on m'explique à moi aussi) : Workbooks(Classeur).Sheets(Feuille) _ ..Shapes(MaZone).Characters.Text = "Allo le monde"
En résumé, pourquoi devoir SELECTionner ?
Je n'ai coupé a ligne en deux que pour essayer de déterminer à partir d'où ça cloche (mais sans succès). Sinon, évidemment ça ne sert à rien de SELECTionner (à quelques exceptions près) je suis bien d 'accord.
-- Bernard Rey - Toulouse
Bernard ne remplit pas un TextBox mais une Shape.
Oui.
Et il veut trouver le moyen de remplir le contenu de celle-ci en une seule
instruction qui remplacerait les deux suivantes:
Pas tout à fait, car ça ne marche pas non plus en deux lignes. La première
marche bien (la Zone de Texte est bien sélectionnée) mais après, ça ne fait
plus rien que me mettre des messages d'erreur :-(((
Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone).Select
Selection.Characters.Text = "Allo le monde"
Alors que celle-ci échoue (faudrait qu'on m'explique à moi aussi) :
Workbooks(Classeur).Sheets(Feuille) _
..Shapes(MaZone).Characters.Text = "Allo le monde"
En résumé, pourquoi devoir SELECTionner ?
Je n'ai coupé a ligne en deux que pour essayer de déterminer à partir d'où ça
cloche (mais sans succès). Sinon, évidemment ça ne sert à rien de
SELECTionner (à quelques exceptions près) je suis bien d 'accord.
Et il veut trouver le moyen de remplir le contenu de celle-ci en une seule instruction qui remplacerait les deux suivantes:
Pas tout à fait, car ça ne marche pas non plus en deux lignes. La première marche bien (la Zone de Texte est bien sélectionnée) mais après, ça ne fait plus rien que me mettre des messages d'erreur :-(((
Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone).Select Selection.Characters.Text = "Allo le monde"
Alors que celle-ci échoue (faudrait qu'on m'explique à moi aussi) : Workbooks(Classeur).Sheets(Feuille) _ ..Shapes(MaZone).Characters.Text = "Allo le monde"
En résumé, pourquoi devoir SELECTionner ?
Je n'ai coupé a ligne en deux que pour essayer de déterminer à partir d'où ça cloche (mais sans succès). Sinon, évidemment ça ne sert à rien de SELECTionner (à quelques exceptions près) je suis bien d 'accord.
Et il veut trouver le moyen de remplir le contenu de celle-ci en une seule instruction qui remplacerait les deux suivantes:
Pas tout à fait, car ça ne marche pas non plus en deux lignes. La première marche bien (la Zone de Texte est bien sélectionnée) mais après, ça ne fait plus rien que me mettre des messages d'erreur :-(((
Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone).Select Selection.Characters.Text = "Allo le monde"
Chez moi, les 2 instructions fonctionnent sans problème. Toujours le même message d'erreur? (Propriété non-gérée par l'objet) Ta feuille et/ou ton classeur ne sont pas protégés?
Salutations,
Daniel M.
Salut Bernard,
Et il veut trouver le moyen de remplir le contenu de celle-ci en une seule
instruction qui remplacerait les deux suivantes:
Pas tout à fait, car ça ne marche pas non plus en deux lignes. La première
marche bien (la Zone de Texte est bien sélectionnée) mais après, ça ne fait
plus rien que me mettre des messages d'erreur :-(((
Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone).Select
Selection.Characters.Text = "Allo le monde"
Chez moi, les 2 instructions fonctionnent sans problème.
Toujours le même message d'erreur? (Propriété non-gérée par l'objet)
Ta feuille et/ou ton classeur ne sont pas protégés?
Et il veut trouver le moyen de remplir le contenu de celle-ci en une seule instruction qui remplacerait les deux suivantes:
Pas tout à fait, car ça ne marche pas non plus en deux lignes. La première marche bien (la Zone de Texte est bien sélectionnée) mais après, ça ne fait plus rien que me mettre des messages d'erreur :-(((
Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone).Select Selection.Characters.Text = "Allo le monde"
Chez moi, les 2 instructions fonctionnent sans problème. Toujours le même message d'erreur? (Propriété non-gérée par l'objet) Ta feuille et/ou ton classeur ne sont pas protégés?
Salutations,
Daniel M.
Alain CROS
Bonjour.
Les shapes sont assez compliqués. Il faut écrire : Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone).TextFrame.Characters.Text = "Allo le monde"
Alain CROS.
"Daniel.M" a écrit dans le message de news: #
Claudy,
mais non...tu compliques sub test
TextBox1.Value = "Remplir le textbox" 'tout simplement :-)) end sub
Bernard ne remplit pas un TextBox mais une Shape.
Et il veut trouver le moyen de remplir le contenu de celle-ci en une seule instruction qui remplacerait les deux suivantes:
Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone).Select Selection.Characters.Text = "Allo le monde"
Alors que celle-ci échoue (faudrait qu'on m'explique à moi aussi) : Workbooks(Classeur).Sheets(Feuille) _ .Shapes(MaZone).Characters.Text = "Allo le monde"
En résumé, pourquoi devoir SELECTionner ?
Salutations,
Daniel M.
Bonjour.
Les shapes sont assez compliqués.
Il faut écrire :
Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone).TextFrame.Characters.Text = "Allo le monde"
Alain CROS.
"Daniel.M" <prenom.maher@bigfoot.inutil.com> a écrit dans le message de news: #FGGfHM8DHA.1816@TK2MSFTNGP12.phx.gbl...
Claudy,
mais non...tu compliques
sub test
TextBox1.Value = "Remplir le textbox" 'tout simplement :-))
end sub
Bernard ne remplit pas un TextBox mais une Shape.
Et il veut trouver le moyen de remplir le contenu de celle-ci en une seule
instruction qui remplacerait les deux suivantes:
Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone).Select
Selection.Characters.Text = "Allo le monde"
Alors que celle-ci échoue (faudrait qu'on m'explique à moi aussi) :
Workbooks(Classeur).Sheets(Feuille) _
.Shapes(MaZone).Characters.Text = "Allo le monde"
Les shapes sont assez compliqués. Il faut écrire : Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone).TextFrame.Characters.Text = "Allo le monde"
Alain CROS.
"Daniel.M" a écrit dans le message de news: #
Claudy,
mais non...tu compliques sub test
TextBox1.Value = "Remplir le textbox" 'tout simplement :-)) end sub
Bernard ne remplit pas un TextBox mais une Shape.
Et il veut trouver le moyen de remplir le contenu de celle-ci en une seule instruction qui remplacerait les deux suivantes:
Workbooks(Classeur).Sheets(Feuille).Shapes(MaZone).Select Selection.Characters.Text = "Allo le monde"
Alors que celle-ci échoue (faudrait qu'on m'explique à moi aussi) : Workbooks(Classeur).Sheets(Feuille) _ .Shapes(MaZone).Characters.Text = "Allo le monde"
