[VB]comment entre 3 valeurs faire apparaitre la plus basse?

comment entre 3 valeurs faire apparaitre la plus basse? [VB] - VB/VBA/VBS - Programmation

Marsh Posté le 26-03-2007 à 12:24:14    

Bonjour,
Edit
 
J'ai encore une petite question. J'ai 3 cellules sous Excel contenant chacune d'elle une valeur. Existe t il une fonction sous vb pour faire apparaitre la valeur la plus faible dans une "msgbox". Car la seule solution que j'ai trouvé c'est a base de if valeur1 > valeur2 etc.. et c'est un peu long.
Merci beaucoup
 
 
j'ai une question a vous poser. Sauriez vous me dire comment on peut faire la somme de plusieurs cellules sous Visual basic?
Je m'explique, j'ai 356 lignes a additionner dans une colonne comment puis je faire?
Merci par avance


Message édité par Profil supprimé le 27-03-2007 à 15:07:56
Reply

Marsh Posté le 26-03-2007 à 12:24:14   

Reply

Marsh Posté le 26-03-2007 à 12:25:53    

tu fais une somme des .value...
ou alors j'ai mal compris ta question :sweat:

Reply

Marsh Posté le 26-03-2007 à 12:35:53    

c'est quoi tes "cellules" ?
 
t'es dans excel ?

Reply

Marsh Posté le 26-03-2007 à 12:42:03    

MagicBuzz a écrit :

c'est quoi tes "cellules" ?

 

t'es dans excel ?

 


Oui j'ai des valeurs en colonnes sous Excel. Sur 356 lignes. Et je voudrais dans visual basic trouver quelque chose permettant de faire la somme de toutes ces lignes. En fait additionner les valeurs de la colonne 1 et de la ligne 1 à la ligne 356 :jap:


Message édité par Profil supprimé le 26-03-2007 à 12:42:47
Reply

Marsh Posté le 26-03-2007 à 12:48:39    

   Cells(357, 1).Value2 = "=sum(A1:A356)"
    MsgBox Cells(357, 1).Value

Reply

Marsh Posté le 26-03-2007 à 12:54:54    

MagicBuzz a écrit :

Cells(357, 1).Value2 = "=sum(A1:A356)"
    MsgBox Cells(357, 1).Value


 
Merci beaucoup je vais tester ca  
 :jap:  :jap:

Reply

Marsh Posté le 26-03-2007 à 12:55:57    

sinon, y'a aussi la méthode bourrin : tu parses chaque cellule, et tu incrémente une variable avec la valeur de la cellule.

Reply

Marsh Posté le 26-03-2007 à 12:56:51    

MagicBuzz a écrit :

sinon, y'a aussi la méthode bourrin : tu parses chaque cellule, et tu incrémente une variable avec la valeur de la cellule.


 
ok je teste et vous dis ca :jap:  :)  
 
C'est parfait ta première méthode est exactement ce que je cherchais merci beaucoup


Message édité par Profil supprimé le 27-03-2007 à 08:00:53
Reply

Marsh Posté le 27-03-2007 à 18:59:23    

j'ai trouvé ceci mais je n'arrive pas à le mettre avec la forme msgbox
 
public sub moinscher ()
cells (1, 1).value= "=(min(C3, D3, E3 ))"
end sub
 
si jamais tu as une idée...
 
merci beaucoup...
cordialement


Message édité par Profil supprimé le 29-03-2007 à 07:49:45
Reply

Marsh Posté le 28-03-2007 à 13:37:52    

msgbox=application.min(range(cells(1,1),cells(3,1)))

Reply

Marsh Posté le 28-03-2007 à 13:37:52   

Reply

Marsh Posté le 29-03-2007 à 07:50:08    

aprilthe5ith a écrit :

msgbox=application.min(range(cells(1,1),cells(3,1)))


 
 
Testé et approuvé. Merci beaucoup :jap:

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed