Merci beaucoup pour votre aide : ca marche !!
J'avais, en plus, oublié de déclarer les variables !
Voilà la macro avec ses variables déclarées et sa syntaxe exacte du champ de données variable à exploiter en tableau croisé :
Sheets("Total CLCV").Select
'comptage du nomdre de lignes et de colonnes du tableau
lignefin = Cells(1, 1).CurrentRegion.Rows.Count
colfin = Cells(1, 1).CurrentRegion.Columns.Count
'valeurs des variables de début de lignes et de colonnes
lignedep = 1
coldep = 1
Sheets("TCD").Select
Columns("A:C").Select
Range("C1").Activate
Selection.Delete Shift:=xlToLeft
Range("A4").Select
ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
"'Total CLCV'!R" & lignedep & "C" & coldep & ":R" & lignefin & "C" & colfin).CreatePivotTable TableDestination:=Range("A4") _
, TableName:="Tableau croisé dynamique2"