Lier une zone de texte a une cellule

Bonjour,
Jai un projet d'informatique a faire et nous somme en train de faire une bataille navale.
Ce qu'il me faudrait pour que ca marche cest que je rentre dans une zone de texte un nom de cellule(ex F1), que j'appuie sur un bouton, que ca verifie la valeur de la cellule correspondante(non visible aux yeux du joueur,cest pour verifier si il ya un bateau ou non dessus), et que ca la modifie(la valeur de la cellule ayant declenchée une serie de if, afin de pouvoir changer la valeur et de savoir quelles cases ont deja ete touchées et de pouvoir les bloquer)

Je suis debutant alors desole si la facon de faire vous ecorche les yeux x(
En attendant vos reponses, je continue de chercher
Merci

(Jai cru qu ca marchait avec ActiveSheet.Shapes("zone de text").Select mais en fait non...)

2 réponses

  1. Bonjour,
    a adpater suivant vos besoins

    Sub test()
    Txt = ActiveSheet.Shapes("ZoneTexte 1").TextFrame.Characters.Text
    End Sub
    
    0
    1. Qu'est ce que "Txt"? Une variable de type range?
      0
      1. Re,

        Non , c'est une variable pour recuperer ce qui est dans la zone de texte !!!!!!!!!!!!!!
        0