Fonction si dans excel en vba

beyout -  
Bidouilleu_R Messages postés 1209 Statut Membre -
Bonjour,
Je souhaiterais inclure dans mon code VBA ceci :
Si d2 contient le mot "standalone" alors
afficher b2
si d2 contient le mot "%master" alors
afficher b2
si d2 contient le mot "Membre" alors
prendre la dernière lettre de la chaine de caractère et
afficher la case "Master %"la lettre en question"%

Je ne sais pas si c'est bien clair, n'ésitez pas à me poser des questions
Configuration: Windows XP
Internet Explorer 6.0

3 réponses

  1. tobec
     
    salut,

    ca doit donner quelque chose comme :

    if worksheets(numero_feuille).range("D2").value="standalone" then

    msgbox(worksheets(numero_feuille).range("B2").value)

    end if

    je crois que c'est ca^^

    par contre je n'ai pas exactement compris ce que tu veux pour la derniere condition.
    0
  2. Bidouilleu_R Messages postés 1209 Statut Membre 296
     
    Bonjour,
    Je souhaiterais inclure dans mon code VBA ceci :
    Si d2 contient le mot "standalone" alors
    afficher b2
    si d2 contient le mot "%master" alors
    afficher b2
    si d2 contient le mot "Membre" alors
    prendre la dernière lettre de la chaine de caractère et
    afficher la case "Master %"la lettre en question"%
    ' je ne comprends pas l'epression "afficher la case "Master %"
    je placerai le contenu de d2 dans une variable pour simplifier l'écriture

    Sub test()
    y = Range("d2").Value
    X = InStr(1, y, "standalone")

    If InStr(1, X, "standalone") > 0 Then
    'on affiche b2
    s = MsgBox(b2)
    End If

    If InStr(1, X, "%master") > 0 Then
    'on affiche b2
    s = MsgBox(b2)
    End If

    If InStr(1, X, "Membre") > 0 Then
    'on prend la dernière lettre de la chaine
    derniere_lettre = Right(X, 1)

    s = MsgBox(b2 & " la dernière lettre est : " & dernier_lettre)
    End If

    End Sub
    0
    1. beyout
       
      Je pensais que l'on pouvait prendre des caractère dans une chaine de caractère avec le %

      Merci je teste ça cette après midi et je vous dis
      0
  3. Bidouilleu_R Messages postés 1209 Statut Membre 296
     
    le caractère % est vu comme une référence à une variable dans certains environnment comme windows.

    par exemple %path% te renvoie le chemin sous windows ou sous dos
    mais pour vba il faut faire référence à des variables system.
    A+
    0