Bonjour, Afin de protéger certaines cellules d'une feuille sous excel, j'ai décoché dans "format cellules" la protection des cellules que je veux autoriser en modification puis j'ai verrouiller la page dans option, protection. Ainsi, je peux désormais modifier les cellules de mon choix. Jusque là, tout est bon pour moi. Seulement je désirerais maintenant insérer une photo depuis mon fichier au niveau des cellules qui ne sont pas protégées... Et là.... Bein je coince!!!!... J'y ai déjà passé quelques heures et rien à faire, je n'arrive pas à insérer une photo dans une zone non protégée.... Y'a t'il une âme charitable pour me donner la solution????.... Merci d'avance.

Tu ¶te la protection. Tu insÚres ton image. Tu reprotÞge la feuille.

Oui...Palatch... Effectivement mais le but est...J'ai oubliÚ de prÚciser... De permettre Ó un utilisateur d'insÚrer une photo, de modifier les cellules qui ne sont pas protÚgÚes MAIS de lui interdire l'accÞs Ó certaines donnÚes. Si je lui donne le mot de passe du dÚverrouillage pour pouvoir insÚrer sa photo...Au temps que je ne verrouille pas le document... Je trouve surprenant, de ne pas pouvoir insÚrer une image quand une partie de la feuille est verrouillÚe. J'arrive Ó insÚrer une image clipart mais une image du fichier...Il doit bien il y avoir une possibilitÚ????

Salut, il faut alors dÚprotÚger et reprotÚger par une macro dont le code est inaccessible Patrick

C'est un peu tirer par les cheveux mais þa fonctionne. Tu peux insÚrer un commentaire Ó la cellule et insÚrer une image dans le commentaire.

Merci pour vos rÚponses, mais ce n'est pas Úvident Ó gÚrer pour un utilisateur lambda, je pense que le plus simple va Ûtre d'essayer d'utiliser autre chose qu'Excel qui ne semble pas au point pour ce type de manipulation.

Pour obtenir le rÚsultat dÚsirÚ copier cette procÚdure dans la feuille module de ta feuille de travail. Pour ce faire, un clic droit sur l'onglet de ta feuille et choisir dans le menu dÚroulant "visualiser le code" [code]Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim MaPlage As Range Set MaPlage = Union(Range("A1:A10"), Range("C25"),Range("D1:G25")) If Not Intersect(MaPlage, Target) Is Nothing Then ActiveSheet.Unprotect Else ActiveSheet.Protect End If End Sub[/code] Ó titre d'exemple : Range("A1:A10") est un argument. Chaque argument peut Ûtre une plage de cellules ou cellules indÚpendantes ( Maximum 30 arguments). la ligne qui te permettra de rentrer les arguments est celle-ci : [code]Set MaPlage = Union(Range("A1:A10"), Range("C25"),Range("D1:G25"))[/code] les cellules de la plage A1:A10 C25 D1:G25 ne sont qu'un exemple... A vous de mettre vos parametres de plage Lorsque l'usager sÚlectionnera une de ces cellules, la feuille sera dÚprotÚgÚe, laissant l'usager une entiÞre libertÚ et dÞs qu'il clique sur une cellule non dÚfinie dans l'objet "MaPlage" la feuille sera protÚgÚe Ó nouveau. source :DenisMichon (N?1248)[url="http://www.excelabo.net/index.php"]excelabo[/url]