Page 1 sur 1

[V] Condition en VBA (excel)

Posté : jeu. 23 févr. 2017 11:41
par yohanb767
Bonjour à tous ,

j'aimerai un petit coup de main ne sachant que le minimum en VBA

j'aurai souhaité un code VBA qui me permette de mettre

la valeur 1 en A1 si B10 = NT
la valeur 2 en A1 si B10 = S8
la valeur 3 en A1 si B10 = TC

merci d'avance et bonne journée à tous

Yohan

Re: Condition en VBA (excel)

Posté : jeu. 23 févr. 2017 12:18
par jguinch
Du code VBA ou du code AutoIt ?

Re: Condition en VBA (excel)

Posté : jeu. 23 févr. 2017 13:04
par yohanb767
bonjour jguinch

c'est du VBA et pas du code autoit , je sais que je suis sur un forum essentiellement destiné à autoit mais je jongle entre les deux pour un projet
étant inscrit sur le forum j'en profite pour demander ce petit service

Re: Condition en VBA (excel)

Posté : jeu. 23 févr. 2017 16:36
par walkson
Dans un module
Sub AA()
Dim maval As Variant
maval = Range("B10").Value
Select Case maval
Case "NT"
Range("A1").Value = 1
Case "SB"
Range("A1").Value = 2
Case "TC"
Range("A1").Value = 3
Case Else
Range("A1").Value = ""
End Select
MsgBox "Autoit Up! Up!"
End Sub
Et pour l'avoir en dynamique sur le Worksheet de la feuille concernée
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
AA
End Sub

Re: Condition en VBA (excel)

Posté : jeu. 23 févr. 2017 21:41
par yohanb767
merci beaucoup walkson !!

par contre l'avoir en dynamique sur ma feuille 1 je n'y arrive pas , je ne sais pas ou mettre la commandes que tu as mis
ça marche mais il faut que je fasse exécuter

Re: [V] Condition en VBA (excel)

Posté : jeu. 23 févr. 2017 21:59
par Tlem
Bonsoir.
Pour demander de l'aide sur d'autres langages, je vous demanderais de faire appel aux forums dédiés.
Ici on ne traite que AutoIt.

Re: [V] Condition en VBA (excel)

Posté : ven. 24 févr. 2017 09:22
par jguinch
Merci Thierry, c'était le sens de ma question.