{"id":3542,"date":"2023-10-22T19:48:52","date_gmt":"2023-10-22T19:48:52","guid":{"rendered":"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/"},"modified":"2023-12-03T11:20:14","modified_gmt":"2023-12-03T11:20:14","slug":"tabelle-mit-nachschlagewerten","status":"publish","type":"page","link":"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/","title":{"rendered":"Wie finde ich mit vba einen wert in einem array?"},"content":{"rendered":"<div class=\"excel-vor-dem-inhalt\" id=\"excel-4178026876\"><script type=\"text\/javascript\">\r\n\tatOptions = {\r\n\t\t'key' : 'c1158f160081d6540a8409e6925dab94',\r\n\t\t'format' : 'iframe',\r\n\t\t'height' : 250,\r\n\t\t'width' : 300,\r\n\t\t'params' : {}\r\n\t};\r\n<\/script>\r\n<script type=\"text\/javascript\" src=\"\/\/www.highperformanceformat.com\/c1158f160081d6540a8409e6925dab94\/invoke.js\"><\/script><\/div> <p>Wenn Sie Werte in einem Array speichern, kann es vorkommen, dass Sie eine Array-Suche durchf\u00fchren m\u00fcssen. In diesem Fall m\u00fcssen Sie die Methoden kennen, die Sie verwenden k\u00f6nnen. Schauen Sie sich nun den folgenden Code an, der Ihnen helfen kann, zu verstehen, wie Sie in einem Array nach einem Wert suchen. <\/p><div class=\"wp-block-image is-style-default\"><figure class=\"aligncenter size-large is-resized\"><img loading=\"lazy\" decoding=\"async\" class=\"wp-image-57290\" src=\"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-rechercher-une-valeur-dans-un-tableau-1.png\" sizes=\"auto, \" srcset=\"\" alt=\"einen Wert in einem Array finden-1\" width=\"709\" height=\"1456\"><\/figure><\/div><ol type=\"1\"><li> Im ersten Teil des Codes befinden sich <a href=\"https:\/\/exceladvisor.org\/de\/variablen\/\">Variablen<\/a> , die Sie sp\u00e4ter im Code verwenden m\u00fcssen.<\/li><li> Danach generiert der n\u00e4chste Teil mithilfe von <a href=\"https:\/\/exceladvisor.org\/de\/runde\/\">RND<\/a> <a href=\"https:\/\/exceladvisor.org\/de\/zufallszahl\/\">Zufallszahlen<\/a> , um die zehn Werte aus dem Array abzurufen.<\/li><li> Anschlie\u00dfend k\u00f6nnen Sie in einem Eingabefeld den Wert eingeben, nach dem Sie in der Tabelle suchen m\u00f6chten.<\/li><li> Danach haben Sie eine Zeile, die mit der <a href=\"https:\/\/exceladvisor.org\/de\/wenn-2\/\">IF-Anweisung<\/a> pr\u00fcft, ob der von Ihnen in das Eingabefeld eingegebene Wert eine Zahl ist oder nicht.<\/li><li> In diesem Teil haben Sie einen Code f\u00fcr die Zeichenfolge, die im <a href=\"https:\/\/exceladvisor.org\/de\/vba-nachrichtenbox\/\">Meldungsfeld<\/a> verwendet werden soll, wenn der von Ihnen eingegebene Wert nicht gefunden wird.<\/li><li> Dieser Teil des Codes verwendet eine <a href=\"https:\/\/exceladvisor.org\/de\/fur-die-schleife\/\">For-Schleife (For Each),<\/a> um <a href=\"https:\/\/exceladvisor.org\/de\/arraygrosse\/\">jedes Element im Array zu durchlaufen<\/a> und zu pr\u00fcfen, ob der von Ihnen eingegebene Wert im Array vorhanden ist oder nicht.<\/li><li> Im letzten Teil des Codes wird eine Meldung angezeigt, die angibt, ob der Wert gefunden wurde oder nicht.<\/li><\/ol><pre class=\"wp-block-code\"> <code class=\"language-visual-basic\" lang=\"visual-basic\">Option Base 1 Sub vba_array_search() 'this section declares an array and variables 'that you need to search within the array. Dim myArray(10) As Integer Dim i As Integer Dim varUserNumber As Variant Dim strMsg As String 'This part of the code adds 10 random numbers to 'the array and shows the result in the 'immediate window as well. For i = 1 To 10 myArray(i) = Int(Rnd * 10) Debug.Print myArray(i) Next i 'it is an input box that asks 'you the number that you want to find Loopback: varUserNumber = InputBox _ (\"Enter a number between 1 and 10 to search for:\", _ \"Linear Search Demonstrator\") 'it's an if statement that checks for the value that you 'have entered in the input box. If varUserNumber = \"\" Then End If Not IsNumeric(varUserNumber) Then GoTo Loopback If varUserNumber &lt; 1 Or varUserNumber &gt; 10 Then GoTo Loopback 'message to show if the value doesn't found. strMsg = \"Your value, \" &amp; varUserNumber &amp; _ \", was not found in the array.\" 'loop through the array and match each value with the 'the value you have entered in the input box. For i = 1 To UBound(myArray) If myArray(i) = varUserNumber Then strMsg = \"Your value, \" &amp; varUserNumber &amp; _ \", was found at position \" &amp; i &amp; \" in the array.\" Exit For End If Next i 'message box in the end MsgBox _ strMsg, vbOKOnly + vbInformation, _ \"Linear Search Result\" End Sub<\/code><\/pre><div class=\"gb-container gb-container-4db6181c gb-container-mt\"> <a class=\"gb-button gb-button-c5897111 gb-button-text gb-button-mt-button\" href=\"https:\/\/exceladvisor.org\/de\/vba\/\">Was ist VBA<\/a><h2 class=\"gb-headline gb-headline-665e5f6b gb-headline-text gb-headline-mt-heading\"> Erfahren Sie mehr \u00fcber <a href=\"https:\/\/exceladvisor.org\/de\/gemalde\/\">VBA-Tabellen<\/a> <\/h2><div class=\"gb-grid-wrapper gb-grid-wrapper-a20baf7c gb-grid-wrapper-mt-grid\"><div class=\"gb-grid-column gb-grid-column-65ddf67e\"><div class=\"gb-container gb-container-65ddf67e\"><ul><li> <a href=\"https:\/\/exceladvisor.org\/de\/fugen-sie-ein-neues-wertearray-hinzu\/\">VBA Neuen Wert zum Array hinzuf\u00fcgen<\/a><\/li><li> <a href=\"https:\/\/exceladvisor.org\/de\/arraygrosse\/\">VBA-Array-L\u00e4nge (Gr\u00f6\u00dfe)<\/a><\/li><li> <a href=\"https:\/\/exceladvisor.org\/de\/tisch-mit-ketten\/\">VBA-Array mit Strings<\/a><\/li><li> <a href=\"https:\/\/exceladvisor.org\/de\/losch-die-tafel\/\">VBA Array l\u00f6schen<\/a><\/li><li> <a href=\"https:\/\/exceladvisor.org\/de\/dynamische-tabelle\/\">Dynamische Tabelle VBA<\/a><\/li><\/ul><\/div><\/div><\/div><\/div>","protected":false},"excerpt":{"rendered":"","protected":false},"author":1,"featured_media":0,"parent":0,"menu_order":0,"comment_status":"open","ping_status":"closed","template":"","meta":{"ub_ctt_via":"","footnotes":""},"class_list":["post-3542","page","type-page","status-publish","hentry"],"featured_image_src":null,"yoast_head":"<!-- This site is optimized with the Yoast SEO plugin v25.4 - https:\/\/yoast.com\/wordpress\/plugins\/seo\/ -->\n<title>Wie finde ich mit VBA einen Wert in einem Array?<\/title>\n<meta name=\"description\" content=\"In diesem Tutorial erfahren Sie, wie Sie ein Array mithilfe einer Schleife durchsuchen.\" \/>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/\" \/>\n<meta property=\"og:locale\" content=\"de_DE\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"Wie finde ich mit VBA einen Wert in einem Array?\" \/>\n<meta property=\"og:description\" content=\"In diesem Tutorial erfahren Sie, wie Sie ein Array mithilfe einer Schleife durchsuchen.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/\" \/>\n<meta property=\"og:site_name\" content=\"Excel Advisor\" \/>\n<meta property=\"article:modified_time\" content=\"2023-12-03T11:20:14+00:00\" \/>\n<meta property=\"og:image\" content=\"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-rechercher-une-valeur-dans-un-tableau-1.png\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Gesch\u00e4tzte Lesezeit\" \/>\n\t<meta name=\"twitter:data1\" content=\"2\u00a0Minuten\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"WebPage\",\"@id\":\"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/\",\"url\":\"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/\",\"name\":\"Wie finde ich mit VBA einen Wert in einem Array?\",\"isPartOf\":{\"@id\":\"https:\/\/exceladvisor.org\/de\/#website\"},\"primaryImageOfPage\":{\"@id\":\"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/#primaryimage\"},\"image\":{\"@id\":\"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/#primaryimage\"},\"thumbnailUrl\":\"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-rechercher-une-valeur-dans-un-tableau-1.png\",\"datePublished\":\"2023-10-22T19:48:52+00:00\",\"dateModified\":\"2023-12-03T11:20:14+00:00\",\"description\":\"In diesem Tutorial erfahren Sie, wie Sie ein Array mithilfe einer Schleife durchsuchen.\",\"breadcrumb\":{\"@id\":\"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/#breadcrumb\"},\"inLanguage\":\"de\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/\"]}]},{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/#primaryimage\",\"url\":\"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-rechercher-une-valeur-dans-un-tableau-1.png\",\"contentUrl\":\"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-rechercher-une-valeur-dans-un-tableau-1.png\"},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Accueil\",\"item\":\"https:\/\/exceladvisor.org\/de\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Wie finde ich mit vba einen wert in einem array?\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/exceladvisor.org\/de\/#website\",\"url\":\"https:\/\/exceladvisor.org\/de\/\",\"name\":\"Excel Advisor\",\"description\":\"Ihr Leitfaden zur Datendominanz\",\"publisher\":{\"@id\":\"https:\/\/exceladvisor.org\/de\/#organization\"},\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/exceladvisor.org\/de\/?s={search_term_string}\"},\"query-input\":{\"@type\":\"PropertyValueSpecification\",\"valueRequired\":true,\"valueName\":\"search_term_string\"}}],\"inLanguage\":\"de\"},{\"@type\":\"Organization\",\"@id\":\"https:\/\/exceladvisor.org\/de\/#organization\",\"name\":\"Excel Advisor\",\"url\":\"https:\/\/exceladvisor.org\/de\/\",\"logo\":{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\/\/exceladvisor.org\/de\/#\/schema\/logo\/image\/\",\"url\":\"https:\/\/exceladvisor.org\/de\/wp-content\/uploads\/2023\/11\/exceladvisor.org_.png\",\"contentUrl\":\"https:\/\/exceladvisor.org\/de\/wp-content\/uploads\/2023\/11\/exceladvisor.org_.png\",\"width\":105,\"height\":36,\"caption\":\"Excel Advisor\"},\"image\":{\"@id\":\"https:\/\/exceladvisor.org\/de\/#\/schema\/logo\/image\/\"}}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"Wie finde ich mit VBA einen Wert in einem Array?","description":"In diesem Tutorial erfahren Sie, wie Sie ein Array mithilfe einer Schleife durchsuchen.","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:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/","og_locale":"de_DE","og_type":"article","og_title":"Wie finde ich mit VBA einen Wert in einem Array?","og_description":"In diesem Tutorial erfahren Sie, wie Sie ein Array mithilfe einer Schleife durchsuchen.","og_url":"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/","og_site_name":"Excel Advisor","article_modified_time":"2023-12-03T11:20:14+00:00","og_image":[{"url":"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-rechercher-une-valeur-dans-un-tableau-1.png","type":"","width":"","height":""}],"twitter_card":"summary_large_image","twitter_misc":{"Gesch\u00e4tzte Lesezeit":"2\u00a0Minuten"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"WebPage","@id":"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/","url":"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/","name":"Wie finde ich mit VBA einen Wert in einem Array?","isPartOf":{"@id":"https:\/\/exceladvisor.org\/de\/#website"},"primaryImageOfPage":{"@id":"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/#primaryimage"},"image":{"@id":"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/#primaryimage"},"thumbnailUrl":"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-rechercher-une-valeur-dans-un-tableau-1.png","datePublished":"2023-10-22T19:48:52+00:00","dateModified":"2023-12-03T11:20:14+00:00","description":"In diesem Tutorial erfahren Sie, wie Sie ein Array mithilfe einer Schleife durchsuchen.","breadcrumb":{"@id":"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/#breadcrumb"},"inLanguage":"de","potentialAction":[{"@type":"ReadAction","target":["https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/"]}]},{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/#primaryimage","url":"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-rechercher-une-valeur-dans-un-tableau-1.png","contentUrl":"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-rechercher-une-valeur-dans-un-tableau-1.png"},{"@type":"BreadcrumbList","@id":"https:\/\/exceladvisor.org\/de\/tabelle-mit-nachschlagewerten\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Accueil","item":"https:\/\/exceladvisor.org\/de\/"},{"@type":"ListItem","position":2,"name":"Wie finde ich mit vba einen wert in einem array?"}]},{"@type":"WebSite","@id":"https:\/\/exceladvisor.org\/de\/#website","url":"https:\/\/exceladvisor.org\/de\/","name":"Excel Advisor","description":"Ihr Leitfaden zur Datendominanz","publisher":{"@id":"https:\/\/exceladvisor.org\/de\/#organization"},"potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/exceladvisor.org\/de\/?s={search_term_string}"},"query-input":{"@type":"PropertyValueSpecification","valueRequired":true,"valueName":"search_term_string"}}],"inLanguage":"de"},{"@type":"Organization","@id":"https:\/\/exceladvisor.org\/de\/#organization","name":"Excel Advisor","url":"https:\/\/exceladvisor.org\/de\/","logo":{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/exceladvisor.org\/de\/#\/schema\/logo\/image\/","url":"https:\/\/exceladvisor.org\/de\/wp-content\/uploads\/2023\/11\/exceladvisor.org_.png","contentUrl":"https:\/\/exceladvisor.org\/de\/wp-content\/uploads\/2023\/11\/exceladvisor.org_.png","width":105,"height":36,"caption":"Excel Advisor"},"image":{"@id":"https:\/\/exceladvisor.org\/de\/#\/schema\/logo\/image\/"}}]}},"yoast_meta":{"yoast_wpseo_title":"","yoast_wpseo_metadesc":"","yoast_wpseo_canonical":""},"_links":{"self":[{"href":"https:\/\/exceladvisor.org\/de\/wp-json\/wp\/v2\/pages\/3542","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/exceladvisor.org\/de\/wp-json\/wp\/v2\/pages"}],"about":[{"href":"https:\/\/exceladvisor.org\/de\/wp-json\/wp\/v2\/types\/page"}],"author":[{"embeddable":true,"href":"https:\/\/exceladvisor.org\/de\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/exceladvisor.org\/de\/wp-json\/wp\/v2\/comments?post=3542"}],"version-history":[{"count":1,"href":"https:\/\/exceladvisor.org\/de\/wp-json\/wp\/v2\/pages\/3542\/revisions"}],"predecessor-version":[{"id":3994,"href":"https:\/\/exceladvisor.org\/de\/wp-json\/wp\/v2\/pages\/3542\/revisions\/3994"}],"wp:attachment":[{"href":"https:\/\/exceladvisor.org\/de\/wp-json\/wp\/v2\/media?parent=3542"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}