sorel Posted July 28, 2017 Author Share Posted July 28, 2017 coelho ou edcronos ou oriegor preciso ativar o codigo por favor Function RandBetweenSpecial(MinVal As Long, MaxVal As Long) Dim X As Integer, TA As Integer, TB As Integer Line1: K = Format(WorksheetFunction.RandBetween(MinVal, MaxVal), "000") X = 0 For TA = 3 To 9 Step 3 For TB = 1 To 3 L = Mid(K, TB, 1) If Mid(K, TB, 1) = Format(TA, "0") Then X = X + 1 Next TB Next TA If X <> 1 Then GoTo Line1 RandBetweenSpecial = K End Function Quote Link to comment Share on other sites More sharing options...
Guest Zangado Posted July 28, 2017 Share Posted July 28, 2017 14 minutos atrás, sorel disse: coelho ou edcronos ou oriegor preciso ativar o codigo por favor Function RandBetweenSpecial(MinVal As Long, MaxVal As Long) Dim X As Integer, TA As Integer, TB As Integer Line1: K = Format(WorksheetFunction.RandBetween(MinVal, MaxVal), "000") X = 0 For TA = 3 To 9 Step 3 For TB = 1 To 3 L = Mid(K, TB, 1) If Mid(K, TB, 1) = Format(TA, "0") Then X = X + 1 Next TB Next TA If X <> 1 Then GoTo Line1 RandBetweenSpecial = K End Function isso não tem nada a ver com padrões e frequências e sim aleatorio é só pegar a planilha de aleatorio que postei, serve para qualquer loteria Quote Link to comment Share on other sites More sharing options...
sorel Posted July 29, 2017 Author Share Posted July 29, 2017 eu sei so preciso da ajuda de ativar por favor desculpe por nao ser do topico como faço para ativar? Quote Link to comment Share on other sites More sharing options...
Guest Zangado Posted July 29, 2017 Share Posted July 29, 2017 1 hora atrás, sorel disse: so preciso da ajuda de ativar por favor ativar oq sorel é só colar em um modulo e usar como formula na planilha Quote Link to comment Share on other sites More sharing options...
sorel Posted July 29, 2017 Author Share Posted July 29, 2017 sim é isto !pois é nao consegui, so gera duas formaçoes preciso de 000 a 999 consegue por favor Quote Link to comment Share on other sites More sharing options...
sorel Posted July 29, 2017 Author Share Posted July 29, 2017 porque so ger duas treciso de todas de 000 a 999 http://www.mediafire.com/file/espv9wm39fc3ryz/530513d1501257367 Quote Link to comment Share on other sites More sharing options...
sorel Posted July 29, 2017 Author Share Posted July 29, 2017 coelho nao estou conseguindo eu preiciso de todsas de 000 a 999 pode ver isto abraço do coelho Quote Link to comment Share on other sites More sharing options...
sorel Posted July 29, 2017 Author Share Posted July 29, 2017 coelho outra formula mas ´com o mesmo objetivo filtrar 3,6,9 =SUBSTITUTE(SUBSTITUTE(MID("XY"&CHOOSE(RANDBETWEEN(1,7),0,1,2,4,5,7,8)&"XY",RANDBETWEEN(1,3),3) ,"X",RANDBETWEEN(1,3)*3),"Y",CHOOSE(RANDBETWEEN(1,7),0,1,2,4,5,7,8)) Quote Link to comment Share on other sites More sharing options...
Guest Zangado Posted July 29, 2017 Share Posted July 29, 2017 @sorel a função gera sim de 0 até 999 ela trabalha com um numero minimo e maximo =RandBetweenSpecial( valor minimo; valor maximo) =RandBetweenSpecial( 1 ; 99 ) não vai até 999 nunca e desculpa sorel, eu posso até ser enrolado, mas tem hora que vc quer é atrapalhar Quote Link to comment Share on other sites More sharing options...
sorel Posted July 29, 2017 Author Share Posted July 29, 2017 meu deus do ceu eu so preciso ativar esta funçao? por favor eu preciso das formaçoes ela filtra as formaçoes de 3,6,9 PEDIDO eu preciso que ative, faça funcionar eu noa estou conseguindo já falei sou zero no exel pode fazer funcionar o que o sorel quer? ativar a funçao por favor Quote Link to comment Share on other sites More sharing options...
Guest Zangado Posted July 29, 2017 Share Posted July 29, 2017 15 minutos atrás, sorel disse: meu deus do ceu eu so preciso ativar esta funçao? por favor eu preciso das formaçoes ela filtra as formaçoes de 3,6,9 PEDIDO eu preciso que ative, faça funcionar eu noa estou conseguindo já falei sou zero no exel pode fazer funcionar o que o sorel quer? ativar a funçao por favor sorel aprenda pelo menos o basico do excel e vba senão o pessoal vai ter que servir de baba te dando papinha na boca Quote Link to comment Share on other sites More sharing options...
Guest Zangado Posted July 29, 2017 Share Posted July 29, 2017 e outra sorel, a função funciona, mas ela é apenas como uma engrenagem, não vai trabalhar sozinha , ela precisa de outros mecanismos para fazer oq vc quer, que aliais eu nem tenho ideia "e nem quero saber" Quote Link to comment Share on other sites More sharing options...
sorel Posted July 29, 2017 Author Share Posted July 29, 2017 camioneiro nao nao teve tempo de aprender COELHO Quantas linhas você quer ????? COELHO NAOQUANTAS LINHAS MEU DEUS DO CEU É TODAS DE 000 A 999 Quote Link to comment Share on other sites More sharing options...
sorel Posted July 29, 2017 Author Share Posted July 29, 2017 o que quero? preciso de todas as formaçoes de 000 a 999 ( é para jogo de bicho) que tenha um dos digtios 3,6,9 tesla entao 003 988 nao pode ter 3,6 6,9 dois somente um porque nos 5 premios do jogo do bilho em 95% sempre tem do 1,5 uma centena que tenha um digito ou 3,ou 6, ou 9 consegue fazer fazer todas e filtra como? por favor Quote Link to comment Share on other sites More sharing options...
sorel Posted July 29, 2017 Author Share Posted July 29, 2017 986= nao pode ter 3,6 6,9 dois corringo nao pode ter dois Quote Link to comment Share on other sites More sharing options...
sorel Posted July 29, 2017 Author Share Posted July 29, 2017 edcronos depois de gerar todas de 000 a 999 com 3,6,9 separar uma somente exemplo 941=149, 919 ,419 914 491 porque vou jogar no invertido so preciso de uma do conjunto de 6 entao se der uma 350 formçooes pode dar 50a 60 quero jogar no invertido consegue filtrar? Quote Link to comment Share on other sites More sharing options...
Guest Zangado Posted July 29, 2017 Share Posted July 29, 2017 7 minutos atrás, sorel disse: edcronos depois de gerar todas de 000 a 999 com 3,6,9 separar uma somente exemplo 941=149, 919 ,419 914 491 porque vou jogar no invertido so preciso de uma do conjunto de 6 entao se der uma 350 formçooes pode dar 50a 60 quero jogar no invertido consegue filtrar? e oq isso tem a ver com a função de aleatorio? isso é sobre combinações e é para jb cara vc gosta de complicar Quote Link to comment Share on other sites More sharing options...
sorel Posted July 29, 2017 Author Share Posted July 29, 2017 eu sei so postei porque é meu post desculpe, da para fazer ou nao? Quote Link to comment Share on other sites More sharing options...
Guest Zangado Posted July 29, 2017 Share Posted July 29, 2017 1 hora atrás, sorel disse: eu sei so postei porque é meu post desculpe, da para fazer ou nao? infelizmente sorel, não estou conseguindo fazer nem minhas coisas mas acho que o maior problema nem é fazer ou não fazer, não dá para entender oq vc quer Quote Link to comment Share on other sites More sharing options...
Guest Zangado Posted July 29, 2017 Share Posted July 29, 2017 @sorel e como eu falei para vc aquele sorteador dá para fazer é só colocar somente digitos nas tabelas , pode repetir os digitos colocar configuração de 4 dezenas e quantidade de linhas fiz um teste aqui e deu algo assim 9338 1283 4873 4871 2823 2724 4918 9343 4241 1298 3218 2471 3227 1247 4347 1934 9188 3274 3941 2934 que na planilha aparece assim 9 3 3 8 1 2 8 3 4 8 7 3 4 8 7 1 2 8 2 3 2 7 2 4 4 9 1 8 9 3 4 3 4 2 4 1 1 2 9 8 3 2 1 8 2 4 7 1 3 2 2 7 1 2 4 7 4 3 4 7 1 9 3 4 9 1 8 8 3 2 7 4 3 9 4 1 2 9 3 4 Quote Link to comment Share on other sites More sharing options...
nenao Posted July 29, 2017 Share Posted July 29, 2017 Em 27/07/2017 at 09:44, sorel disse: opa consegui em 95% aO MENOS A 5 DEZENAS POD TER 6 EM 100% 05 10 11 12 16 17 18 23 25 27 29 30 31 32 33 34 35 36 37 38 39 41 43 45 47 49 50 04 05 06 11 17 22 23 24 25 26 27 28 29 31 33 35 37 39 40 41 42 43 44 45 46 47 48 49 50 04 06 10 11 12 16 17 18 22 24 26 28 30 31 32 33 34 35 36 37 38 39 40 42 44 46 48 49 50 04 05 06 10 12 16 18 22 24 25 26 27 28 29 30 32 34 36 38 40 41 42 43 44 45 46 47 48 49 50 01 03 07 09 13 14 15 19 21 25 27 29 30 31 32 33 34 35 36 37 38 39 41 43 45 47 49 50 01 02 03 07 08 09 13 15 19 20 21 25 26 27 28 29 31 33 35 37 39 40 41 42 43 44 45 46 47 48 49 50 02 08 13 14 15 19 20 21 26 28 30 31 32 33 34 35 36 37 38 39 40 42 44 46 48 49 50 01 02 03 07 08 09 14 20 25 26 27 28 29 30 32 34 36 38 40 41 42 43 44 45 46 47 48 49 50 01 03 05 07 09 10 11 12 13 14 15 16 17 18 19 21 23 29 30 34 35 36 41 47 49 50 01 02 03 04 05 06 07 08 09 11 13 15 17 19 20 21 22 23 24 28 29 35 40 41 42 46 47 48 49 50 02 04 06 08 10 11 12 13 14 15 16 17 18 19 20 21 22 24 28 30 34 35 36 40 42 46 48 49 50 01 02 03 04 05 06 07 08 09 10 12 14 16 18 20 22 24 28 29 30 34 36 40 41 42 46 47 48 49 50 01 03 05 07 09 10 11 12 13 14 15 16 17 18 19 21 23 25 27 31 32 33 37 38 39 43 45 49 50 01 02 03 04 05 06 07 08 09 11 13 15 17 19 20 21 22 23 24 25 26 27 31 33 37 39 43 44 45 49 50 02 04 06 08 10 11 12 13 14 15 16 17 18 19 20 21 22 24 26 31 32 33 37 38 39 44 49 50 01 02 03 04 05 06 07 08 09 10 12 14 16 18 20 22 24 25 26 27 32 38 43 44 45 49 a linha mais atrasada sorteio 1673 até o momento para 5 pontos em ambos os sorteios é a linha 1 Quote Link to comment Share on other sites More sharing options...
sorel Posted July 29, 2017 Author Share Posted July 29, 2017 boa menao , e manter em jogar varios sorteios agora tem entrar na linha e filtrar tipo noa jogar o ultimo terminaçoes ( repetidas e ausentes) etx fazer ums 30 a 40 cartoes e partir pro samba Quote Link to comment Share on other sites More sharing options...
sorel Posted July 30, 2017 Author Share Posted July 30, 2017 opa ufa consegui agora tem filtrar so deixar uma formçao exemplo 003 030 300 ...... porque vou jogar no invertido 003 126 237 340 459 568 670 790 900 006 129 238 341 460 573 671 791 901 009 130 243 342 461 576 672 792 902 013 131 246 344 462 579 674 794 904 016 132 249 345 464 583 675 795 905 019 134 253 347 465 586 677 797 907 023 135 256 348 467 589 678 798 908 026 137 259 350 468 590 680 803 910 029 138 260 351 473 591 681 806 911 030 143 261 352 476 592 682 809 912 031 146 262 354 479 594 684 813 914 032 149 264 355 483 595 685 816 915 034 153 265 357 486 597 687 819 917 035 156 267 358 489 598 688 823 918 037 159 268 370 490 600 703 826 920 038 160 273 371 491 601 706 829 921 043 161 276 372 492 602 709 830 922 046 162 279 374 494 604 713 831 924 049 164 283 375 495 605 716 832 925 053 165 286 377 497 607 719 834 927 056 167 289 378 498 608 723 835 928 059 168 290 380 503 610 726 837 940 060 173 291 381 506 611 729 838 941 061 176 292 382 509 612 730 843 942 062 179 294 384 513 614 731 846 944 064 183 295 385 516 615 732 849 945 065 186 297 387 519 617 734 853 947 067 189 298 388 523 618 735 856 948 068 190 300 403 526 620 737 859 950 073 191 301 406 529 621 738 860 951 076 192 302 409 530 622 743 861 952 079 194 304 413 531 624 746 862 954 083 195 305 416 532 625 749 864 955 086 197 307 419 534 627 753 865 957 089 198 308 423 535 628 756 867 958 090 203 310 426 537 640 759 868 970 091 206 311 429 538 641 760 873 971 092 209 312 430 543 642 761 876 972 094 213 314 431 546 644 762 879 974 095 216 315 432 549 645 764 883 975 097 219 317 434 553 647 765 886 977 098 223 318 435 556 648 767 889 978 103 226 320 437 559 650 768 890 980 106 229 321 438 560 651 773 891 981 109 230 322 443 561 652 776 892 982 113 231 324 446 562 654 779 894 984 116 232 325 449 564 655 783 895 985 119 234 327 453 565 657 786 897 987 123 235 328 456 567 658 789 898 988 Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.