sayıları sıralama

[atahan02]

iyi çalışmalar ,

1 , 2 , 3 ve 4 sayılarını kullanarak , 4 dört basamaklı kaç adet FARKLI RAKAM yazılabileceği hususunu excel üzerine şablone etmek mümkün müdür ?

Şöyle ki ;

birinci rakam 1234
ikinci rakam 4444
üçüncü rakam 1233
dördüncü rakam 2341
beşinci rakam ....
altıncı rakam .....
.
.
.
.
.
.
.

devam etmeli . sonucun 2 üzeri 8 = 256 adet RAKAM olması gerektiğini düşünüyorum.

ilgilerinize teşekkür ederim.
saygılarımla,

 

[snx111]

ödev mi bu ?

 

[Huseyinkis]

Ekteki kodları denermisiniz.

hesaplama 4*4*4*4 = 256 adet rakam çıkar.

Sub Sayı()
a=1
for X1 = 1 to 4
for X2 = 1 to 4
for X3 = 1 to 4
for X4 = 1 to 4

Cells(a,1).value=x1
Cells(a,2).value=x2
Cells(a,3).value=x3
Cells(a,4).value=x4

a=a+1
next X4:next x3:next x2 : next x1
end sub