{"id":24290,"date":"2022-12-01T22:06:34","date_gmt":"2022-12-01T16:36:34","guid":{"rendered":"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/"},"modified":"2022-12-01T22:06:34","modified_gmt":"2022-12-01T16:36:34","slug":"solved-write-prime-numbers-between-1-to-100-through-vba-coding","status":"publish","type":"post","link":"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/","title":{"rendered":"[Solved] Write prime numbers between 1 to 100 through VBA coding"},"content":{"rendered":"

[ad_1]
\n<\/p>\n

\n
\n
<\/div>\n
\n
\n

I am guessing you were translating this from another language? You really should have pointed out which lines were failing and what you researched.<\/p>\n

The \u201c\u201d<\/code>: Smart quotes. This is typical of when copying between applications, so be careful. The speech marks for use in the visual basic editor need to be \"\"<\/code> in order to compile.<\/p>\n

If you put Option Explicit<\/code> at the top of your code it gives you lots of nice warnings about variable declarations and spellings by the way.<\/p>\n

You are only going to 100 so Integer<\/code> is fine, but there are no advantages of Integer<\/code> over Long<\/code> in this instance, so using Long<\/code> is safer in case you decide, in the future, to go beyond the capacity of an Integer<\/code>, and then you risk overflow. You would also, at a sufficiently high upper limit, need to factor out mod<\/code>. <\/p>\n

\n

The MOD function<\/a> returns an error if the divisor (the second argument
\n in the MOD function), multiplied by 134,217,728, is less than or equal
\n to the number being evaluated (the first argument in the MOD
\n function).<\/p>\n<\/blockquote>\n

Microsoft suggest re-working as =number-(INT(number\/divisor)*divisor)<\/code>; which I guess you could replace INT<\/code> with CLng<\/code> in to keep with Longs.<\/p>\n

Option Explicit\nPrivate Sub cmdPrime_Click()\n    Dim p As Long, n As Long, i As Long, iCounter As Long\n    p = 1\n    With ActiveSheet\n        .Cells(iCounter + 1, 1) = \"Prime Numbers are: \" 'Debug.Print \"Prime Numbers are: \"\n        For n = 2 To 100 ''< As pointed out 1 is not technically a prime btw so can start at 2\n            For i = 2 To n - 1\n                If n Mod i = 0 Then              ' If n - (CLng(n \/ i) * i) = 0 Then\n                    p = 0\n                    Exit For\n                Else\n                    p = 1\n                End If\n            Next\n            If p = 1 Then\n                iCounter = iCounter + 1\n                .Cells(iCounter, 1) = n  'Debug.Print n  \n            End If\n        Next\n    End With\nEnd Sub\n<\/code><\/pre>\n
To preserve for future readers: The additional helpful comments are from @ChrisNeilsen.<\/p>\n
To test if n<\/code> is prime, you only need to test divisability up to square root of n<\/code>. And you only need to test for divisibility by previously detected primes. And you can skip even values of n<\/code>.<\/p>\n<\/p><\/div>\n
<\/div>\n<\/div>\n
            5<\/span> <\/p><\/div>\n<\/div>\n
[ad_2]<\/p>\n
solved Write prime numbers between 1 to 100 through VBA coding <\/p>\n","protected":false},"excerpt":{"rendered":"
[ad_1] I am guessing you were translating this from another language? You really should have pointed out which lines were failing and what you researched. The \u201c\u201d: Smart quotes. This is typical of when copying between applications, so be careful. The speech marks for use in the visual basic editor need to be “” in … Read more<\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[320],"tags":[400,1919,401],"class_list":["post-24290","post","type-post","status-publish","format-standard","hentry","category-solved","tag-excel","tag-primes","tag-vba"],"yoast_head":"\n[Solved] Write prime numbers between 1 to 100 through VBA coding - JassWeb<\/title>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/\" \/>\n<meta property=\"og:locale\" content=\"en_US\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"[Solved] Write prime numbers between 1 to 100 through VBA coding - JassWeb\" \/>\n<meta property=\"og:description\" content=\"[ad_1] I am guessing you were translating this from another language? You really should have pointed out which lines were failing and what you researched. The \u201c\u201d: Smart quotes. This is typical of when copying between applications, so be careful. The speech marks for use in the visual basic editor need to be "" in ... Read more\" \/>\n<meta property=\"og:url\" content=\"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/\" \/>\n<meta property=\"og:site_name\" content=\"JassWeb\" \/>\n<meta property=\"article:published_time\" content=\"2022-12-01T16:36:34+00:00\" \/>\n<meta name=\"author\" content=\"Kirat\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Written by\" \/>\n\t<meta name=\"twitter:data1\" content=\"Kirat\" \/>\n\t<meta name=\"twitter:label2\" content=\"Est. reading time\" \/>\n\t<meta name=\"twitter:data2\" content=\"2 minutes\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"Article\",\"@id\":\"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/#article\",\"isPartOf\":{\"@id\":\"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/\"},\"author\":{\"name\":\"Kirat\",\"@id\":\"https:\/\/jassweb.com\/solved\/#\/schema\/person\/65c9c7b7958150c0dc8371fa35dd7c31\"},\"headline\":\"[Solved] Write prime numbers between 1 to 100 through VBA coding\",\"datePublished\":\"2022-12-01T16:36:34+00:00\",\"mainEntityOfPage\":{\"@id\":\"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/\"},\"wordCount\":251,\"publisher\":{\"@id\":\"https:\/\/jassweb.com\/solved\/#organization\"},\"keywords\":[\"excel\",\"primes\",\"vba\"],\"articleSection\":[\"Solved\"],\"inLanguage\":\"en-US\"},{\"@type\":\"WebPage\",\"@id\":\"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/\",\"url\":\"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/\",\"name\":\"[Solved] Write prime numbers between 1 to 100 through VBA coding - JassWeb\",\"isPartOf\":{\"@id\":\"https:\/\/jassweb.com\/solved\/#website\"},\"datePublished\":\"2022-12-01T16:36:34+00:00\",\"breadcrumb\":{\"@id\":\"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/#breadcrumb\"},\"inLanguage\":\"en-US\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\/\/jassweb.com\/solved\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"[Solved] Write prime numbers between 1 to 100 through VBA coding\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/jassweb.com\/solved\/#website\",\"url\":\"https:\/\/jassweb.com\/solved\/\",\"name\":\"JassWeb\",\"description\":\"Build High-quality Websites\",\"publisher\":{\"@id\":\"https:\/\/jassweb.com\/solved\/#organization\"},\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/jassweb.com\/solved\/?s={search_term_string}\"},\"query-input\":{\"@type\":\"PropertyValueSpecification\",\"valueRequired\":true,\"valueName\":\"search_term_string\"}}],\"inLanguage\":\"en-US\"},{\"@type\":\"Organization\",\"@id\":\"https:\/\/jassweb.com\/solved\/#organization\",\"name\":\"Jass Web\",\"url\":\"https:\/\/jassweb.com\/solved\/\",\"logo\":{\"@type\":\"ImageObject\",\"inLanguage\":\"en-US\",\"@id\":\"https:\/\/jassweb.com\/solved\/#\/schema\/logo\/image\/\",\"url\":\"https:\/\/jassweb.com\/wp-content\/uploads\/2021\/02\/jass-website-logo-1.png\",\"contentUrl\":\"https:\/\/jassweb.com\/wp-content\/uploads\/2021\/02\/jass-website-logo-1.png\",\"width\":693,\"height\":132,\"caption\":\"Jass Web\"},\"image\":{\"@id\":\"https:\/\/jassweb.com\/solved\/#\/schema\/logo\/image\/\"}},{\"@type\":\"Person\",\"@id\":\"https:\/\/jassweb.com\/solved\/#\/schema\/person\/65c9c7b7958150c0dc8371fa35dd7c31\",\"name\":\"Kirat\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"en-US\",\"@id\":\"https:\/\/jassweb.com\/solved\/#\/schema\/person\/image\/\",\"url\":\"https:\/\/jassweb.com\/solved\/wp-content\/litespeed\/avatar\/1261af3c9451399fa1336d28b98ea3bb.jpg?ver=1776403586\",\"contentUrl\":\"https:\/\/jassweb.com\/solved\/wp-content\/litespeed\/avatar\/1261af3c9451399fa1336d28b98ea3bb.jpg?ver=1776403586\",\"caption\":\"Kirat\"},\"sameAs\":[\"http:\/\/jassweb.com\"],\"url\":\"https:\/\/jassweb.com\/solved\/author\/jaspritsinghghumangmail-com\/\"}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"[Solved] Write prime numbers between 1 to 100 through VBA coding - JassWeb","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:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/","og_locale":"en_US","og_type":"article","og_title":"[Solved] Write prime numbers between 1 to 100 through VBA coding - JassWeb","og_description":"[ad_1] I am guessing you were translating this from another language? You really should have pointed out which lines were failing and what you researched. The \u201c\u201d: Smart quotes. This is typical of when copying between applications, so be careful. The speech marks for use in the visual basic editor need to be \"\" in ... Read more","og_url":"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/","og_site_name":"JassWeb","article_published_time":"2022-12-01T16:36:34+00:00","author":"Kirat","twitter_card":"summary_large_image","twitter_misc":{"Written by":"Kirat","Est. reading time":"2 minutes"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"Article","@id":"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/#article","isPartOf":{"@id":"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/"},"author":{"name":"Kirat","@id":"https:\/\/jassweb.com\/solved\/#\/schema\/person\/65c9c7b7958150c0dc8371fa35dd7c31"},"headline":"[Solved] Write prime numbers between 1 to 100 through VBA coding","datePublished":"2022-12-01T16:36:34+00:00","mainEntityOfPage":{"@id":"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/"},"wordCount":251,"publisher":{"@id":"https:\/\/jassweb.com\/solved\/#organization"},"keywords":["excel","primes","vba"],"articleSection":["Solved"],"inLanguage":"en-US"},{"@type":"WebPage","@id":"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/","url":"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/","name":"[Solved] Write prime numbers between 1 to 100 through VBA coding - JassWeb","isPartOf":{"@id":"https:\/\/jassweb.com\/solved\/#website"},"datePublished":"2022-12-01T16:36:34+00:00","breadcrumb":{"@id":"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/#breadcrumb"},"inLanguage":"en-US","potentialAction":[{"@type":"ReadAction","target":["https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/jassweb.com\/solved\/solved-write-prime-numbers-between-1-to-100-through-vba-coding\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/jassweb.com\/solved\/"},{"@type":"ListItem","position":2,"name":"[Solved] Write prime numbers between 1 to 100 through VBA coding"}]},{"@type":"WebSite","@id":"https:\/\/jassweb.com\/solved\/#website","url":"https:\/\/jassweb.com\/solved\/","name":"JassWeb","description":"Build High-quality Websites","publisher":{"@id":"https:\/\/jassweb.com\/solved\/#organization"},"potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/jassweb.com\/solved\/?s={search_term_string}"},"query-input":{"@type":"PropertyValueSpecification","valueRequired":true,"valueName":"search_term_string"}}],"inLanguage":"en-US"},{"@type":"Organization","@id":"https:\/\/jassweb.com\/solved\/#organization","name":"Jass Web","url":"https:\/\/jassweb.com\/solved\/","logo":{"@type":"ImageObject","inLanguage":"en-US","@id":"https:\/\/jassweb.com\/solved\/#\/schema\/logo\/image\/","url":"https:\/\/jassweb.com\/wp-content\/uploads\/2021\/02\/jass-website-logo-1.png","contentUrl":"https:\/\/jassweb.com\/wp-content\/uploads\/2021\/02\/jass-website-logo-1.png","width":693,"height":132,"caption":"Jass Web"},"image":{"@id":"https:\/\/jassweb.com\/solved\/#\/schema\/logo\/image\/"}},{"@type":"Person","@id":"https:\/\/jassweb.com\/solved\/#\/schema\/person\/65c9c7b7958150c0dc8371fa35dd7c31","name":"Kirat","image":{"@type":"ImageObject","inLanguage":"en-US","@id":"https:\/\/jassweb.com\/solved\/#\/schema\/person\/image\/","url":"https:\/\/jassweb.com\/solved\/wp-content\/litespeed\/avatar\/1261af3c9451399fa1336d28b98ea3bb.jpg?ver=1776403586","contentUrl":"https:\/\/jassweb.com\/solved\/wp-content\/litespeed\/avatar\/1261af3c9451399fa1336d28b98ea3bb.jpg?ver=1776403586","caption":"Kirat"},"sameAs":["http:\/\/jassweb.com"],"url":"https:\/\/jassweb.com\/solved\/author\/jaspritsinghghumangmail-com\/"}]}},"_links":{"self":[{"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/posts\/24290","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/comments?post=24290"}],"version-history":[{"count":0,"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/posts\/24290\/revisions"}],"wp:attachment":[{"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/media?parent=24290"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/categories?post=24290"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/tags?post=24290"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}