PARTIE 2 - La structuration et le traitement de l'information dans les organisations Annexe 2 : Code de la macro « suiviPluri » (à rendre avec la copie) Sub suiviPlur() Sheets( " SuiviPluriannuel " ).Select Rows( " 3:3 " ).Select Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove Sheets( " Suivi " ).Select Range( " A3:I3 " ).Select Selection.Copy a Sheets( " SuiviPluriannuel " ).Select Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats Correction Sub suiviPlur() Sheets( " SuiviPluriannuel " ).Select Rows( " 3:3 " ).Select Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove Sheets( " Suivi " ).Select Range( " A3:I3 " ).Select Selection.Copy Sheets( " SuiviPluriannuel " ).Select Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats Sélection de la feuille « SuiviPluriannuel » Puis sélection de la ligne 3 Insertion d'une ligne Sélection de la feuille « Suivi » Sélection de la plage de cellules A3:I3 Copie de la plage sélectionnée Sélection de la feuille « SuiviPluriAnnuel » Sélection de la cellule A3 Collage spécial de la sélection précédente C Pour insérer un jeu d'essai Pour chaque fonction, des cas de test sont préparés. Pour chaque cas de test ou jeux d'essai sont conçus pour valider les calculs. Procédons à un jeu d'essai pour la société CANDY SHOP. Nous testerons 3 valeurs de montant HT pour valider les taux de remise associés : Test If Totalcom >= Lim2 Then Tauxremise = Tauxrem2 soit seuil 800 € et taux de remise 5 % If Totalcom >= Lim1 Then Tauxremise = Tauxrem1 soit seuil 400 € et taux de remise 3 % Else Remise = 0 272 Valeur montant HT 1 808 € 450 € 99 € Taux remise 5 % 3 % Montant remise 90,40 € 13,50 €