Corrigé 21.4 Créer un tableau croisé dynamique

' On décide de mettre un seul TCD sur la feuille  
Sub EffaceTCD()  
    Worksheets("Analyse").Cells.Clear  
End Sub  
--------------------------------------------------------------  
' Création du TCD  
Sub CreeTCD()  
  Dim intChoix As Integer  
  intChoix = MsgBox("Attention !!! Si le TCD existe déjà," _  
  & " il sera supprimé" & vbCrLf & _  
  "Voulez-vous...
Pour consulter la suite, découvrez le livre suivant :
couv_TP21EXCV.png
60-signet.svg
En version papier
20-ecran_lettre.svg
En version numérique
41-logo_abonnement.svg
En illimité avec l'abonnement ENI
130-boutique.svg
Sur la boutique officielle ENI
Précédent
Corrigé 21.3 Établir le chiffre d’affaires par représentant et par pays
Suivant
Corrigé 21.5 Gérer les étiquettes