Résumé
Microsoft Visual Basic pour Applications ne fournit pas de méthode permettant de déterminer le nombre total de pages à imprimer dans une feuille de calcul. Toutefois, vous pouvez utiliser la méthode ExecuteExcel4Macro pour utiliser get. Fonction de feuille macro DOCUMENT(50) pour renvoyer le nombre total de pages qui seront imprimées dans la feuille de calcul active.
Informations supplémentaires
Microsoft fournit des exemples de programmation à des fins d’illustration uniquement, sans garantie explicite ou implicite, y compris, de manière non limitative, les garanties implicites de qualité marchande et/ou d’adéquation à un usage particulier. Cet article suppose que vous connaissez le langage de programmation présenté et les outils utilisés pour créer et déboguer des procédures. Les techniciens du Support technique Microsoft peuvent vous expliquer les fonctionnalités d'une procédure particulière, mais ils ne peuvent pas modifier les exemples en vue de vous fournir des fonctionnalités supplémentaires ou de créer des procédures répondant à vos besoins spécifiques.https://partner.microsoft.com/global/30000104
Si vous avez une expérience de programmation limitée, vous pouvez contacter un partenaire microsoft certifié ou des services de conseil Microsoft. Pour plus d’informations, visitez ces sites Web Microsoft : Partenaires certifiés Microsoft -Services professionnels Microsoft - https://www.microsoft.com/professionalservices/overview Pour plus d’informations sur les options de support disponibles et sur la façon de contacter Microsoft, visitez le site Web Microsoft suivant : http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMSPour utiliser la macro suivante, configurez un fichier Microsoft Excel comme suit :
-
Créez un classeur Microsoft Excel.
-
Sélectionnez la plage A1:J100.
-
Entrez le nombre 1 et appuyez sur Ctrl+Entrée. Vous devez voir toutes les cellules sélectionnées remplies avec le nombre 1.
-
Insérez un module de macro Visual Basic.
-
Tapez le code suivant dans le module :
-
Sub ShowMe() MsgBox ExecuteExcel4Macro("GET.DOCUMENT(50)") & _ " pages will be printed." End Sub
-
Exécutez la macro.
Références
Vous trouverez des informations supplémentaires sur la fonction macro Get.Document dans le manuel de référence des fonctions Excel.