{"id":4979,"date":"2023-07-05T16:08:23","date_gmt":"2023-07-05T16:08:23","guid":{"rendered":"https:\/\/statorials.org\/it\/vba-controlla-se-la-cartella-di-lavoro-e-aperta\/"},"modified":"2023-07-05T16:08:23","modified_gmt":"2023-07-05T16:08:23","slug":"vba-controlla-se-la-cartella-di-lavoro-e-aperta","status":"publish","type":"post","link":"https:\/\/statorials.org\/it\/vba-controlla-se-la-cartella-di-lavoro-e-aperta\/","title":{"rendered":"Vba: controlla se la cartella di lavoro \u00e8 aperta (con esempio)"},"content":{"rendered":"<p><\/p>\n<hr>\n<p><span style=\"color: #000000;\">\u00c8 possibile utilizzare la seguente sintassi in VBA per verificare se una particolare cartella di lavoro \u00e8 attualmente aperta.<\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <span style=\"color: #000000;\"><strong><span style=\"color: #0000ff;\">SubCheckWorkbookOpen<\/span> ()\n\n<span style=\"color: #0000ff;\">Dim<\/span> resultCheck <span style=\"color: #0000ff;\">As<\/span> Boolean\n<span style=\"color: #0000ff;\">Dim<\/span> wb <span style=\"color: #0000ff;\">As<\/span> Workbook\n<span style=\"color: #0000ff;\">Dim<\/span> specific_wb <span style=\"color: #0000ff;\">As<\/span> String\n    \n<span style=\"color: #0000ff;\">On Error Resume Next<\/span>\nspecific_wb = InputBox(\"Check if this workbook is open:\")\n    \n<span style=\"color: #0000ff;\">Set<\/span> wb = Application.Workbooks.Item(specific_wb)\nresultCheck = <span style=\"color: #0000ff;\">Not<\/span> wb <span style=\"color: #0000ff;\">Is Nothing<\/span>\n\n<span style=\"color: #0000ff;\">If<\/span> resultCheck <span style=\"color: #0000ff;\">Then<\/span>\n    MsgBox \u201cWorkbook is open\u201d\n<span style=\"color: #0000ff;\">Else\n<\/span>MsgBox \u201cWorkbook is not open\u201d\n<span style=\"color: #0000ff;\">End If\n<\/span>    \n<span style=\"color: #0000ff;\">End Sub\n<\/span><\/strong><\/span><\/pre>\n<p> <span style=\"color: #000000;\">Quando viene eseguita questa macro, verr\u00e0 visualizzata una casella di input in cui un utente pu\u00f2 digitare il nome di una cartella di lavoro di Excel e la macro produrr\u00e0 una finestra di messaggio con uno dei seguenti risultati:<\/span><\/p>\n<ul>\n<li> <span style=\"color: #000000;\">\u201cIl dossier \u00e8 aperto\u201d<\/span><\/li>\n<li> <span style=\"color: #000000;\">\u201cIl file non \u00e8 aperto\u201d<\/span><\/li>\n<\/ul>\n<p> <span style=\"color: #000000;\">L&#8217;esempio seguente mostra come utilizzare questa sintassi nella pratica.<\/span><\/p>\n<h2> <span style=\"color: #000000;\"><strong>Esempio: come verificare se la cartella di lavoro \u00e8 aperta utilizzando VBA<\/strong><\/span><\/h2>\n<p> <span style=\"color: #000000;\">Supponiamo che attualmente abbiamo due cartelle di lavoro aperte con i seguenti nomi:<\/span><\/p>\n<ul>\n<li> <span style=\"color: #000000;\"><strong>mia_cartelladilavoro1.xlsx<\/strong><\/span><\/li>\n<li> <span style=\"color: #000000;\"><strong>mia_cartelladilavoro2.xlsx<\/strong><\/span><\/li>\n<\/ul>\n<p> <span style=\"color: #000000;\">Supponiamo di voler verificare se la cartella di lavoro denominata <strong>my_workbook1.xlsx<\/strong> \u00e8 attualmente aperta.<\/span><\/p>\n<p> <span style=\"color: #000000;\">Per fare ci\u00f2 possiamo creare la seguente macro:<\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <span style=\"color: #000000;\"><strong><span style=\"color: #0000ff;\">SubCheckWorkbookOpen<\/span> ()\n\n<span style=\"color: #0000ff;\">Dim<\/span> resultCheck <span style=\"color: #0000ff;\">As<\/span> Boolean\n<span style=\"color: #0000ff;\">Dim<\/span> wb <span style=\"color: #0000ff;\">As<\/span> Workbook\n<span style=\"color: #0000ff;\">Dim<\/span> specific_wb <span style=\"color: #0000ff;\">As<\/span> String\n    \n<span style=\"color: #0000ff;\">On Error Resume Next<\/span>\nspecific_wb = InputBox(\"Check if this workbook is open:\")\n    \n<span style=\"color: #0000ff;\">Set<\/span> wb = Application.Workbooks.Item(specific_wb)\nresultCheck = <span style=\"color: #0000ff;\">Not<\/span> wb <span style=\"color: #0000ff;\">Is Nothing<\/span>\n\n<span style=\"color: #0000ff;\">If<\/span> resultCheck <span style=\"color: #0000ff;\">Then<\/span>\n    MsgBox \u201cWorkbook is open\u201d\n<span style=\"color: #0000ff;\">Else\n<\/span>MsgBox \u201cWorkbook is not open\u201d\n<span style=\"color: #0000ff;\">End If\n<\/span>    \n<span style=\"color: #0000ff;\">End Sub<\/span><\/strong><\/span><\/pre>\n<p> <span style=\"color: #000000;\">Una volta eseguita questa macro, verr\u00e0 visualizzata una casella in cui posso digitare <strong>my_workbook1.xlsx<\/strong> nella casella di input:<\/span> <\/p>\n<p><img decoding=\"async\" loading=\"lazy\" class=\" wp-image-38820 aligncenter\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/checko1.png\" alt=\"\" width=\"532\" height=\"381\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\">Dopo aver fatto clic su <strong>OK<\/strong> , la macro produrr\u00e0 la seguente finestra di messaggio:<\/span> <\/p>\n<p><img decoding=\"async\" loading=\"lazy\" class=\" wp-image-38821 aligncenter\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/checko2.png\" alt=\"\" width=\"486\" height=\"416\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\">La macro visualizza correttamente &#8220;La cartella di lavoro \u00e8 aperta&#8221; per indicare che una cartella di lavoro con quel nome \u00e8 attualmente aperta.<\/span><\/p>\n<p> <span style=\"color: #000000;\">Supponiamo ora di aver digitato il nome di una cartella di lavoro che non \u00e8 attualmente aperta:<\/span> <\/p>\n<p><img decoding=\"async\" loading=\"lazy\" class=\" wp-image-38822 aligncenter\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/checko3.png\" alt=\"\" width=\"553\" height=\"374\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\">Dopo aver fatto clic su <strong>OK<\/strong> , la macro produrr\u00e0 la seguente finestra di messaggio:<\/span> <\/p>\n<p><img decoding=\"async\" loading=\"lazy\" class=\" wp-image-38823 aligncenter\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/checko4.png\" alt=\"\" width=\"476\" height=\"389\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\">La macro visualizza correttamente &#8220;La cartella di lavoro non \u00e8 aperta&#8221; per indicare che una cartella di lavoro con quello nome non \u00e8 attualmente aperta.<\/span><\/p>\n<h2> <span style=\"color: #000000;\"><strong>Risorse addizionali<\/strong><\/span><\/h2>\n<p> <span style=\"color: #000000;\">I seguenti tutorial spiegano come eseguire altre attivit\u00e0 comuni in VBA:<\/span><\/p>\n<p> <span style=\"color: #000000;\"><a href=\"https:\/\/statorials.org\/it\/vba-conteggio-numero-di-fogli\/\" target=\"_blank\" rel=\"noopener\">VBA: come contare il numero di fogli in una cartella di lavoro<\/a><br \/> <a href=\"https:\/\/statorials.org\/it\/vba-inserisce-piu-colonne\/\" target=\"_blank\" rel=\"noopener\">VBA: come inserire pi\u00f9 colonne<\/a><br \/> <a href=\"https:\/\/statorials.org\/it\/vba-inserisce-piu-righe\/\" target=\"_blank\" rel=\"noopener\">VBA: come inserire pi\u00f9 righe<\/a><\/span><\/p>\n","protected":false},"excerpt":{"rendered":"<p>\u00c8 possibile utilizzare la seguente sintassi in VBA per verificare se una particolare cartella di lavoro \u00e8 attualmente aperta. SubCheckWorkbookOpen () Dim resultCheck As Boolean Dim wb As Workbook Dim specific_wb As String On Error Resume Next specific_wb = InputBox(&#8220;Check if this workbook is open:&#8221;) Set wb = Application.Workbooks.Item(specific_wb) resultCheck = Not wb Is Nothing [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[11],"tags":[],"yoast_head":"<!-- This site is optimized with the Yoast SEO plugin v21.5 - https:\/\/yoast.com\/wordpress\/plugins\/seo\/ -->\n<title>VBA: controlla se la cartella di lavoro \u00e8 aperta (con esempio) - Statorials<\/title>\n<meta name=\"description\" content=\"Questo tutorial spiega come verificare se una cartella di lavoro di Excel \u00e8 aperta utilizzando VBA, con un esempio.\" \/>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/statorials.org\/it\/vba-controlla-se-la-cartella-di-lavoro-e-aperta\/\" \/>\n<meta property=\"og:locale\" content=\"it_IT\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"VBA: controlla se la cartella di lavoro \u00e8 aperta (con esempio) - Statorials\" \/>\n<meta property=\"og:description\" content=\"Questo tutorial spiega come verificare se una cartella di lavoro di Excel \u00e8 aperta utilizzando VBA, con un esempio.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/statorials.org\/it\/vba-controlla-se-la-cartella-di-lavoro-e-aperta\/\" \/>\n<meta property=\"og:site_name\" content=\"Statorials\" \/>\n<meta property=\"article:published_time\" content=\"2023-07-05T16:08:23+00:00\" \/>\n<meta property=\"og:image\" content=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/checko1.png\" \/>\n<meta name=\"author\" content=\"Benjamin anderson\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Written by\" \/>\n\t<meta name=\"twitter:data1\" content=\"Benjamin anderson\" \/>\n\t<meta name=\"twitter:label2\" content=\"Est. reading time\" \/>\n\t<meta name=\"twitter:data2\" content=\"2 minuti\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"WebPage\",\"@id\":\"https:\/\/statorials.org\/it\/vba-controlla-se-la-cartella-di-lavoro-e-aperta\/\",\"url\":\"https:\/\/statorials.org\/it\/vba-controlla-se-la-cartella-di-lavoro-e-aperta\/\",\"name\":\"VBA: controlla se la cartella di lavoro \u00e8 aperta (con esempio) - Statorials\",\"isPartOf\":{\"@id\":\"https:\/\/statorials.org\/it\/#website\"},\"datePublished\":\"2023-07-05T16:08:23+00:00\",\"dateModified\":\"2023-07-05T16:08:23+00:00\",\"author\":{\"@id\":\"https:\/\/statorials.org\/it\/#\/schema\/person\/0896f191fb9fb019f2cd8623112cb3ae\"},\"description\":\"Questo tutorial spiega come verificare se una cartella di lavoro di Excel \u00e8 aperta utilizzando VBA, con un esempio.\",\"breadcrumb\":{\"@id\":\"https:\/\/statorials.org\/it\/vba-controlla-se-la-cartella-di-lavoro-e-aperta\/#breadcrumb\"},\"inLanguage\":\"it-IT\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/statorials.org\/it\/vba-controlla-se-la-cartella-di-lavoro-e-aperta\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/statorials.org\/it\/vba-controlla-se-la-cartella-di-lavoro-e-aperta\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Casa\",\"item\":\"https:\/\/statorials.org\/it\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Vba: controlla se la cartella di lavoro \u00e8 aperta (con esempio)\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/statorials.org\/it\/#website\",\"url\":\"https:\/\/statorials.org\/it\/\",\"name\":\"Statorials\",\"description\":\"La tua guida all&#039;alfabetizzazione statistica!\",\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/statorials.org\/it\/?s={search_term_string}\"},\"query-input\":\"required name=search_term_string\"}],\"inLanguage\":\"it-IT\"},{\"@type\":\"Person\",\"@id\":\"https:\/\/statorials.org\/it\/#\/schema\/person\/0896f191fb9fb019f2cd8623112cb3ae\",\"name\":\"Benjamin anderson\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"it-IT\",\"@id\":\"https:\/\/statorials.org\/it\/#\/schema\/person\/image\/\",\"url\":\"https:\/\/statorials.org\/it\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg\",\"contentUrl\":\"https:\/\/statorials.org\/it\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg\",\"caption\":\"Benjamin anderson\"},\"description\":\"Ciao, sono Benjamin, un professore di statistica in pensione diventato insegnante dedicato di Statorials. Con una vasta esperienza e competenza nel campo della statistica, sono ansioso di condividere le mie conoscenze per potenziare gli studenti attraverso Statorials. Scopri di pi\u00f9\",\"sameAs\":[\"https:\/\/statorials.org\/it\"]}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"VBA: controlla se la cartella di lavoro \u00e8 aperta (con esempio) - Statorials","description":"Questo tutorial spiega come verificare se una cartella di lavoro di Excel \u00e8 aperta utilizzando VBA, con un esempio.","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/statorials.org\/it\/vba-controlla-se-la-cartella-di-lavoro-e-aperta\/","og_locale":"it_IT","og_type":"article","og_title":"VBA: controlla se la cartella di lavoro \u00e8 aperta (con esempio) - Statorials","og_description":"Questo tutorial spiega come verificare se una cartella di lavoro di Excel \u00e8 aperta utilizzando VBA, con un esempio.","og_url":"https:\/\/statorials.org\/it\/vba-controlla-se-la-cartella-di-lavoro-e-aperta\/","og_site_name":"Statorials","article_published_time":"2023-07-05T16:08:23+00:00","og_image":[{"url":"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/checko1.png"}],"author":"Benjamin anderson","twitter_card":"summary_large_image","twitter_misc":{"Written by":"Benjamin anderson","Est. reading time":"2 minuti"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"WebPage","@id":"https:\/\/statorials.org\/it\/vba-controlla-se-la-cartella-di-lavoro-e-aperta\/","url":"https:\/\/statorials.org\/it\/vba-controlla-se-la-cartella-di-lavoro-e-aperta\/","name":"VBA: controlla se la cartella di lavoro \u00e8 aperta (con esempio) - Statorials","isPartOf":{"@id":"https:\/\/statorials.org\/it\/#website"},"datePublished":"2023-07-05T16:08:23+00:00","dateModified":"2023-07-05T16:08:23+00:00","author":{"@id":"https:\/\/statorials.org\/it\/#\/schema\/person\/0896f191fb9fb019f2cd8623112cb3ae"},"description":"Questo tutorial spiega come verificare se una cartella di lavoro di Excel \u00e8 aperta utilizzando VBA, con un esempio.","breadcrumb":{"@id":"https:\/\/statorials.org\/it\/vba-controlla-se-la-cartella-di-lavoro-e-aperta\/#breadcrumb"},"inLanguage":"it-IT","potentialAction":[{"@type":"ReadAction","target":["https:\/\/statorials.org\/it\/vba-controlla-se-la-cartella-di-lavoro-e-aperta\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/statorials.org\/it\/vba-controlla-se-la-cartella-di-lavoro-e-aperta\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Casa","item":"https:\/\/statorials.org\/it\/"},{"@type":"ListItem","position":2,"name":"Vba: controlla se la cartella di lavoro \u00e8 aperta (con esempio)"}]},{"@type":"WebSite","@id":"https:\/\/statorials.org\/it\/#website","url":"https:\/\/statorials.org\/it\/","name":"Statorials","description":"La tua guida all&#039;alfabetizzazione statistica!","potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/statorials.org\/it\/?s={search_term_string}"},"query-input":"required name=search_term_string"}],"inLanguage":"it-IT"},{"@type":"Person","@id":"https:\/\/statorials.org\/it\/#\/schema\/person\/0896f191fb9fb019f2cd8623112cb3ae","name":"Benjamin anderson","image":{"@type":"ImageObject","inLanguage":"it-IT","@id":"https:\/\/statorials.org\/it\/#\/schema\/person\/image\/","url":"https:\/\/statorials.org\/it\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg","contentUrl":"https:\/\/statorials.org\/it\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg","caption":"Benjamin anderson"},"description":"Ciao, sono Benjamin, un professore di statistica in pensione diventato insegnante dedicato di Statorials. Con una vasta esperienza e competenza nel campo della statistica, sono ansioso di condividere le mie conoscenze per potenziare gli studenti attraverso Statorials. Scopri di pi\u00f9","sameAs":["https:\/\/statorials.org\/it"]}]}},"yoast_meta":{"yoast_wpseo_title":"","yoast_wpseo_metadesc":"","yoast_wpseo_canonical":""},"_links":{"self":[{"href":"https:\/\/statorials.org\/it\/wp-json\/wp\/v2\/posts\/4979"}],"collection":[{"href":"https:\/\/statorials.org\/it\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/statorials.org\/it\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/statorials.org\/it\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/statorials.org\/it\/wp-json\/wp\/v2\/comments?post=4979"}],"version-history":[{"count":0,"href":"https:\/\/statorials.org\/it\/wp-json\/wp\/v2\/posts\/4979\/revisions"}],"wp:attachment":[{"href":"https:\/\/statorials.org\/it\/wp-json\/wp\/v2\/media?parent=4979"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/statorials.org\/it\/wp-json\/wp\/v2\/categories?post=4979"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/statorials.org\/it\/wp-json\/wp\/v2\/tags?post=4979"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}