{"id":58,"date":"2022-04-22T23:54:35","date_gmt":"2022-04-22T20:54:35","guid":{"rendered":"http:\/\/www.cuneytbayrak.com\/?p=58"},"modified":"2025-02-21T00:41:51","modified_gmt":"2025-02-20T21:41:51","slug":"tablolarda-filtre-kriteri-olarak-dizi-kullanma","status":"publish","type":"post","link":"http:\/\/www.cuneytbayrak.com\/?p=58","title":{"rendered":"VBA Tablolarda Filtre Kriteri Olarak Dizi Kullanma"},"content":{"rendered":"<p>Tablolarda filtre kriteri olarak dizi kullanma\u2026\u2026<\/p>\n<div class=\"wp-block-codemirror-blocks code-block \">\n<pre class=\"CodeMirror\" data-setting=\"{&quot;mode&quot;:&quot;vb&quot;,&quot;mime&quot;:&quot;text\/x-vb&quot;,&quot;theme&quot;:&quot;material&quot;,&quot;lineNumbers&quot;:true,&quot;lineWrapping&quot;:false,&quot;styleActiveLine&quot;:false,&quot;readOnly&quot;:true,&quot;align&quot;:&quot;&quot;}\">Sub LISTELE()\r\n \r\nDim ws1 As Worksheet\r\nDim ws2 As Worksheet\r\nDim son As Integer\r\nDim dizi() As String\r\n \r\nSet ws1 = Sheets(\"Sayfa1\")\r\nSet ws2 = Sheets(\"Sayfa2\")\r\n \r\nson = ws1.Cells(Rows.Count, 9).End(xlUp).Row\r\n \r\nReDim dizi(son - 2)\r\n \r\nFor i = 2 To son\r\n \r\ndizi(i - 2) = ws1.Range(\"I\" &amp; i)\r\n \r\nNext\r\n \r\nActiveSheet.ListObjects(\"Sorgu1\").Range.AutoFilter Field:=2, Criteria1:=dizi, Operator:=xlFilterValues\r\n \r\nEnd Sub<\/pre>\n<\/div>\n<p>Kolay gele&#8230;<\/p>\n","protected":false},"excerpt":{"rendered":"<p>Tablolarda filtre kriteri olarak dizi kullanma\u2026\u2026 Sub LISTELE() Dim ws1 As Worksheet Dim ws2 As Worksheet Dim son As Integer Dim dizi() As String Set ws1 = Sheets(&#8220;Sayfa1&#8221;) Set ws2&#8230;<\/p>\n<div class=\"more-link-wrapper\"><a class=\"more-link\" href=\"http:\/\/www.cuneytbayrak.com\/?p=58\">Devam\u0131n\u0131 Oku<span class=\"screen-reader-text\">VBA Tablolarda Filtre Kriteri Olarak Dizi Kullanma<\/span><\/a><\/div>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"iawp_total_views":0,"footnotes":""},"categories":[5],"tags":[16],"class_list":["post-58","post","type-post","status-publish","format-standard","hentry","category-excel-vba","tag-arraycriteria","excerpt"],"_links":{"self":[{"href":"http:\/\/www.cuneytbayrak.com\/index.php?rest_route=\/wp\/v2\/posts\/58","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/www.cuneytbayrak.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/www.cuneytbayrak.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/www.cuneytbayrak.com\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/www.cuneytbayrak.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=58"}],"version-history":[{"count":2,"href":"http:\/\/www.cuneytbayrak.com\/index.php?rest_route=\/wp\/v2\/posts\/58\/revisions"}],"predecessor-version":[{"id":62,"href":"http:\/\/www.cuneytbayrak.com\/index.php?rest_route=\/wp\/v2\/posts\/58\/revisions\/62"}],"wp:attachment":[{"href":"http:\/\/www.cuneytbayrak.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=58"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/www.cuneytbayrak.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=58"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/www.cuneytbayrak.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=58"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}