{"id":7509,"date":"2018-08-09T12:56:13","date_gmt":"2018-08-09T10:56:13","guid":{"rendered":"https:\/\/www.auditsi.eu\/?p=7509"},"modified":"2018-08-09T12:56:13","modified_gmt":"2018-08-09T10:56:13","slug":"ms-access-vba-ecrire-dans-un-classeur-excel","status":"publish","type":"post","link":"https:\/\/www.auditsi.eu\/?p=7509","title":{"rendered":"MS\/ACCESS, VBA : \u00e9crire dans un classeur Excel"},"content":{"rendered":"<p style=\"text-align: justify;\">Le r\u00e9sultat d&#8217;une requ\u00eate SQL est ais\u00e9ment transf\u00e9rable d&#8217;ACCESS&nbsp;vers un classeur Excel \u00e0 l&#8217;aide de la commande VBA&nbsp;<em>TransferSpreadsheet<\/em>.<\/p>\n<p style=\"text-align: justify;\">Exemple :<\/p>\n<pre class=\"lang:vb decode:true\">DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12Xml, NomReq, Chemin &amp; NomClasseurXL<\/pre>\n<p>La syntaxe de cette commande est la suivante : <em>DoCmd.TransferSpreadsheet(TransferType, SpreadsheetType, TableName, FileName, HasFieldNames, Range, UseOA).<\/em><\/p>\n<p style=\"text-align: justify;\">Param\u00e8tres :<\/p>\n<table style=\"width: 678px;\">\n<thead>\n<tr>\n<th style=\"width: 172.93px;\"><span style=\"font-size: 10pt;\" data-ttu-id=\"1152f-110\"><strong>Nom<\/strong><\/span><\/th>\n<th style=\"width: 66.07px;\"><span style=\"font-size: 10pt;\"><span title=\"\" data-original-title=\"\" data-ttu-id=\"1152f-111\"><strong>Requis \/ Facultatif<\/strong><\/span><\/span><\/th>\n<th style=\"width: 123.67px;\"><span style=\"font-size: 10pt;\"><span title=\"\" data-original-title=\"\" data-ttu-id=\"1152f-112\"><strong>Type de donn\u00e9es<\/strong><\/span><\/span><\/th>\n<th style=\"width: 287.33px;\"><span style=\"font-size: 10pt;\"><span title=\"\" data-original-title=\"\" data-ttu-id=\"1152f-113\"><strong>Description<\/strong><\/span><span class=\"sxs-lookup\"><strong>Description<\/strong><\/span><\/span><\/th>\n<\/tr>\n<\/thead>\n<tbody>\n<tr>\n<td style=\"width: 172.93px;\" data-th=\"NomName\"><span style=\"font-size: 10pt;\"><span class=\"sxs-lookup\"><em>TransferType<\/em><\/span><\/span><\/td>\n<td style=\"width: 66.07px;\" data-th=\"Requis\/FacultatifRequired\/Optional\"><span style=\"font-size: 10pt;\"><span title=\"\" data-original-title=\"\" data-ttu-id=\"1152f-115\">Facultatif<\/span><\/span><\/td>\n<td style=\"width: 123.67px;\" data-th=\"Type de donn\u00e9esData Type\"><span style=\"font-size: 10pt;\" data-ttu-id=\"1152f-116\">AcDataTransferType<\/span><\/td>\n<td style=\"width: 287.33px;\" data-th=\"DescriptionDescription\"><span style=\"font-size: 10pt;\"><span title=\"\" data-original-title=\"\" data-ttu-id=\"1152f-117\">Type de transfert&nbsp;\u00e0 effectuer (acImport (=0) ou acExport (=1), acLink (=2))<\/span><span class=\"sxs-lookup\">. <\/span><span title=\"\" data-original-title=\"\" data-ttu-id=\"1152f-118\">La valeur par d\u00e9faut (si non renseign\u00e9) est <strong>acImport<\/strong>. acLink : la base de donn\u00e9es est li\u00e9e \u00e0 la source de donn\u00e9es sp\u00e9cifi\u00e9e.<\/span><\/span><\/td>\n<\/tr>\n<tr>\n<td style=\"width: 172.93px;\" data-th=\"NomName\"><span style=\"font-size: 10pt;\"><span class=\"sxs-lookup\"><em>SpreadsheetType<\/em><\/span><\/span><\/td>\n<td style=\"width: 66.07px;\" data-th=\"Requis\/FacultatifRequired\/Optional\"><span style=\"font-size: 10pt;\"><span title=\"\" data-original-title=\"\" data-ttu-id=\"1152f-120\">Facultatif<\/span><\/span><\/td>\n<td style=\"width: 123.67px;\" data-th=\"Type de donn\u00e9esData Type\"><span style=\"font-size: 10pt;\"><span title=\"\" data-original-title=\"\" data-ttu-id=\"1152f-121\">AcSpreadSheetType<\/span><\/span><\/td>\n<td style=\"width: 287.33px;\" data-th=\"DescriptionDescription\"><span style=\"font-size: 10pt;\" data-ttu-id=\"1152f-122\">Type de feuille de calcul \u00e0 partir de laquelle importer, vers laquelle exporter ou avec laquelle lier. Cf. d\u00e9tail plus bas<\/span><\/td>\n<\/tr>\n<tr>\n<td style=\"width: 172.93px;\" data-th=\"NomName\"><span style=\"font-size: 10pt;\"><span class=\"sxs-lookup\"><em>TableName<\/em><\/span><\/span><\/td>\n<td style=\"width: 66.07px;\" data-th=\"Requis\/FacultatifRequired\/Optional\"><span style=\"font-size: 10pt;\"><span title=\"\" data-original-title=\"\" data-ttu-id=\"1152f-124\">Facultatif<\/span><\/span><\/td>\n<td style=\"width: 123.67px;\" data-th=\"Type de donn\u00e9esData Type\"><span style=\"font-size: 10pt;\"><span class=\"sxs-lookup\"><strong>Variant<\/strong><\/span><\/span><\/td>\n<td style=\"width: 287.33px;\" data-th=\"DescriptionDescription\"><span style=\"font-size: 10pt;\" data-ttu-id=\"1152f-126\">Expression cha\u00eene qui est le nom de la table Office Access que vous souhaitez importer des donn\u00e9es, exporter des donn\u00e9es de feuille de calcul \u00e0 partir de, ou lier des donn\u00e9es, ou la requ\u00eate s\u00e9lection dans Access dont vous souhaitez exporter vers une feuille de calcul de r\u00e9sultats.<\/span><\/td>\n<\/tr>\n<tr>\n<td style=\"width: 172.93px;\" data-th=\"NomName\"><span style=\"font-size: 10pt;\"><span class=\"sxs-lookup\"><em>FileName<\/em><\/span><\/span><\/td>\n<td style=\"width: 66.07px;\" data-th=\"Requis\/FacultatifRequired\/Optional\"><span style=\"font-size: 10pt;\"><span title=\"\" data-original-title=\"\" data-ttu-id=\"1152f-128\">Facultatif<\/span><\/span><\/td>\n<td style=\"width: 123.67px;\" data-th=\"Type de donn\u00e9esData Type\"><span style=\"font-size: 10pt;\"><span class=\"sxs-lookup\"><strong>Variant<\/strong><\/span><\/span><\/td>\n<td style=\"width: 287.33px;\" data-th=\"DescriptionDescription\"><span style=\"font-size: 10pt;\" data-ttu-id=\"1152f-130\">Une expression cha\u00eene qui est le nom de fichier et le chemin d\u2019acc\u00e8s de la feuille de calcul que vous souhaitez importer, exporter ou lier \u00e0.<\/span><\/td>\n<\/tr>\n<tr>\n<td style=\"width: 172.93px;\" data-th=\"NomName\"><span style=\"font-size: 10pt;\"><span class=\"sxs-lookup\"><em>HasFieldNames<\/em><\/span><\/span><\/td>\n<td style=\"width: 66.07px;\" data-th=\"Requis\/FacultatifRequired\/Optional\"><span style=\"font-size: 10pt;\"><span title=\"\" data-original-title=\"\" data-ttu-id=\"1152f-132\">Facultatif<\/span><\/span><\/td>\n<td style=\"width: 123.67px;\" data-th=\"Type de donn\u00e9esData Type\"><span style=\"font-size: 10pt;\"><span class=\"sxs-lookup\"><strong>Variant<\/strong><\/span><\/span><\/td>\n<td style=\"width: 287.33px;\" data-th=\"DescriptionDescription\"><span style=\"font-size: 10pt;\"><span title=\"\" data-original-title=\"\" data-ttu-id=\"1152f-134\">Utilisez <strong>True<\/strong> (1) pour utiliser la premi\u00e8re ligne de la feuille de calcul comme noms de champ lors de l\u2019importation ou la liaison.<\/span><span title=\"\" data-original-title=\"\" data-ttu-id=\"1152f-135\">Utilisez <strong>False<\/strong> (0) pour traiter la premi\u00e8re ligne de la feuille de calcul comme des donn\u00e9es normales.<\/span><span title=\"\" data-original-title=\"\" data-ttu-id=\"1152f-136\">Si vous laissez cet argument vide, la valeur par d\u00e9faut (<strong>False<\/strong>) est choisie.<\/span><span title=\"\" data-original-title=\"\" data-ttu-id=\"1152f-137\">Lorsque vous exportez une table Access ou les donn\u00e9es de la requ\u00eate s\u00e9lection vers une feuille de calcul, les noms de champ sont ins\u00e9r\u00e9s dans la premi\u00e8re ligne de la feuille de calcul, quel que soit ce que vous entrez pour cet argument.<\/span><\/span><\/td>\n<\/tr>\n<tr>\n<td style=\"width: 172.93px;\" data-th=\"NomName\"><span style=\"font-size: 10pt;\"><span class=\"sxs-lookup\"><em>Range<\/em><\/span><\/span><\/td>\n<td style=\"width: 66.07px;\" data-th=\"Requis\/FacultatifRequired\/Optional\"><span style=\"font-size: 10pt;\"><span title=\"\" data-original-title=\"\" data-ttu-id=\"1152f-139\">Facultatif<\/span><\/span><\/td>\n<td style=\"width: 123.67px;\" data-th=\"Type de donn\u00e9esData Type\"><span style=\"font-size: 10pt;\"><span class=\"sxs-lookup\"><strong>Variant<\/strong><\/span><\/span><\/td>\n<td style=\"width: 287.33px;\" data-th=\"DescriptionDescription\"><span style=\"font-size: 10pt;\" data-ttu-id=\"1152f-p104\">Expression de cha\u00eene correspondant \u00e0 une plage correcte de cellules ou au nom d&#8217;une plage dans la feuille de calcul. <strong>Cet argument s&#8217;applique uniquement \u00e0 l&#8217;importation.<\/strong> Laissez cet argument vide pour importer la feuille de calcul enti\u00e8re. Lorsque vous exportez vers une feuille de calcul, vous devez laisser cet argument vide. Si vous entrez une plage, l&#8217;exportation \u00e9choue.<\/span><\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<p style=\"text-align: justify;\">Le param\u00e8tre UseOA (facultatif) n&#8217;est pas document\u00e9.<\/p>\n<p style=\"text-align: justify;\"><span title=\"\" data-original-title=\"\" data-ttu-id=\"1152f-121\">Valeurs de l&#8217;argument <em>AcSpreadSheetType<\/em><\/span> :<\/p>\n<table style=\"width: 657px;\">\n<thead>\n<tr>\n<th style=\"width: 213.98px;\"><span style=\"font-size: 10pt;\"><strong>Nom<\/strong><\/span><\/th>\n<th style=\"width: 46.26px;\"><span style=\"font-size: 10pt;\"><strong>Valeur<\/strong><\/span><\/th>\n<th style=\"width: 374.76px;\"><span style=\"font-size: 10pt;\"><strong>Description<\/strong><\/span><\/th>\n<\/tr>\n<\/thead>\n<tbody>\n<tr>\n<td style=\"width: 213.98px;\" data-th=\"Nom\"><span style=\"font-size: 10pt;\"><strong>acSpreadsheetTypeExcel3<\/strong><\/span><\/td>\n<td style=\"width: 46.26px;\" data-th=\"Valeur\"><span style=\"font-size: 10pt;\">0<\/span><\/td>\n<td style=\"width: 374.76px;\" data-th=\"Description\"><span style=\"font-size: 10pt;\">Format Microsoft Excel 3.0<\/span><\/td>\n<\/tr>\n<tr>\n<td style=\"width: 213.98px;\" data-th=\"Nom\"><span style=\"font-size: 10pt;\"><strong>acSpreadsheetTypeExcel4<\/strong><\/span><\/td>\n<td style=\"width: 46.26px;\" data-th=\"Valeur\"><span style=\"font-size: 10pt;\">6<\/span><\/td>\n<td style=\"width: 374.76px;\" data-th=\"Description\"><span style=\"font-size: 10pt;\">Format Microsoft Excel 4.0<\/span><\/td>\n<\/tr>\n<tr>\n<td style=\"width: 213.98px;\" data-th=\"Nom\"><span style=\"font-size: 10pt;\"><strong>acSpreadsheetTypeExcel5<\/strong><\/span><\/td>\n<td style=\"width: 46.26px;\" data-th=\"Valeur\"><span style=\"font-size: 10pt;\">5<\/span><\/td>\n<td style=\"width: 374.76px;\" data-th=\"Description\"><span style=\"font-size: 10pt;\">Format Microsoft Excel 5.0<\/span><\/td>\n<\/tr>\n<tr>\n<td style=\"width: 213.98px;\" data-th=\"Nom\"><span style=\"font-size: 10pt;\"><strong>acSpreadsheetTypeExcel7<\/strong><\/span><\/td>\n<td style=\"width: 46.26px;\" data-th=\"Valeur\"><span style=\"font-size: 10pt;\">5<\/span><\/td>\n<td style=\"width: 374.76px;\" data-th=\"Description\"><span style=\"font-size: 10pt;\">Format Microsoft Excel 95<\/span><\/td>\n<\/tr>\n<tr>\n<td style=\"width: 213.98px;\" data-th=\"Nom\"><span style=\"font-size: 10pt;\"><strong>acSpreadsheetTypeExcel8<\/strong><\/span><\/td>\n<td style=\"width: 46.26px;\" data-th=\"Valeur\"><span style=\"font-size: 10pt;\">8<\/span><\/td>\n<td style=\"width: 374.76px;\" data-th=\"Description\"><span style=\"font-size: 10pt;\">Format Microsoft Excel 97<\/span><\/td>\n<\/tr>\n<tr>\n<td style=\"width: 213.98px;\" data-th=\"Nom\"><span style=\"font-size: 10pt;\"><strong>acSpreadsheetTypeExcel9<\/strong><\/span><\/td>\n<td style=\"width: 46.26px;\" data-th=\"Valeur\"><span style=\"font-size: 10pt;\">8<\/span><\/td>\n<td style=\"width: 374.76px;\" data-th=\"Description\"><span style=\"font-size: 10pt;\">Format Microsoft Excel 2000<\/span><\/td>\n<\/tr>\n<tr>\n<td style=\"width: 213.98px;\" data-th=\"Nom\"><span style=\"font-size: 10pt;\"><strong>acSpreadsheetTypeExcel12<\/strong><\/span><\/td>\n<td style=\"width: 46.26px;\" data-th=\"Valeur\"><span style=\"font-size: 10pt;\">9<\/span><\/td>\n<td style=\"width: 374.76px;\" data-th=\"Description\"><span style=\"font-size: 10pt;\">Format Microsoft Excel 2010<\/span><\/td>\n<\/tr>\n<tr>\n<td style=\"width: 213.98px;\" data-th=\"Nom\"><span style=\"font-size: 10pt;\"><strong>acSpreadsheetTypeExcel12Xml<\/strong><\/span><\/td>\n<td style=\"width: 46.26px;\" data-th=\"Valeur\"><span style=\"font-size: 10pt;\">10<\/span><\/td>\n<td style=\"width: 374.76px;\" data-th=\"Description\"><span style=\"font-size: 10pt;\">Format XML Microsoft Excel 2010\/2013\/2016&nbsp;(.xlsx, .xlsm, .xlsb)<\/span><\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<p>Approfondir le sujet : <a href=\"https:\/\/www.auditsi.eu\/?tag=access\">Ma\u00eetriser ACCESS<\/a> \/&nbsp;<a href=\"https:\/\/www.auditsi.eu\/?cat=1569\">Ma\u00eetriser le langage VBA<\/a> \/&nbsp;<a href=\"https:\/\/www.auditsi.eu\/?cat=1820\">Ma\u00eetriser le langage de requ\u00eate SQL<\/a>&nbsp;\/ <a href=\"https:\/\/www.auditsi.eu\/?cat=50\">Analyse de donn\u00e9es<\/a><\/p>\n<div style=\"padding-bottom:20px; padding-top:10px;\" class=\"hupso-share-buttons\"><!-- Hupso Share Buttons - https:\/\/www.hupso.com\/share\/ --><a class=\"hupso_counters\" href=\"https:\/\/www.hupso.com\/share\/\"><img decoding=\"async\" src=\"https:\/\/static.hupso.com\/share\/buttons\/lang\/fr\/share-small.png\" style=\"border:0px; padding-top:2px; float:left;\" alt=\"Share Button\"\/><\/a><script type=\"text\/javascript\">var hupso_services_c=new Array(\"twitter\",\"facebook_like\",\"facebook_send\",\"email\",\"print\",\"linkedin\");var hupso_counters_lang = \"fr_FR\";var hupso_image_folder_url = \"\";var hupso_twitter_via=\"BenoitRiviere14\";var hupso_url_c=\"\";var hupso_title_c=\"MS%2FACCESS%2C%20VBA%20%3A%20%C3%A9crire%20dans%20un%20classeur%20Excel\";<\/script><script type=\"text\/javascript\" src=\"https:\/\/static.hupso.com\/share\/js\/counters.js\"><\/script><!-- Hupso Share Buttons --><\/div>","protected":false},"excerpt":{"rendered":"<p>Le r\u00e9sultat d&#8217;une requ\u00eate SQL est ais\u00e9ment transf\u00e9rable d&#8217;ACCESS&nbsp;vers un classeur Excel \u00e0 l&#8217;aide de la commande VBA&nbsp;TransferSpreadsheet. Exemple : DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12Xml, NomReq, Chemin &amp; NomClasseurXL La syntaxe de cette commande est la suivante : DoCmd.TransferSpreadsheet(TransferType, SpreadsheetType, TableName, FileName, HasFieldNames, Range, UseOA). Param\u00e8tres : Nom Requis \/ Facultatif Type de donn\u00e9es DescriptionDescription TransferType Facultatif &#8230;<\/p>\n<p><a href=\"https:\/\/www.auditsi.eu\/?p=7509\" class=\"more-link\">Continue reading &lsquo;MS\/ACCESS, VBA : \u00e9crire dans un classeur Excel&rsquo; &raquo;<\/a><\/p>\n<div style=\"padding-bottom:20px; padding-top:10px;\" class=\"hupso-share-buttons\"><!-- Hupso Share Buttons - https:\/\/www.hupso.com\/share\/ --><a class=\"hupso_counters\" href=\"https:\/\/www.hupso.com\/share\/\"><img src=\"https:\/\/static.hupso.com\/share\/buttons\/lang\/fr\/share-small.png\" style=\"border:0px; padding-top:2px; float:left;\" alt=\"Share Button\"\/><\/a><script type=\"text\/javascript\">var hupso_services_c=new Array(\"twitter\",\"facebook_like\",\"facebook_send\",\"email\",\"print\",\"linkedin\");var hupso_counters_lang = \"fr_FR\";var hupso_image_folder_url = \"\";var hupso_twitter_via=\"BenoitRiviere14\";var hupso_url_c=\"\";var hupso_title_c=\"MS%2FACCESS%2C%20VBA%20%3A%20%C3%A9crire%20dans%20un%20classeur%20Excel\";<\/script><script type=\"text\/javascript\" src=\"https:\/\/static.hupso.com\/share\/js\/counters.js\"><\/script><!-- Hupso Share Buttons --><\/div>","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"advanced_seo_description":"","jetpack_seo_html_title":"","jetpack_seo_noindex":false,"ngg_post_thumbnail":0,"_jetpack_memberships_contains_paid_content":false,"footnotes":"","_links_to":"","_links_to_target":""},"categories":[1569,215],"tags":[60,1931,1930,1924,1929,985,1928,1926,1927,1641],"class_list":["post-7509","post","type-post","status-publish","format-standard","hentry","category-programmer-en-vba","category-vba","tag-access","tag-acexport","tag-acimport","tag-docmd","tag-exportation-de-donnees","tag-importation-de-donnees","tag-spreadsheettype","tag-transferspreadsheet","tag-transfertype","tag-vba"],"jetpack_featured_media_url":"","jetpack_sharing_enabled":true,"jetpack_likes_enabled":false,"_links":{"self":[{"href":"https:\/\/www.auditsi.eu\/index.php?rest_route=\/wp\/v2\/posts\/7509","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.auditsi.eu\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.auditsi.eu\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.auditsi.eu\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.auditsi.eu\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=7509"}],"version-history":[{"count":9,"href":"https:\/\/www.auditsi.eu\/index.php?rest_route=\/wp\/v2\/posts\/7509\/revisions"}],"predecessor-version":[{"id":7518,"href":"https:\/\/www.auditsi.eu\/index.php?rest_route=\/wp\/v2\/posts\/7509\/revisions\/7518"}],"wp:attachment":[{"href":"https:\/\/www.auditsi.eu\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=7509"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.auditsi.eu\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=7509"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.auditsi.eu\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=7509"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}