High-Tech Santé Médecine Droit-Finances

Auto-Entrepreneur

Comment faire ?

Rechercher : dans
Par :

Macro excel valeur de cellule

Dernière réponse le 18 jun 2008 à 16:11:31 lucho33, le 11 jun 2008 à 14:07:33 
 Signaler ce message aux modérateurs

Bonjour à tous,

voici mon problème:
j'ai une valeur de départ L
if range("Ax").value > L, then
L= range("Ax").value
else
On garde la dernière valeur de L
c'est au niveau de la formulation de cette condition que je bloque, comment peut on faire ???

Merci d'avance pour vos réponses!!!
ouais ouais je sais pour la fete des pères je vais demander un livre sur la prog!!!

Configuration: Windows XP
Internet Explorer 7.0

Meilleures réponses pour « macro excel valeur de cellule » dans :
Télécharger MOREFUNC (Macro complémentaire EXCEL) VoirMorefunc est une macro complémentaire proposant 67 nouvelles fonctions de feuille de calcul pour Excel. Ces fonctions sont compatibles avec Excel 95 à 2007. Elles ne sont pas portables sur d'autres plate-formes que Windows, ni sur d'autres...
Exécuter une macro VoirExécuter une macro Excel et Calc proposent plusieurs façons d’exécuter une macro : en la sélectionnant dans une liste, dans la boîte de dialogue Macro ; par un raccourci clavier ; en l’attachant à un bouton de la barre d’outils ; ...
Posez votre question Répondre

1

onesdf, le 11 jun 2008 à 14:11:04

Else rien du tout, End If

   
Répondre à onesdf

11

lucho33, le 12 jun 2008 à 13:40:57

Yes !!!

merci
je met ca en place et je test!!!

   
Répondre à lucho33

2

lermite222, le 11 jun 2008 à 16:28:22

Salut tous, 

Sub J_Apprend()
    L = 12
    If Range("A1").Value > L Then
        MsgBox Range("A1").Address & " est plus grand que " & L
    Else
        MsgBox Range("A1").Address & " est plus petit que " & L
    End If
End Sub

A+ L'expérience instruit plus sûrement que le conseil. (André Gide)  

   
Répondre à lermite222

3

onesdf, le 11 jun 2008 à 16:29:55

Salut, 

    Else
        MsgBox Range("A1").Address & " est plus petit ou égal à  " & L


:)

   
Répondre à onesdf

4

lermite222, le 11 jun 2008 à 16:33:56

Bonjour à toi,
Question ?

pas compris ta remarque

EDIT:
Zut, vient juste de comprendre, et tu a raison.
EDIT2:
mais j'avais déjà rectifier L'expérience instruit plus sûrement que le conseil. (André G­ide)  

   
Répondre à lermite222

5

lermite222, le 11 jun 2008 à 16:34:52

Autre essai 

Sub J_Apprend()
    L = 12
    If Range("A1").Value > L Then
        MsgBox Range("A1").Address & " est plus grand que " & L
    ElseIf Range("A1").Value < L Then
        MsgBox Range("A1").Address & " est plus petit que " & L
    Else
        MsgBox Range("A1").Address & " est égale à " & L
    End If
End Sub
L'expérience instruit plus sûrement que le conseil. (André Gide)  

   
Répondre à lermite222

12

lucho33, le 12 jun 2008 à 13:42:04

Merci a toi aussi !!!!

   
Répondre à lucho33

6

gbinforme, le 11 jun 2008 à 16:51:38

Bonjour

Pour répondre à la question de départ de lucho33, il suffit de mettre ceci sur une ligne 

if range("Ax").value > L then L= range("Ax").value

Cela te permet en fin de boucle d'avoir la plus grande valeur dans L que tu initialises à zéro.
Toujours zen

   
Répondre à gbinforme

7

lermite222, le 11 jun 2008 à 16:53:17

Salut toi,.. oui mais sa question était ELSE L'expérience instruit plus sûrement que le conseil. (André G­ide)  

   
Répondre à lermite222

8

gbinforme, le 11 jun 2008 à 17:08:33

Bonjour lermite222

c'est au niveau de la formulation de cette condition que je bloque,

Donc la formulation n'as pas besoin de else... me parait répondre au blocage.
Toujours zen

   
Répondre à gbinforme

9

lermite222, le 11 jun 2008 à 17:18:41

Salut,
je crois que tu a répondu à sa question. L'expérience instruit plus sûrement que le conseil. (André G­ide)  

   
Répondre à lermite222

10

gbinforme, le 11 jun 2008 à 17:22:43
  • +1

RE :

C'est le demandeur qui en fera ce qu'il veut et nous dira son resenti éventuellement :
nos discussions ne servent qu'à faire avancer le "schmilibick"
@+
Toujours zen

   
Répondre à gbinforme

13

lucho33, le 12 jun 2008 à 13:43:38

Salut gars!!

oui en fait je me suis trop compliqué la tete!!
comme on dis pourquoi faire compliqué quand on peut faire simple!!

je vais mettre ca en place et tester!!!

   
Répondre à lucho33

14

lucho33, le 13 jun 2008 à 15:58:06

Salut,

autre petite question, j'ai donc fait cette formuel ci dessous et ça marche
if range("Ax").value > L then L= range("Ax").value

et après je fais :

If Range("C200").Value > L +50 Then
Range("T1005").Value = "achat"
End If

et la j'ai une erreur avec L+50 et je trouve rien avec l'aide, j'ai meme essayer d'ajouter une ligne a part du genre

M=L+50
If Range("C200").Value > M Then
Range("T1005").Value = "achat"
End If

mais ça ne fonctionne pas non plus!! saurais tu m'aider??
Merci

   
Répondre à lucho33

15

lermite222, le 13 jun 2008 à 20:41:44

Ca devrait fonctionné, c'est qu'il y a une anicroche dans la macro,
si tu pouvais la mettre en entier ce serais plus facile. L'expérience instruit plus sûrement que le conseil. (André G­ide)  

   
Répondre à lermite222

16

lucho33, le 16 jun 2008 à 09:25:13

Ouais bah finalement ca fonctionne!! j'avais essayé sous Excel 2003 ca n'allait pas et sous Excel 2007 ca fonctionne donc c'est le principal!!
Merci !!

   
Répondre à lucho33

17

lucho33, le 18 jun 2008 à 11:15:38

Hello,

je te sollicite encore, juste pour la macro elle fonctionne et j'obtiens une valeur pour L mais lorsque je rejoue la macro la valeur n'existe plus. il y a t-il une astuce pour garder en mémoire une valeure entre deux fois ou on rejoue la macro??

   
Répondre à lucho33

18

lermite222, le 18 jun 2008 à 14:01:51

A la place de dim mettre
Static S
La variable reste disponnible dans la macro.
L'expérience instruit plus sûrement que le conseil. (André G­ide)  

   
Répondre à lermite222

19

lucho33, le 18 jun 2008 à 15:06:30

Merci

   
Répondre à lucho33

20

lucho33, le 18 jun 2008 à 15:16:51

Encore une question, pôur les macros t'as appris ca sur le tas ou t'as une bonne lecture a conseiller????

   
Répondre à lucho33

21

 lermite222, le 18 jun 2008 à 16:11:31

En lisant beaucoup et surtout en me servant de F1...
Et dans ton cas, déclaration de variable t'aideras.
A+ L'expérience instruit plus sûrement que le conseil. (André G­ide)  

   
Répondre à lermite222
Posez votre question Répondre
Ils ont besoin de votre aide
Collection CommentÇaMarche.net