High-Tech Santé Médecine Droit-Finances

Auto-Entrepreneur

Comment faire ?

Rechercher : dans
Par :

[VBA] conditions dans une cellule d'Excel

Dernière réponse le 4 fév 2008 à 18:53:10 Thierry, le 2 mar 2007 à 13:50:07 
 Signaler ce message aux modérateurs

Bonjour,

j'ai un souci avec Excel et Visual Basic.

Je souhaite ecrire dans la cellule d'Excel (1,1) une condition, par exemple, =9. J'ai mis la cellule en format texte pour que le = reste affiché.
Je souhaiterai ensuite comparer les valeurs de la cellule (1,2) a cette condition.

J'ai essayé avec toutes sortes de concatenation du genre =if(A1 & B1=true;1;0) mais ca ne marche pas.

Et ca m'embete de faire une macro du style
If cells(1,1)="=9" then....
Ca marche mais c pas tres flexible!!! :)

Si vous avez un idée, une piste, ou meme une direction ou chercher, ce serait sympa.
Merci d'avance

Configuration: Windows XP
Internet Explorer 6.0

Posez votre question Répondre

1

JvDo, le 3 mar 2007 à 19:01:29

Bonsoir,

je ne comprends pas ce que tu veux faire avec VBA mais je peux te dire qu'il suffit que tu utilises Range("A1").value=Range("A2").value ou encore [A1]=[A2] dans tes IF THEN.

remarques :
je ne vois pas pourquoi tu gardes le égal dans ce que tu appelles (à tort) une condition : =9

tu peux rester dans excel en mettant 9 en A1 et tu utilises une formule (en A3 par ex) =Si(A2=A1;"toto";"titi")
cette dernière approche n'est valable que si tu veux mettre une valeur en A3, valeur qui dépend de l'égalité A2=A1 qui elle est la condition de ta formule SI()

A+

   
Répondre à JvDo

2

thierry, le 4 mar 2007 à 20:22:37

Bonsoir,

d'abord merci d'essayer de repondre a mon probleme.

En fait, c'est plus compliqué que ca. Je voudrais que l'uitilisateur de la feuille Excel, ne puisse avoir le choix pour remplir le cellule (1,1) qu'entre :
≥9
=9
≤9

Il est donc important que le signe =ou ≤ ou ≥ soit visible. (Pour le probleme du choix j'utilise l'option de Validation de données.)

Mon probleme reside donc dans le fait que je n'arrive pas a utiliser ce signe choisi.

En concatenant, on peut ecrire dans une autre case, la valeur de la cellule (1,2) et la condition.
Par exemple, si la case (1,2) contient 10, on obtiendra 10=9 en cellule (1,3). Et je voudrais que la cellule (1,4) affiche donc FAUX (ou aute chose signifiant l'erreur precedente).

La concatenation n'etait qu'une idée, mais si vous aviez une idée pour que si j'ai toute une liste de valeurs en colonne 2, j'ai dans une colonne autre un resultat de la compraraison avec cette "condition" en cellule (1,1).

Merci d'avance

   
Répondre à thierry

3

JvDo, le 4 mar 2007 à 23:20:31
  • +3

Bonsoir,

Ok, il suffit d'utiliser la fonction EVAL(A2&$A$1) où A1 contient =9, >=9 ou <=0, et A2 contient 10 par exemple.

là, ça retournera FAUX.
si tu mets 9 en A2, ça retournera VRAI

NB : EVAL() est une fonction de la bibliothèque Morefunc (http://xcell05.free.fr/downloads/Morefunc.zip ) de Laurent Longre. Il faut donc l'installer d'abord.

Tu peux également écrire ta propre fonction :

Function evalue(montexte As String) As Boolean
evalue = Evaluate(montexte)
End Function

qui fait la même chose

A+

   
Répondre à JvDo

4

Thierry, le 5 mar 2007 à 09:44:29

Ok merci, c pile ce dont j'avais besoin!

Une petite derniere question (un peu part curiosité :))

La fonction evalue définie, n'est pas utilisable comme tel dans Excel. (ecrire dans une cellule, =evalue(B3) ne marche pas).
C'est possible de definir une fonction sous VBA pour l'utiliser sous Excel? Si oui, comment?

A plus

   
Répondre à Thierry

5

JvDo, le 5 mar 2007 à 14:23:39

Bonjour,

evalue(montexte As String) As Boolean est bien entendu une fonction à définir dans VBA.

tu colles le code que je t'ai indiqué dans un module de ton classeur.

ensuite seulement tu pourras l'utiliser

A+

   
Répondre à JvDo

6

Thierry, le 9 mar 2007 à 09:18:24

Merci

mon probleme est resolu, je sais pas s'il faut changer le statut de la conversation ni comment on le fait. Alors si qlq'un sait qu'il n'hesite pas a le faire:::: :)

   
Répondre à Thierry

7

Micou, le 4 oct 2007 à 10:16:18

Bonjour,

pourrai-tu expliquer comment tu mets le format de la cellule en texte. Est-ce par logicielle ou directement dans Excel?

Merci à toi.

   
Répondre à Micou

8

 hey, le 4 fév 2008 à 18:53:10

Bonjour tout le monde,

je voudrais savoir ce qu'on peut faire concretement avec VBA sur excel en finances??
des pistes?

merci

   
Répondre à hey
Posez votre question Répondre
Ils ont besoin de votre aide