Salut Keldan,
première approche à adapter (en fonction de ce qui suit)... qui ne fonctionnera bien QUE lorsque tu auras synchronisé la structure de tes tableaux en 'Création' et en 'Archétypes', c-à-d, construit tes deux tableaux de manière identique.
Je parle ici principalement du nombre de colonnes, supprimer les cellules fusionnées,...
De plus, je ne vois pas de tableau avec les compétences liées...
Nomme tes feuilles en fonction de leur contenu : plus facile de s'y retrouver quand on code. Ici, j'ai fait au pif...
Private Sub Worksheet_Change(ByVal Target As Range)
'
Dim iRow1%, iRow2%
'
Application.EnableEvents = False
'
If Not Intersect(Target, Range("K7")) Is Nothing Then
Range("K11:Q26").ClearContents
With Worksheets("Archétypes")
iRow1 = .Range("A:A").Find(what:=Target, lookat:=xlWhole).Row
iRow2 = .Range("B" & iRow1).End(xlDown).Row
Range("K11").Resize((iRow2 + 1) - iRow1, 5).Value = .Range("B" & iRow1 & ":F" & iRow2).Value
End With
End If
'
Application.EnableEvents = True
'
End Sub
Suite au prochain numéro...
A+