Macro

H

Hieu

XLDnaute Impliqué

• 14 Mai 2017

• #2

Salut tedy,

Bienvenu sur XLD.

Heureusement que tu es sur excel, sinon, tu te serais trompé de site ^^

tedy à dit:

je suis sur excel .

Cliquez pour agrandir...

Ce que tu demandes, oui, tu peux le faire. Etant donné que je n'ai pas d'exemple de ce que tu demandes, je ne comprends pas pourquoi tu veux le faire par macro ?

 

Pièces jointes

• essai_v0.xlsx

  8.3 KB · Affichages: 14

Vote positif 0 Vote négatif

T

tedy

XLDnaute Nouveau

• 14 Mai 2017

• #3

effectivement le je suis sur excel était plutôt de l'ironie. En fait j'ai un ensemble de données dans un tableau et je voulais créer un bouton de tel sorte que le min et le max soit calculer automatiquement a chaque fois que quelqu'un appuie sur ce bouton et affiche une reponse .Cet réponse détermine le fait que l'on puisse continuer ou pas une fiche de test que je suis entrain de concevoir. Ensuite je voulais le faire par macro pour m'entrainer également

 

Vote positif 0 Vote négatif

H

Hieu

XLDnaute Impliqué

• 14 Mai 2017

• #4

Ah ok.

Quelque chose comme ça ?

VB:

Sub ghj()
mini = WorksheetFunction.Min(Range("b2:b9"))
maxi = WorksheetFunction.Max(Range("b2:b9"))
reponse = maxi > 4
MsgBox "min : " & mini & Chr(10) & _
       "max : " & mini & Chr(10) & _
       "rep : " & reponse
End Sub

 

Pièces jointes

• essai_v1.xlsm

  15.7 KB · Affichages: 13

Vote positif 0 Vote négatif

T

tedy

XLDnaute Nouveau

• 14 Mai 2017

• #5

Oui c'est ça après vue que moi j'ai un tableau je dois juste mettre "G9:L14" pour prendre les valeurs a l’intérieur de mes axes X et Y c'est ça ?

 

Pièces jointes

• Classeur5.xlsx

  8.5 KB · Affichages: 22
• Classeur5.xlsm

  8.5 KB · Affichages: 19

Vote positif 0 Vote négatif

T

tedy

XLDnaute Nouveau

• 14 Mai 2017

• #6

je veux le min et le max des valeurs en rouge en fait

 

Vote positif 0 Vote négatif

H

Hieu

XLDnaute Impliqué

• 14 Mai 2017

• #7

Oui, c'est ca, il te suffit de mettre "G9:L14"

 

Vote positif 0 Vote négatif

T

tedy

XLDnaute Nouveau

• 14 Mai 2017

• #8

D'accord je te remercie juste dernière petite question . En fait ces points represente des altitudes prise a partir d'un point d'origine 0 sur une face dont on veut déterminer si elle est plane ou non aussi je voudrais savoir si tu penses que je pourrais par exemple mettre l'équation d'un plan sur ma macro de telle sorte de telle sorte que automatiquement je puisses verifier si ces points sont caracteristique d'un plan . Le but pour moi est déterminer si ma surface a une bonne planeité et n'est pas trop bosseler

 

Vote positif 0 Vote négatif

H

Hieu

XLDnaute Impliqué

• 15 Mai 2017

• #9

On peut pas mettre d'équations, mais par contre, tu peux mettre des conditions.
Dans un premier temps, il te faut définir ton plan de référence afin de définir l'équation cartésienne de celui-ci.
Ensuite, tu peux vérifier, si oui, ou non, chacun des points est sur ce plan ou non.

Si j'ai bien compris le pb...

 

Vote positif 0 Vote négatif

T

tedy

XLDnaute Nouveau

• 15 Mai 2017

• #10

Oui c'est bien ça merci . Et je me demandais si je veux mettre une réponse personalisé autre que vrai ou faux (par exemple "terre") dans le code précédent enfin celui que tu m'as envoyé pourrais -tu m'expliquer comment faire ?

 

Vote positif 0 Vote négatif

H

Hieu

XLDnaute Impliqué

• 15 Mai 2017

• #11

Comme ca :

VB:

Sub ghj()
mini = WorksheetFunction.Min(Range("g9:l14"))
maxi = WorksheetFunction.Max(Range("g9:l14"))
If maxi > 4 then
reponse =  "terre"
Else
reponse = "feu"
End if
MsgBox "min : " & mini & Chr(10) & _
       "max : " & mini & Chr(10) & _
       "rep : " & reponse
End Sub

 

Vote positif 0 Vote négatif

T

tedy

XLDnaute Nouveau

• 15 Mai 2017

• #12

Okay ça marche je vais continuer a creuser par rapport a l'équation cartesienne merci !

 

Vote positif 0 Vote négatif

H

Hieu

XLDnaute Impliqué

• 15 Mai 2017

• #13

Soit un plan (ABC). On cherche le vecteur n normal au plan.
Les produits scalaires :
AB.n = 0
AC.n = 0
BC.n = 0

3 équations, 3 inconnues. Tu dois pouvoir trouver n

 

Vote positif 0 Vote négatif

T

tedy

XLDnaute Nouveau

• 15 Mai 2017

• #14

Oui c'est ce que j'ai fais . Mais petite question subsidiaire ( pas liée au précédent post) est ce que tu saurais
comment faire pour que que lorsque je copie/colle un ensemble de valeur quelconque sur ma fiche excel Celle-ci affiche sur 1 cellule par exemple un message type comme 'bonjour' .En fait je voudrais que copier un tableau de valeur dans mon excel détermine l'affichage automatique d'un message sur un cellule ou deux message sur 2 cellules différentes .

 

Vote positif 0 Vote négatif

H

Hieu

XLDnaute Impliqué

• 15 Mai 2017

• #15

Pas du tout !

 

Vote positif 0 Vote négatif