Inclure le contenu de cellule dans inputbox

Bonjour,

Après moult recherches et quelques cheveux arrachés perdus, je m'en remets une nouvelle fois à vous.

J'ai créé une macro pour saisir du texte via une inputbox et ça fonctionne très bien.

J'ai voulu pousser le bouchon plus loin en demandant à ma inputbox de me citer deux cellules cependant j'ai beau chercher je ne trouve pas la solution

voici le code

Sub saisie()

Debut:

x = 978

y = 8

Do

x = x + 1

Loop Until Cells(x, y) = ""

tape = InputBox("tu préfères")

Cells(x, y) = tape

If MsgBox("Encore ?", vbYesNo) = vbNo Then Exit Sub

GoTo Debut

End Sub

Mon objectif est que dans mon inputbox s'affiche "tu préfères" {afficher le contenu de} cells(x,4) "ou" {afficher le contenu de} cells(x,5)

Cela afin d'éviter à l'utilisateur de devoir regarder sur le tableau les deux options qui s'offrent à lui.

J'ai failli y arriver grâce à ce lien malheureusement j'ai retourné le code dans tous les sens et n'ai pas pu l'appliquer à mon cas sans bug.

D'avance merci

Bonjour,

a priori

tape = InputBox("tu préfères afficher le contenu de : " & Cells(x, 4) & " ou de : " & Cells(x, 5))

Ca marche !

Je te remercie

Bon weekend