Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 VBA - Comment chercher, trouver et renseigner dans une variable, la plus grande valeur d'une colonne ?

13Hubert

XLDnaute Junior
Bonjour à tous,

Tout est dans le titre...

Je cherche à savoir comment chercher, trouver et renseigner dans une variable, la plus grande valeur d'une colonne...
Ceci, afin de coller dans une Msgbox la valeur trouvée... (Mais ça, je saurais faire. Au moins ça ! )

Merci très beaucoup plein pour votre aide !
 
Solution
Bonjour,
En adaptant le nom de la feuille et le numéro de la colonne, ceci peut-être
VB: 
MsgBox Application.Max(Sheets("Feuil1").Columns(1))
Ou avec une variable
Code: 
Sub test()
    Dim maVariable As Double
    maVariable = Application.Max(Sheets("Feuil1").Columns(1))
    MsgBox maVariable
End Sub
Trier par date Trier par votes

Jacky67

XLDnaute Barbatruc
Bonjour,
En adaptant le nom de la feuille et le numéro de la colonne, ceci peut-être
VB: 
MsgBox Application.Max(Sheets("Feuil1").Columns(1))
Ou avec une variable
Code: 
Sub test()
    Dim maVariable As Double
    maVariable = Application.Max(Sheets("Feuil1").Columns(1))
    MsgBox maVariable
End Sub
 
Vote positif 0 Vote négatif
Solution

13Hubert

XLDnaute Junior
Hello Jacky

C'est exactement ce que je cherchais et ça fonctionne nickel.

Je ne connais encore pas le fonctionnement de "Application" et j'en ai, là, un exemple !

J'avais dévié le truc en allant chercher le contenu d'une cellule dans laquelle j'avais la fonction "=GRANDE.VALEUR(N!D21000; 1)" pour la coller dans une variable, mais là, c'est bien plus propre !

Merci beaucoup !

Qu'est-ce que j'aime ce site !
C'est une mine d'or et les mineurs de grands partageurs !!
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

  • Question
XL 2016 Vérifier si la valeur d'une cellule est plus grande que 1
Réponses
10
Affichages
754
dindin
Z
  • Question
XL 2021 VBA Prélèvement d'une donnée si une valeur recherchée est identique
Réponses
3
Affichages
207
ZiM
Z
L
  • Résolu(e)
Microsoft 365 VBA - Attribuer mise en forme en fonction de valeur cellule d'une liste
Réponses
14
Affichages
396
Laliepomm
L
M
  • Question
Microsoft 365 trouver la dernière valeur numérique non nulle dans une colonne comportant des cellules vides et des cellules avec la valeur zéro.
Réponses
5
Affichages
546
matgrim
M
  • Question
XL 2019 trouver la valeur la plus citée dans cellule de même couleur - résolu
Réponses
2
Affichages
308
gigiwin
A
  • Question
XL 2016 Reprendre la valeur d'une cellule dans le titre d'un graphique...
Réponses
5
Affichages
417
Orson83
K
  • Question
XL 2019 VBA colorer les cellules et éliminer les cellules en rouge dans le calcul de plus proche valeur
Réponses
3
Affichages
255
KAMARY
K
S
  • Résolu(e)
Microsoft 365 Automatiser une RechercheV en fonction de la valeur d'une colonne
Réponses
13
Affichages
627
Phil69970
P
  • Question
XL 2019 Bloquer la saisie dans une colonne sous condition
Réponses
1
Affichages
214
sylvanu
D
  • Question
Microsoft 365 Cas réel - avec problème complexe sur de la prevision de match en evitant les doublons
Réponses
1
Affichages
325
Dock91
D
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…