Aide excel vba

pablo19 -  
 pablo19 -
Bonsoir à tous
j'ai vraiment besoin d'aide =S
voilà je débute en VBA et je voudrais savoir le code pour pouvoir déplacer un pion, que je noterai X dans une cellule, sur toute la ligne A3 : Z3 ; selon un nombre que j'ai déjà programmé (l'ordinateur me donne un nombre au hasard, je l'ai nommé "résultat"). En gros c'est le même principe que le jeux de l'oie, par exemple : si l'ordinateur m'affiche 2, je voudrais que mon X se décale de deux cellules.
J'espère avoir été clair, j'espère avoir des réponses au plus vite ... merci à tous et bonne soirée
Configuration: Windows Vista
Firefox 3.0.5

1 réponse

  1.
    eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonjour,

    Tu peux utiliser .offset(nbLig,nbCol)
    Ex : il est en A3 et tu as fait un 2
    [A3].offset(0,2).value = [A3].value
    ' ensuite effacer A3
    [A3].value = ""

    ou bien sur le même principe tu peux utiliser cells(n°Lig,n°Col).value

    eric
    0
    1. pablo19
       
      je te remercie beaucoup pour ta réponse, le hic est que le résultat change à chaque fois, ce n'est pas moi qui décide mais ce fameux "résultat", genre je voudrais faire :

      [A1].Offset(0, "resultat").Value = ["resultat"].Value

      mai évidemment ça ne marche pas... y'a t'il un autre code, si tu comprends mieux ma demande ? ^^' je ne comprends vraiment pas grand chose en vba... enfin je te remercie déjà de ta réponse =)
      Bonsoir !
      0
      1. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281 > pablo19
         
        Il faut stocker ton résultat dans une variable, ainsi que ta (tes) positions et les utiliser ensuite. Ex :
        dim position1 as range
        position1 = range[A1]
        ....
        tirage = int(rnd()*6+1)
        position1 .Offset(0, tirage).Value = position1 .Value
        position1.value=""
        position1.range=position1 .Offset(0, tirage)
        ...


        eric
        0
      2. pablo19 > eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention  
         
        et bien c'est super tout ça je te remercie beaucoup =) passe une bonne journée !
        0