IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Création bouton insertion nouvel icone


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Nouveau candidat au Club
    Femme Profil pro
    Assistante de direction
    Inscrit en
    Juillet 2022
    Messages
    1
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 36
    Localisation : Suisse

    Informations professionnelles :
    Activité : Assistante de direction
    Secteur : Service public

    Informations forums :
    Inscription : Juillet 2022
    Messages : 1
    Par défaut Création bouton insertion nouvel icone
    Bonjour à tous,

    Je me permets de créer ce poste, car je suis un peu beaucoup novice en Excel.

    Je souhaiterais créer un bouton sur un fichier Excel qui insérerait automatique une forme.

    J'ai réussi à créer le bouton, mais pas à faire en sorte que quand on clique dessus la forme "Post-it" s'insère

    Voici le "look" que mon post-it aurait Nom : Exemple Post-it Excel.JPG
Affichages : 103
Taille : 25,4 Ko

    Merci beaucoup pour vos retours et belle journée à tous.

  2. #2
    Expert confirmé Avatar de BENNASR
    Homme Profil pro
    Responsable comptable & financier
    Inscrit en
    Décembre 2013
    Messages
    2 974
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Responsable comptable & financier
    Secteur : Finance

    Informations forums :
    Inscription : Décembre 2013
    Messages : 2 974
    Par défaut
    Bonjour
    pour créer une forme dans la cellule active :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    Sub Macro1()
        With Worksheets("Feuil1").Shapes.AddShape(msoShapeRectangle, _
                ActiveCell.Left, _
                ActiveCell.Top, _
                ActiveCell.Width, _
                ActiveCell.Height)
            .OnAction = "'InformationsShape " & Chr(34) & Date & Chr(34) & _
                "," & Chr(34) & Time & Chr(34) & "'"
        End With
    End Sub
    pour lecture (lien ou j'ai reproduit ce code) :

Discussions similaires

  1. Réponses: 5
    Dernier message: 26/05/2021, 15h11
  2. [XL-2010] Création d'un nouvel onglet via bouton à partir d'un onglet "template"
    Par chabadoum dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 19/06/2018, 15h40
  3. [XL-2013] Création d'un bouton insertion ligne
    Par phebus471321 dans le forum Macros et VBA Excel
    Réponses: 15
    Dernier message: 14/07/2017, 16h49
  4. Réponses: 2
    Dernier message: 14/04/2006, 08h48
  5. Insertion nouvelle vue dans oracle discoverer
    Par Jean-Matt dans le forum Oracle
    Réponses: 4
    Dernier message: 18/11/2004, 17h24

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo