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 :

Macro pour faire des additions?


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Candidat au Club
    Femme Profil pro
    Lycéen
    Inscrit en
    Juillet 2018
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Hérault (Languedoc Roussillon)

    Informations professionnelles :
    Activité : Lycéen

    Informations forums :
    Inscription : Juillet 2018
    Messages : 4
    Par défaut Macro pour faire des additions?
    Bonjour,

    Je vous explique. J'ai un tableau dans lequel je calcule les ventes journalière de salariés. Il s'agit de petites quantité et du coup je fais par exemple=1+2+1
    Je voudrais savoir s'il existe une macro (un macro?) pour en gros, cliquer sur la cellule de la personne concernée et rajouter ses ventes du jour pour que la somme se calcule seule, sans avoir à faire ce calcul laborieux, et éviter de risque de tout effacer.

    Merci d'avance et bonne journée

  2. #2
    Expert confirmé
    Homme Profil pro
    Responsable des études
    Inscrit en
    Juillet 2014
    Messages
    2 680
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Aude (Languedoc Roussillon)

    Informations professionnelles :
    Activité : Responsable des études
    Secteur : Santé

    Informations forums :
    Inscription : Juillet 2014
    Messages : 2 680
    Par défaut
    Bonjour,

    Pourquoi vouloir faire une macro ?
    Ce serait plus facile a faire via un Tableau Croisé Dynamique ou même simplement un fonction somme.si

  3. #3
    Membre Expert Avatar de jerome.vaussenat
    Homme Profil pro
    Formateur Bureautique
    Inscrit en
    Janvier 2011
    Messages
    1 629
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 56
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Formateur Bureautique
    Secteur : Enseignement

    Informations forums :
    Inscription : Janvier 2011
    Messages : 1 629
    Par défaut
    Salut,

    Pas mieux que Halaster08 mais avec des liens
    Vers les TCD
    https://silkyroad.developpez.com/excel/tcd/

    Vers les SOMME.SI
    https://fauconnier.developpez.com/tu...mmeprod/#LII-B

    Bonne lecture

  4. #4
    Candidat au Club
    Femme Profil pro
    Lycéen
    Inscrit en
    Juillet 2018
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Hérault (Languedoc Roussillon)

    Informations professionnelles :
    Activité : Lycéen

    Informations forums :
    Inscription : Juillet 2018
    Messages : 4
    Par défaut
    Et bien en fait j'ai une collègue qui a fait un tableau similaire et elle m'a dit que c'est ce qu'elle avait fait...
    Après s'il y a un autre moyen je suis preneuse, je cherche simplement à éviter de faire 1+1+1+1

    Merci pour les liens que j'ai parcouru, mais je ne trouve pas ma solution.
    Sur le tableau de ma collègue, lorsqu'elle cliquait par exemple sur le salarié 102 s'ouvrait une fenêtre où elle rentrait ses ventes du jour, puis en fermant la fenêtre, dans la cellule donc du salarié 102, la somme se calculait seule. C'est ce que je recherche si vous pouvez m'aider

  5. #5
    Expert éminent Avatar de Menhir
    Homme Profil pro
    Ingénieur
    Inscrit en
    Juin 2007
    Messages
    16 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Juin 2007
    Messages : 16 037
    Par défaut
    Si tu mettais dans un message une copie d'écran de tes données, il serait peut-être possible de comprendre plus précisément ce que tu souhaites faire.

  6. #6
    Candidat au Club
    Femme Profil pro
    Lycéen
    Inscrit en
    Juillet 2018
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Hérault (Languedoc Roussillon)

    Informations professionnelles :
    Activité : Lycéen

    Informations forums :
    Inscription : Juillet 2018
    Messages : 4
    Par défaut
    Nom : Capture d’écran 2018-07-20 à 10.09.08.png
Affichages : 1215
Taille : 89,6 Ko

    Voilà.
    Donc sur le salarié 157, j'ai saisie ses ventes. Comme justif on me donne des tickets de caisse en fait, donc c'est pour ça que je me retrouve à faire des additions, je n'ai jamais le total du jour.

    J'aimerai cliquer sur la cellule B43 et n'avoir qu'à rentrer les ventes, sans faire une SOMME en fait, est ce que c'est possible?

  7. #7
    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
    si j'ai bien compris tu cherche à faire double clic sur la valeur à modifier et que tu aura un userform...tu saisie la quantité additionnelle qui s'ajoute à l'ancienne
    si c'est le cas tu as un exemple si joint à adapter
    dans la feuille appropriée

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    With Sheets("Employe")
    Set plage = .Range("A3:D" & .Range("A65536").Row)
    If Not Intersect(Target, plage) Is Nothing And Target.Cells.Count = 1 Then
    UserForm1.Show
    Cancel = True
    End If
    End With
    End Sub
    et un userform avec 4 textbox et deux bouton de commande

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    Private Sub CommandButton1_Click()
    Unload Me
    End Sub
     
    Private Sub CommandButton2_Click()
    ActiveCell.Value = ActiveCell.Value + CDbl(TextBox4.Value)
    TextBox1.Value = ""
    TextBox2.Value = ""
    TextBox3.Value = ""
    TextBox4.Value = ""
    End Sub
     
    Private Sub UserForm_Initialize()
    Dim Lig As Long
    Lig = ActiveCell.Row
    UserForm1.TextBox1.Text = Cells(1, ActiveCell.Column)
    UserForm1.TextBox2.Text = Cells(Lig, 1)
    UserForm1.TextBox3.Text = ActiveCell.Value
    End Sub
    Fichiers attachés Fichiers attachés

  8. #8
    Membre Expert
    Avatar de Igloobel
    Homme Profil pro
    Développeur ERP - VBA et Formateur bureautique
    Inscrit en
    Septembre 2005
    Messages
    1 871
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Loiret (Centre)

    Informations professionnelles :
    Activité : Développeur ERP - VBA et Formateur bureautique
    Secteur : Industrie

    Informations forums :
    Inscription : Septembre 2005
    Messages : 1 871
    Billets dans le blog
    1
    Par défaut
    Bonjour,

    si tu mets un apostrophe (') avant le = tu vois la formule sans qu'elle s'exécute

    Est-ce que c'est cela que tu veux ?

  9. #9
    Expert éminent Avatar de Menhir
    Homme Profil pro
    Ingénieur
    Inscrit en
    Juin 2007
    Messages
    16 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Juin 2007
    Messages : 16 037
    Par défaut
    Citation Envoyé par dollylevi Voir le message
    Donc sur le salarié 157, j'ai saisie ses ventes. Comme justif on me donne des tickets de caisse en fait, donc c'est pour ça que je me retrouve à faire des additions, je n'ai jamais le total du jour.
    J'aimerai cliquer sur la cellule B43 et n'avoir qu'à rentrer les ventes, sans faire une SOMME en fait, est ce que c'est possible?
    En gros, si j'ai bien compris, tu as plusieurs valeurs qui, une fois additionnées, vont donner la valeur d'une des cases, par exemple B43.

    Je ne vois pas de solution plus simple qu'une addition.
    De toute façon, il faudra forcément appuyer sur une touche pour séparer une valeur de la suivante. Si ce n'est pas "+", ce sera "Entrée" ou "Tab", il y aura forcément quelque chose.
    A moins que ces valeurs soient déjà saisie ailleurs dans la feuille mais ça ne semble pas être le cas, puisque tu dis qu'elles proviennent de tickets (je suppose que c'est du papier).

    A la limite, si le prix est intégré à un code-à-barre, il est possible de créer une application qui va le saisir juste avec une douchette.

    Mais je ne vois vraiment pas de solution pour simplifier ton processus, à part faire l'addition de tête.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [LibreOffice][Tableur] Erreur #N/D une aide pour faire des macros Merci
    Par dpataya62 dans le forum OpenOffice & LibreOffice
    Réponses: 1
    Dernier message: 19/01/2016, 08h19
  2. [XL-2007] Macro pour faire des addidtions et soustractions avec textbox dans un userform/Planning
    Par Danny.adh1 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 26/09/2015, 13h52
  3. [FASM] Créer une macro pour faire des chaînes explicites
    Par Forthman dans le forum Assembleur
    Réponses: 0
    Dernier message: 30/07/2014, 09h36
  4. [XL-2010] Macro pour boucler dans une liste pour faire des tableaux/onglets
    Par Souris1 dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 09/09/2013, 17h25
  5. [XL-2010] Créer un macro pour faire récapitulatif des titres à 2 nombres d'une liste
    Par leflohic dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 10/01/2013, 14h52

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