XL 2016 Inputbox recherche N° puis Copir Coller

Bonjour à tous,

Bon là je galère un peu depuis quelques temps , j'ai trouveépas mal de chose sur les forums, mais rien qui ne correspond à ce que je souhaite faire en Macro

Alors j'ai un fichier avec des appartements 140 lignes (Une ligne par appartements) environ.

En faite je souhaite créer une inputbox pour rechercher un numéro d'appartement
Ex : N°101 (A11) selectionner un plage en fonction du numéro de ligne de l'appartement

(BE[Numdeligne]:CF[Numdeligne]) et copier/coller en (R[Numdeligne]:AS[Numdeligne]) et effacer (BE[Numdeligne]:CF[Numdeligne]) mais conserver la mise en forme.

J'ai testé pas mal de macro mais là je sèche... Si une âme charitable passe par ici ! Pour me donner une coup de main.

J'ai mis un exemplaire du fichier pour que vous vous rendiez compte.
Merci à tous