merci a tous a bientot, je crois que j aurais encore besoin de vo service
merci a tous a bientot, je crois que j aurais encore besoin de vo service
re
je voudrais bien, voir comment tu atteint la caption avec la collection shapes
sub test2
avant que tu ne reponde
j'ai bien essayé "Shape" avec et sans "s"
mes fichiers dans les contributions:
mail avec CDO en vba et mail avec CDO en vbs dans un HTA
survol des bouton dans userform
prendre un cliché d'un range
si ton problème est résolu n'oublie pas de pointer : : ça peut servir aux autres
et n'oublie pas de voter
Que nous racontes-tu là, Dave1000 ????
Bien évidemment, que l'on passe un "string" à la collection ***** ! Et col étant une collection d'objet, col("toto") est l'objet dont le nom est toto dans la collection col !
***** : en le faisant sans perversité, hein ...
Je n'accepte pas de demande d' "amitié" individuelle. Tout développeur est pour moi un ami.
Je n'ouvre AUCUN classeur tiers (avec ou sans macro ******). Ne m'en proposez donc pas .
****** : Non, non ... un classeur .xlsx ne "peut" par exemple et entre autres pas contenir un activex (de surcroît invisible) , "bien sûr" ...
Il est illusoire de penser que l'on saurait exprimer valablement et précisément en un langage (rigide) de développement ce que l'on peine à exprimer dans le langage naturel, bien plus souple.
@Dave regarde le post#18
pour l'accessibilité des propriétés d'un activX
c'est
parents sheet . collection(oleobjects) ("nom du control).object.propriété
mes fichiers dans les contributions:
mail avec CDO en vba et mail avec CDO en vbs dans un HTA
survol des bouton dans userform
prendre un cliché d'un range
si ton problème est résolu n'oublie pas de pointer : : ça peut servir aux autres
et n'oublie pas de voter
Et un rebonjour à Patrick !
Evidemment que tu obtiens un message d'erreur avec ce que l'on voit dans ton "animation" (au demeurant bien inutile ...)
Jusqu'à preuve du contraire, n'existe aucune collection Shape, hein ...
Je n'accepte pas de demande d' "amitié" individuelle. Tout développeur est pour moi un ami.
Je n'ouvre AUCUN classeur tiers (avec ou sans macro ******). Ne m'en proposez donc pas .
****** : Non, non ... un classeur .xlsx ne "peut" par exemple et entre autres pas contenir un activex (de surcroît invisible) , "bien sûr" ...
Il est illusoire de penser que l'on saurait exprimer valablement et précisément en un langage (rigide) de développement ce que l'on peine à exprimer dans le langage naturel, bien plus souple.
@jacques je te dis que
ne fonctionnera pas avec ou sans "s"
Code : Sélectionner tout - Visualiser dans une fenêtre à part msgbox activesheet.shapes("Bt_"&1).caption
teste avant de dire
le seul moyen est de passer par oleobjects(nom).object.propriété
point final
mes fichiers dans les contributions:
mail avec CDO en vba et mail avec CDO en vbs dans un HTA
survol des bouton dans userform
prendre un cliché d'un range
si ton problème est résolu n'oublie pas de pointer : : ça peut servir aux autres
et n'oublie pas de voter
Et pour à la fois parfaire ton information et justifier ce que j'ai dit, Patrick, voilà (extrait de l'aide VBA interne), ce que contient la collection Shapes :
Comme je le disais et que tu peux le constater : les Activex (des oleobjects) y sont inclus.Shapes, objet
Collection de tous les objets Shape contenus dans la feuille spécifiée.
Remarques
Chaque objet Shape représente un objet du calque de dessin, par exemple une forme automatique, une forme libre, un objet OLE ou une image.
Tu aurais d'ailleurs pu le vérifier, hein ... (ce que j'ai fait). En mettant 2 ou 3 boutons de commande et le code que j'ai mis plus haut.
Je n'accepte pas de demande d' "amitié" individuelle. Tout développeur est pour moi un ami.
Je n'ouvre AUCUN classeur tiers (avec ou sans macro ******). Ne m'en proposez donc pas .
****** : Non, non ... un classeur .xlsx ne "peut" par exemple et entre autres pas contenir un activex (de surcroît invisible) , "bien sûr" ...
Il est illusoire de penser que l'on saurait exprimer valablement et précisément en un langage (rigide) de développement ce que l'on peine à exprimer dans le langage naturel, bien plus souple.
je le sais ca mais je te dis que pour la caption!! avec la collection shapes c'est pas géré
et pour cause
les commandbutton ont un handle les shapes(forme automatiques,etc...) non!!!!
d'apres toi comment VBA gere la caption et toutes ses sous propriétés( text,windowlong,etc...) .en ayant acces a son handle
mes fichiers dans les contributions:
mail avec CDO en vba et mail avec CDO en vbs dans un HTA
survol des bouton dans userform
prendre un cliché d'un range
si ton problème est résolu n'oublie pas de pointer : : ça peut servir aux autres
et n'oublie pas de voter
Grand merci a vous la routine fonctionne, j ai encore appris un truc, et c'est pas finis, issu du basic de la grande époque, je me met a jour......
a très bientôt
@dave100
quelle routine fonctionne
je suis curieux: en meme temps pas tant que ca
mes fichiers dans les contributions:
mail avec CDO en vba et mail avec CDO en vbs dans un HTA
survol des bouton dans userform
prendre un cliché d'un range
si ton problème est résolu n'oublie pas de pointer : : ça peut servir aux autres
et n'oublie pas de voter
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager