scruter valeur colonne Excel avec VBA
Répondre à la discussion
Affichage des résultats 1 à 29 sur 29

scruter valeur colonne Excel avec VBA



  1. #1
    seb6051

    scruter valeur colonne Excel avec VBA


    ------

    bonjour,

    je voudrai avoir un petit programme permettant de scruter toute la colonne et d'afficher dans une case la valeur la plus grande .
    Merci

    -----

  2. #2
    cherbe

    Re : scutter valeur colomne Excel avec VBA

    Bonjour
    Utilise la fonction MAX()

  3. #3
    cherbe

    Re : scutter valeur colomne Excel avec VBA

    Citation Envoyé par cherbe Voir le message
    Bonjour
    Utilise la fonction MAX()
    Si tu tiens vraiment à le faire en VBA :
    Code:
    sub toto()
          maxi=0
          range("A1").select
          do while activecell.value<>""
             if activecell.value > maxi then
                 maxi=activecell.value
             end if
            cells.offset(1,0).select
          loop
          msgbox "la valeur la plus élevée est " & maxi
    end sub

  4. #4
    seb6051

    Re : scruter valeur colonne Excel avec VBA

    bonjour ,

    peux m'expliquer les syntaxe en detail stp
    je debut en VB
    merci beaucoups

  5. A voir en vidéo sur Futura
  6. #5
    cherbe

    Re : scutter valeur colomne Excel avec VBA

    Code:
    sub toto() '                                  déclaration de la routine
          maxi=0 '                                          déclaration de la variable "maxi" et affectation de la valeur zéro 
          range("A1").select'                            sélection de la cellule A1
          do while activecell.value<>"" '           tant que la cellule active est non vide
             if activecell.value > maxi then '       si la cellule active contient une valeur supérieure à la variable "maxi"
                 maxi=activecell.value   '             dans ce cas, on remplace la valeur de maxi par celle de la cellule
             end if '                                         fin de la condition IF
            cells.offset(1,0).select '                   sélection de la ligne suivante  
          loop    '                        '                   fin de la condition do while
          msgbox "la valeur la plus élevée est " & maxi  ' on affiche une boite dialogue indiquant la valeur maximum 
    end sub                          '                      fin de la routine
    Si tu as un peu de vocabulaire anglais, c'est lisible en direct
    Sinon, n'espère même pas programmer ou alors ce sera très dur !

  7. #6
    seb6051

    Re : scruter valeur colonne Excel avec VBA

    bonjour ,
    Merci beaucoups pour ces explication .
    Bien entendu certaine chose que j'ai colprise grace à l'anglais mais par exemple
    cette expression :activecell.value<>"" "on parle d activé la celulle et de valeur mais ce sympoile <> qui signifie apparement vide
    faut le savoir
    donc les explications sont tre bein faite encore merci

  8. #7
    seb6051

    Re : scruter valeur colonne Excel avec VBA

    j'ai un soucis dans tous mon programme il me dit erreur 1004
    j'envoi le programme -->
    http://www.cjoint.com/c/FDig7JRvK66

  9. #8
    cherbe

    Re : scruter valeur colonne Excel avec VBA

    Citation Envoyé par seb6051 Voir le message
    cette expression :activecell.value<>"" "on parle d activé la celulle et de valeur mais ce sympoile <> qui signifie apparement vide
    non, on ne parle pas d'activité. activecell signifie cellule sélectionnée. C'est de l'Anglais, les mots d'origine françaises n'ont pas forcément le même sens !

    <> signifie "différent de". Quand on écrit 'activecell.value<>"" ', cela veut dire différent de vide.
    Tu ne peux pas programmer si tu n'as pas intégré ces symboles et autres signes.

  10. #9
    Chanur

    Re : scruter valeur colonne Excel avec VBA

    Bonjour,

    Pour le cas où la colonne ne comprendrait que des valeurs négatives, il vaudrait mieux initialiser maxi à la première valeur de la colonne plutôt qu'à 0.
    Ce qui se conçoit bien s'énonce clairement ; et les mots pour le dire arrivent aisément.

  11. #10
    cherbe

    Re : scruter valeur colonne Excel avec VBA

    Citation Envoyé par Chanur Voir le message
    Bonjour,
    Pour le cas où la colonne ne comprendrait que des valeurs négatives, il vaudrait mieux initialiser maxi à la première valeur de la colonne plutôt qu'à 0.
    Oui c'est une bonne solution. On a procédé ainsi dans l'exemple car en VBA, on connait à priori les bornes approximatives des données à explorer mais j'en conviens, c'est une mauvaise habitude !

  12. #11
    seb6051

    Re : scruter valeur colonne Excel avec VBA

    ok je comprends non je reconnais ne pas avoir de bases solides vous me conseillez quoi comme site pour les cours pour apprendre un minimum
    car j'en ai vu plein de site mais pour commencer réellement j'aimerai vos avis
    oui on ma fais un programme VB et s est tellement complexe que j'ai vraiment du mal j'ai l'impression d etre face a un mur et pas pouvoir passer par dessus si j'ose l'expression
    Encore merci

  13. #12
    cherbe

    Re : scruter valeur colonne Excel avec VBA

    Citation Envoyé par seb6051 Voir le message
    vous me conseillez quoi comme site pour les cours pour apprendre un minimum
    Commence par celui-ci.
    Citation Envoyé par seb6051 Voir le message
    oui on ma fais un programme VB et s est tellement complexe que j'ai vraiment du mal j'ai l'impression d etre face a un mur
    Même pour un programmeur chevronné, c'est très difficile de "mettre le nez" dans un programme tout fait si il n'est pas correctement commenté.
    Donc pour un débutant, c'est impossible à moins d'être hyper doué !

  14. #13
    seb6051

    Re : scruter valeur colonne Excel avec VBA

    Merci tres bien expliquer en plus fait par toi même chapeau mais sa serait cool de faire des exemple avec youtube je vais voir ça ce week end mais tu as l'air tres caler sur ce langage. Sinon comment fait on pour virer un programme vba de excel pour eviter qu'il nous créer des conflits ?
    Encore merci
    Dernière modification par seb6051 ; 08/04/2016 à 15h54.

  15. #14
    cherbe

    Re : scruter valeur colonne Excel avec VBA

    Citation Envoyé par seb6051 Voir le message
    Sinon comment fait on pour virer un programme vba de excel pour eviter qu'il nous créer des conflits ?
    Tu as quelle version d'Excel ?

  16. #15
    seb6051

    Re : scruter valeur colonne Excel avec VBA

    version 14.0.7166.5000
    année: 2010

  17. #16
    cherbe

    Re : scruter valeur colonne Excel avec VBA

    Citation Envoyé par seb6051 Voir le message
    version 14.0.7166.5000
    Dans ce cas, il suffit d'enregistrer le fichier dans le format courant, xlsx je crois ? Les macros seront supprimées et tu auras toujours l'ancienne version avec macro si tu souhaites y revenir.

  18. #17
    seb6051

    Re : scruter valeur colonne Excel avec VBA

    bonjour ,
    j'ai inserer mon programme a la suite de ce que j'ai envoyer dans le fichier ci-joint dans la partie "cls traitement" a la suite de ce morceau de programme :

    If collData.Count < 2 Then Exit Sub

    For Each pt In collData
    moy = moy + pt.valeur
    Next
    moy = moy / collData.Count
    newPage.Cells(collData.Count + 2, 1) = collData(1).dt
    newPage.Cells(collData.Count + 2, 1).NumberFormat = "h:mm;@"
    newPage.Cells(collData.Count + 2, 2) = moy
    newPage.Cells(collData.Count + 3, 1) = collData(collData.Count).dt
    newPage.Cells(collData.Count + 3, 1).NumberFormat = "h:mm;@"
    newPage.Cells(collData.Count + 3, 2) = moy

    End Sub

    Private Sub CreateChartMoy()

    ac.SeriesCollection.NewSeries
    ac.SeriesCollection(2).XValues = "=Rapport!$A$" & collData.Count + 2 & ":$A$" & collData.Count + 3
    ac.SeriesCollection(2).Values = "=Rapport!$B$" & collData.Count + 2 & ":$B$" & collData.Count + 3
    "sub toto()
    maxi=0
    range("A1").select
    do while activecell.value<>""
    if activecell.value > maxi then
    maxi=activecell.value
    end if
    cells.offset(1,0).select
    loop
    msgbox "la valeur la plus élevée est " & maxi
    end sub"
    End Sub
    mais lors de l’exécution j'ai une erreur .
    Dernière modification par seb6051 ; 11/04/2016 à 08h40.

  19. #18
    Chanur

    Re : scruter valeur colonne Excel avec VBA

    Citation Envoyé par seb6051 Voir le message
    lors de l’exécution j'ai une erreur .
    Quelle erreur ?

    Lire un programme est déjà difficile.
    Ça ne sert à rien de mettre une deuxième énigme.
    Là on doit comprendre comment ça marche (sachant que ce n'est pas évident puisque toi qui l'as écrit tu ne le comprends pas) et en plus deviner le résultat que tu obtiens.
    Ce qui se conçoit bien s'énonce clairement ; et les mots pour le dire arrivent aisément.

  20. #19
    seb6051

    Re : scruter valeur colonne Excel avec VBA

    Bonjour ,
    j'essaye le programme que tu m'a donné dans une nouvelle feuille excel
    j'ai mis des nombre dans la colonne A et il m'indique 'erreur execution 1004"

    Nom : probleme VB.JPG
Affichages : 233
Taille : 69,6 Ko

  21. #20
    cherbe

    Re : scruter valeur colonne Excel avec VBA

    Citation Envoyé par seb6051 Voir le message
    mais lors de l’exécution j'ai une erreur .
    Bonjour
    Il est demandé d'indenter le code !
    Tu commences avec un IF sans END IF ;
    On insère pas une routine (sub) à l'intérieur d'une autre ;
    Tu as une quote devant sub toto.
    Dernière modification par cherbe ; 11/04/2016 à 10h24.

  22. #21
    cherbe

    Re : scruter valeur colonne Excel avec VBA

    j'ai mis des nombre dans la colonne A et il m'indique 'erreur execution 1004
    Sans savoir sur quelle ligne ça bloque, ça va être difficile !
    Dernière modification par cherbe ; 11/04/2016 à 10h27.

  23. #22
    cherbe

    Re : scruter valeur colonne Excel avec VBA

    Citation Envoyé par seb6051 Voir le message
    Bonjour ,
    j'ai mis des nombre dans la colonne A et il m'indique 'erreur execution 1004"
    Réfléchis une seconde : tu lui demandes d'activer un onglet, donc un seul élément, donc pas de pluriel à Worksheet
    essaie : Sheet("essai1")activate

  24. #23
    seb6051

    Re : scruter valeur colonne Excel avec VBA

    voila ce que ça me fais ça bloque au niveau de "sub toto () "

    pb vb 1.JPG
    pb vb 2.JPG

  25. #24
    seb6051

    Re : scruter valeur colonne Excel avec VBA

    Probleme resolu avec cette syntaxe :
    Sub valmax()
    MsgBox [max(B1:b5)]


    End Sub
    a ne pas oublier le
    'call valmax"

  26. #25
    cherbe

    Re : scruter valeur colonne Excel avec VBA

    C'était ma 1ère proposition !

  27. #26
    seb6051

    Re : scruter valeur colonne Excel avec VBA

    bonjour ,
    je reviens vers vous pour demandez comment je peut faire pour que la personne ai juste a cliquer sur un bouton pour que la maccro s execute j'ai mit un bouton
    et j'ai inserer dans le module
    Public Sub Traitement()
    If CommandButton1 = True Then
    Dim tr As New clsTraitement
    tr.Traitement
    End If
    End Sub
    merci pour votre aide

  28. #27
    fregoli

    Re : scruter valeur colonne Excel avec VBA

    Bonjour,

    pourquoi t'em..beter avec VBA si tu ne sais pas programmer du tout, sauf si c'est pour apprendre bien sur:
    Si tu cherche à afficher en permanence le nombre maximum de ceux contenus dans la colone A, alors en B1 tu mets la formule "=MAX(A:A)" (sans les quotes bien sûr) et pas besoin de bouton, le maximum s'affichera en permanence dès qu'un nombre sera modifié dans la colonne A.

    Remarque: tu devrais peut être suivre une formation excel.

  29. #28
    seb6051

    Re : scruter valeur colonne Excel avec VBA

    bonjour oui bien sur s est pour apprendre

  30. #29
    fregoli

    Re : scruter valeur colonne Excel avec VBA

    Bonjour,

    Ok,
    Mon conseil avant de commencer la programmation VBA, c'est déjà de regarder les fonctions prédéfinies que tu peux mettre dans une cellule (le fx dans le champ de saisie en leiu et place d'une valeur).
    Pour le maximum d'une colonne, par exemple, fais ce que je t'ai indiqué, ensuite profite de l'aide intégrée pour voir toutes les formules que tu peux utiliser.
    Ensuite un bon site d'aide et d'explications: https://web.archive.org/web/20150919....excelabo.net/

    Tu trouveras là, beaucoup d'explications sur les formules et le VBA (je ne pense pas que tu pourras télécharger les exemples).
    Il y a aussi http://excel.developpez.com/ très didactique
    Tu pourras aussi voir http://lecompagnon.info/vba-excel/vb...m#.Vx9sanq8oXB qui est pas mal
    et aussi http://codes-sources.commentcamarche...-1/15-vba/last pour des exemples complets assez chiadés.

    Bon courage
    Une allumette peut aussi faire déborder le vase...

Discussions similaires

  1. Supprimer les zeros de chaque colonne d'un matrice sans changer le nombre de colonne avec Matlab
    Par invite03f9a584 dans le forum Programmation et langages, Algorithmique
    Réponses: 2
    Dernier message: 21/01/2013, 21h20
  2. excel valeur du croisement avec axe abscisses
    Par killboul dans le forum Logiciel - Software - Open Source
    Réponses: 2
    Dernier message: 16/05/2012, 12h35
  3. EXCEL : Exo C2I, formules sur toutes la colonne.
    Par invitefa80cfd4 dans le forum Logiciel - Software - Open Source
    Réponses: 2
    Dernier message: 13/05/2012, 21h06
  4. Copier une colonne sur Excel avec macro
    Par invite90c5d9d9 dans le forum Logiciel - Software - Open Source
    Réponses: 3
    Dernier message: 15/02/2009, 15h39