[V] Condition en VBA (excel)

[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

[jguinch]

Du code VBA ou du code AutoIt ?

[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

[walkson]

Dans un module

Code: [Tout sélectionner] [Déplier/Replier]

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

GeSHi © Extension Codebox Plus

Et pour l'avoir en dynamique sur le Worksheet de la feuille concernée

Code: [Tout sélectionner] [Déplier/Replier]

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
AA
End Sub

GeSHi © Extension Codebox Plus

[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

[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.

[jguinch]

Merci Thierry, c'était le sens de ma question.