Dessiner un histogramme VBA -EXCEL

J'aimerais bien creer un bouton (vba-excel) qui permet a l'utilisateur de selectionner une plage de cellule et puis il dessine automatiquement un histogramme pour cette plage

j'ai essayé ce code mais ca marche pas
***********************************************************************

Public Sub sele()
Dim rng As Range

Set rng = Application.InputBox(prompt:="Selectionnez Vos Données", Type:=8)

ThisWorkbook.Charts.Add

End Sub

1 réponse