Erreur code VBA avec variable

Bonjour,
Je travaille sous excel, sous tableau croisé dynamique.

Le tableau croisé dynamique se trouve sur la feuille HN+JS.
Je souhaite automatiser à l'aide d'une macro la création d'une nouvelle feuille qui se fait manuellement en double clikant sur la cellule que j'ai nommé "rapportcell".
Sauf que cela ne fonctionne pas, il m'indique une erreur:

"Erreur d'éxécution 1004
Impossible de définir la propriété ShowDetail de la classe Range."

Voici le code de ma macro:

Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 13/08/2008 par B48155
'

'
ActiveSheet.PivotTables("Tableau croisé dynamique1").RefreshTable
Sheets("RAPPORT").Select
ActiveWindow.SelectedSheets.Delete
Sheets("HN+JS").Select
Range("rapportcell").Select
Selection.ShowDetail = True
ActiveSheet.Name = "RAPPORT"
Sheets("HN+JS").Select
Range("A1").Select

End Sub

Je tiens à signaler, que sans utiliser le nom "rapportcell", en entrant directement les coordonnées de la cellule cela fonctionne, cependant, mon tableau est amené à évoluer souvent et j'aimerai que cette cellule soit toujours prise en compte malgré son changement de coordonnées.

Merci d'avance