Résultats de la recherche

  1. E

    Couleur d'encadrement d'un shapes

    Bonjour à toutes et tous, Après cette journée de farniente, je vous soumet un nouveau peti soucis. Dans mon code j'essaye d'affecter une coueur à la bordure de mon shapes mais sans effet. With ActiveSheet.Shapes("ferm").Fill .BorderStyle = 1...
  2. E

    Silimili rectanle avec un trou silimili rectangle vide

    Bonsoir ou Bonjour, Je me permet de faire un double post avec mes silimili rectangles car j'ai la solution à paufiner maissolution toutde même Jeanpierre. A bent$ot Eric G
  3. E

    Des rectangles vides

    Bonjour à toutes et à tous, Petite curiosité, sur un fil, j'avais trouvé une application pouvant créer différentes sortes de formes. Biensûr celle qui me plairait n'y est pas. Voila comment faire un rectangle troué par un autre rectaugle. On pourrait faire variée la taille des 2 rectangles...
  4. E

    Pb d'image et de shapes

    Bonour à toutes et à tous, Encore un Pb d'image et de shapes au petit matin. J'ai du malà gérer les shapes... Ma 2ème forme va très bien mais pas la 1ère, à cause de '.Adjustements(1)= 0.03' Dim sh, sh2 As Shape Set sh2 = ActiveSheet.Shapes.AddPicture("chemin", True, True, 608, 103.5...
  5. E

    Image ou Label devennant opaque jmps

    Bonsoir à toutes et à tous, Je fais ce fil car Pb plus concis que le précédent. y a t'il un remède ? jmps as tu résolu ce Pb, car il se représente e rien y fat? Merci pour vos suggestions. Eric D
  6. E

    Objet devient opaque et blanc sur un click

    Bonsoir à toutes et à tous, J'ai un peit soucis vec un objet. Comme le dit l'intitulé, j'ai un objet transparent, quand ma souris passe desus, je fais qqc ok, mais quand je clicke dessus, il devient blanc, alors que enable est a 'False. Comment empêcher cet raction ??? Merci pour vos...
  7. E

    Création de macro

    Bonsoir à toutes et tous, J'ai un nouveau Gros Pb: Peut on dupliquer une macro? Je m'explique, j'ai une macro évènementielle qui existe. Elle consiste a afficher un objet si je passe sur un objet2 nommé toto 'private sub toto_mousemove ... end sub'. Peut on créer une autre macro...
  8. E

    diminuer l'arrondi des coins d'1 rectangleD

    Bonsoir à toutes et tous, Après une recherche, j'ai trouvé dolphin qui posait la même question que moi, à savoir comment diminuer l'amplitude de l'arrodi des coins d'un triangle. Eric C et Robert y ont répondu, mais peut-on et comment faire cela en VBA. Car j'ai ce Pb With...
  9. E

    Shapes moins opaque

    Bonjour à toutes et à tous, Comment rend on moins opaque un shapes. J'ai créer ça, mais la propriété de transparence n'est pas applicable. ActiveSheet.Shapes("sup").Width = 100 c'est ok 'With ActiveSheet.Shapes("sup") ActiveSheet.Shapes("sup").Width = 100...
  10. E

    Pb avec l'image d'un control

    Bonjour à toutes et tous et bonne et heureuse année, Je viens vous consulter car j'ai un petit souci avec l'image d'un contol image. voici mon code: Sub Cson() Dim imag As String Range("BA11").Value = -1 * Range("BA11").Value Range("W6").Value = IIf(Range("BA11").Value < 0, "<0", ">0") '...
  11. E

    Fermeture USF entraine minimisation feuille

    Bonjour à toutes et à tous, Je ne parviens pas à me sortir de cet 'incoherence'. J'ai ma feuille sur laquelle j'appelle 2USF (modal). sur le 1er j'ai un objet qui, lorsque l'on click dessus efface les 2USF.L'USF actif efface bien celui qui est innactif, puis s'efface, mais il minimise ma...
  12. E

    Capter evnmt agrandissement Mi & jmps

    Bonjour à toutes et tous, Comme je n'arrive pas a acceder à l'infos créer par les 2 Exceliens nommé ds l'intitulé, je me permet de refaire une demande d'infos sur cet évenement. Si par hasard vous aviez cette info ds un coin de votre Ordi. voilà le fil: Lien supprimé Merci pour votre aide...
  13. E

    Capter l'évènement d'agrandissement du fichier

    Bonjour à toutes et tous, Il y a une info qui m'interresserais, mais je n'arrive pas a ouvrir le tuto. Mon libellé reprends celui qui m'interresse si Mi ou jmps peuvent m'aider. D'après ce qu'il me dit, je ne serais pas connecté, alors comment puis-je faire ce message. Lien supprimé Merci...
  14. E

    Initialiser le curseur

    Bonjour à toutes et tous, Mon intitulé ne correspond peut être pas exactement à ce que je souhaite obtenir, mais bon... je souhaite donc changer mon curseur, par un perso, lorsque j'ouvre mon classeur et remettre l'original biensur quand je referme mon classeur. Merci pour votre aide Eric D
  15. E

    Macro ne s'active pas

    Bonjour à toutes et tous, J'ai un soucis avec, le retour d'activité sur mon classeur. Donc, j'utilise mon classeur puis, je travaille sur une autre application consultation d'un dossier, traitement de texte, Internet ou autre, sans fermer mon classeur. Lorsque je retourne sur ce classeur...
  16. E

    Objet requis ???

    Bonjour à toutes et tous, Je reviens vous voir car malheureusement j'ai un ptit Pb, mon classeur détecte une erreur sur cette ligne (surlignée en jaune) Cells(Range("AI11").Value, Range("AI12").Value).Interior.ColorIndex = Range("AI26").Value où Range("AI11").Value = 1049...
  17. E

    Barre de défilement en couleur

    Bonjour à toutes et tous, J'ai visiter un site avec une barre de défilement en couleur, 01 Wave sons wave Humain peut-on faire ça en VBA? Merci pour vos suggestions. Eric D
  18. E

    Pb Procédure évènementielle

    Bonjour à toutes et tous, Je ne croyait pas que cela serait un soucis, mais... Le voici donc: Quand je sélectionne une autre application, ou un autre classeur, et quand je resélectionne mon appli ds la barre de tache, j'aimerais enclencher une macro ds mon application? Comment faire ...
  19. E

    Création d'une image automatiquement

    Bonjour à toutes et tous, J'ai une image sur ma feuille, grace à la collaboration de certain, que je peux changer, Sub Cson() Dim imag As String Range("BA11").Value = Range("BA11").Value * -1 imag = IIf(Range("BA11").Value < 0, "C:\HP2.JPG", "C:\HP1.JPG")...
  20. E

    Changement d'image

    Bonjour le Forum, J'ai un p'tit soucis, et oui encore 1. Sur mon Classeur j'ai un objet (image) où j'ai une image à l'origine. Je souhaiterais, en faisant un click dessus, changer d'image. Voilà ce que j'ai fait, mais sans résultat. Si vous pouviez me donner un coup de main... Sub son()...