Aide VBA
messin57000
Messages postés
72
Statut
Membre
-
messin57000 Messages postés 72 Statut Membre -
messin57000 Messages postés 72 Statut Membre -
Bonjour,
j'ai fait une macro mais j'essaye de la simplifier car la methode avec la quelle jj'ai procedé je la trouve trop lourde.
voici le fichier : http://cjoint.com/13oc/CJhj66Rbmv0.htm
en fait je souhaite remplir les 4 case vert tol+ et tol - en fonction du choix du matériaux et temperature.
si le mteraix c'est X et temperature -30 , aller chercher les bonnes valeures de tol+ et tol- dans le tableau de droite et les remplir dans 4 case verte dans le tableau de guauche etc...
il y'a 3 materaiux (X, FKM et EPDM) et 3 temperature ( -30, 23 et 120).
J'ai essayé avec des IF mais c'est trop lourd...
Sub test()
If Cells(2, 8) = "X" Then Cells(7, 3) = Cells(4, 13)
If Cells(2, 8) = "X" Then Cells(7, 4) = Cells(4, 14)
If Cells(2, 8) = "X" Then Cells(8, 3) = Cells(4, 15)
If Cells(2, 8) = "X" Then Cells(8, 4) = Cells(4, 16)
...
End Sub
Merci d'avance
j'ai fait une macro mais j'essaye de la simplifier car la methode avec la quelle jj'ai procedé je la trouve trop lourde.
voici le fichier : http://cjoint.com/13oc/CJhj66Rbmv0.htm
en fait je souhaite remplir les 4 case vert tol+ et tol - en fonction du choix du matériaux et temperature.
si le mteraix c'est X et temperature -30 , aller chercher les bonnes valeures de tol+ et tol- dans le tableau de droite et les remplir dans 4 case verte dans le tableau de guauche etc...
il y'a 3 materaiux (X, FKM et EPDM) et 3 temperature ( -30, 23 et 120).
J'ai essayé avec des IF mais c'est trop lourd...
Sub test()
If Cells(2, 8) = "X" Then Cells(7, 3) = Cells(4, 13)
If Cells(2, 8) = "X" Then Cells(7, 4) = Cells(4, 14)
If Cells(2, 8) = "X" Then Cells(8, 3) = Cells(4, 15)
If Cells(2, 8) = "X" Then Cells(8, 4) = Cells(4, 16)
...
End Sub
Merci d'avance
1 réponse
-
Bonjour,
Pourquoi ne pas se contenter de formules recherchev ??
regarde le fichier :
https://www.cjoint.com/?CJhlcGqzhv3
tes cases vertes sont renseignées d'après une formule.-
ah oui c'est parfait mais je suis un peu novice en excel donc merci pour l'info recherche V mais par contre je sais pas comment ta fait ca... car ta pas pris en compte la temperature et je saurai pas faire.
et un autre point est-ce possible de faire une liste déroulante dans le materiaux et la temperature? pour le choix
Merci beaucoup melaine :) -
Bonjour,
La fonction rechercheV est une fonction ultraconnue et tu peux trouver pleins d'informations partout. Elle permet de trouver une valeur dans un tableau à partir d'une autre :
=recherchev(valeur cherchée; tableau de recherche; colonne à ramener; faux)
exemple feuille 1 colonne A B et C
Nom Prénom Fonction
Tartempion Marc Gestionnaire
Martin Philippe Informaticien
Dans la 2ème feuille2, imagine que tu tapes le nom en A2 et que tu veux les mêmes infos par recherchev en B2 et C2 :
Pour B2
=recherchev(A2;'Feuil1'!A:C;2;faux)
Pour C2 :
=recherchev(A2;'Feuil1'!A:C;3;faux)
Pour les listes déroulantes, je te conseille de visiter Données, valdiation des données
Dans options, autoriser : Liste
et dans la source, choisis les cellules contenant ta liste (dans mon exemple : 'Feuil1'!A -
-
