Sujet Précédent Sujet Suivant

Aide excel vba

Fermé
pablo19 - 15 janv. 2009 à 21:23
 pablo19 - 16 janv. 2009 à 11:38
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
A voir également:

1 réponse

Réponse 1 / 1
eriiic Messages postés 24570 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 23 avril 2024 7 215
15 janv. 2009 à 23:18
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
pablo19
16 janv. 2009 à 00:42
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
eriiic Messages postés 24570 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 23 avril 2024 7 215 > pablo19
16 janv. 2009 à 06:16
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
pablo19 > eriiic Messages postés 24570 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 23 avril 2024
16 janv. 2009 à 11:38
et bien c'est super tout ça je te remercie beaucoup =) passe une bonne journée !
0

Discussions similaires

Excel VBA : Récupérer la valeur d'une cellule
la pioche -
mikebzh -

3 réponses