Bonjour

j'ai un problème avec ma macro sur un classeur excel. LE but de cette Macro a pour but de faire le lien entre le nom et prénom en case B et C puis qu'en case B en lien Hyper link se mette en place pour renvoyer vers le dossier de la personne directement.

mon problème est que lorsque je veux insérer une ligne... la macro plante. le débogage surligne Temp = Target.value.
je n'arrive pas à comprendre d'où vient ce bug.

Merci d'avance pour votre aide.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub Worksheet_Change(ByVal Target As Range)
Dim temp As String
temp = Target.Value
 If Target.Cells.Column = 2 And Target.Cells.Row >= 7 And Target.Value <> "" Then
      ActiveSheet.Hyperlinks.Add Target, "D:\Desktop\Recrutement\" & temp & " " & Cells(Target.Row, Target.Column + 1)
 
        TextToDisplay = temp
End If
 If Target.Cells.Column = 3 And Target.Cells.Row >= 7 And Target.Value <> "" And Cells(Target.Row, Target.Column - 1) <> "" Then
      ActiveSheet.Hyperlinks.Add Cells(Target.Row, Target.Column - 1), "D:\Desktop\Recrutement\" & Cells(Target.Row, Target.Column - 1) & " " & temp
 
        TextToDisplay = temp
End If
End Sub