excel'de yardım

mertksk · 21-04-04, 13:08

A sutununda alt alta satırlar halinde 1000 adet şifrem var.
B sutununda alt alta satırlar halinde 1000 adet seri numaram var.

Şu şekilde düzenlemem gerekiyor:

-öncelikle boş C sütununda C1'e A1'deki şifreyi
C2'ye B1'deki seri no'yu
C3'e A2'deki şifreyi
C4'e B2'deki seri no'yu
sırayla 1000 adet sifre ve serinoyu bu şekilde alt alta sıralamam gerek.
yani C sutununda 2000 satır data olacak.

-yeni C sütununda 1.satır sifre, 2.satır seri no oldu.
C1'deki sifre ve C2'deki serinoyu "bir grup" olarak düşünelim.
alt alta 2000 adet data yani 1000 adet sifre ve seri no'dan oluşan grubumuz var.
grupları şu şekilde yeni D sütununda sıralamamız gerek:
1.grup(C1 ve C2), altına 8.grup(C15 ve C16), altına 15.grup(C29 ve C30)
yani 7 atlayarak gidecek..
tabiki bu bitince de:
2.grup(C3 ve C4), altına 9.grup(C17 ve C18), altına 16.grup(C31 ve C32)
yine 7 atlayarak devam edecek.
bu şekilde 2'li çiftler halinde 1000 grup 2000 data sıralanmış olacak..

çok ayrıntılı anlatmaya çalıştım..
nasıl yapabilirim? şimdiden çok teşekkürler..

MiRaBiLiS · 21-04-04, 13:11

çok karmaşık ben anlayamadım

anlayan varsa yardımcı olsun lütfen..

~~HitMan~~ · 21-04-04, 15:53

Banada çok karmaşık geldi hocam sen bunu bir tablo ile capture etsende göndersen de oradan baksak !!!

falconx · 23-04-04, 09:44

küçük bir makro ile halledebilirsin gibi geliyor. Bu macroyu dene üzerinde gerekli değişiklikleri yaparak her iki sorununuda cevaplayabilirsin

Alıntı:

Sub sifresira()
'
' sifresira Macro
' Macro recorded 23.04.2004 by Nafiz Timuroğlu

'Cells(row, column)

Dim t As Single
Dim x As Single
Dim y As Single
Dim sonsatir As Single

x = 1 ' kullanıcı adı sütun
y = 2 ' şifre sütun
z = 3 ' şifre kullanıcı adı konacak sütun
s = 1 'kulaanıcı adı satır no

f = 4 'aktarılacağı sütun
b = 1 ' aktarılacağı satır no

sonsatir = 10

Worksheets("Sheet1").Activate
For j = 1 To sonsatir
Range("A1").Select
Cells(s, x).Copy
Cells(b, f).Select
ActiveSheet.Paste

b = b + 1
Cells(s, y).Copy
Cells(b, f).Select
ActiveSheet.Paste

s = s + 1
b = b + 1

Next j

End Sub

21-04-04, 13:08	#1
mertksk	excel'de yardım A sutununda alt alta satırlar halinde 1000 adet şifrem var. B sutununda alt alta satırlar halinde 1000 adet seri numaram var. Şu şekilde düzenlemem gerekiyor: -öncelikle boş C sütununda C1'e A1'deki şifreyi C2'ye B1'deki seri no'yu C3'e A2'deki şifreyi C4'e B2'deki seri no'yu sırayla 1000 adet sifre ve serinoyu bu şekilde alt alta sıralamam gerek. yani C sutununda 2000 satır data olacak. -yeni C sütununda 1.satır sifre, 2.satır seri no oldu. C1'deki sifre ve C2'deki serinoyu "bir grup" olarak düşünelim. alt alta 2000 adet data yani 1000 adet sifre ve seri no'dan oluşan grubumuz var. grupları şu şekilde yeni D sütununda sıralamamız gerek: 1.grup(C1 ve C2), altına 8.grup(C15 ve C16), altına 15.grup(C29 ve C30) yani 7 atlayarak gidecek.. tabiki bu bitince de: 2.grup(C3 ve C4), altına 9.grup(C17 ve C18), altına 16.grup(C31 ve C32) yine 7 atlayarak devam edecek. bu şekilde 2'li çiftler halinde 1000 grup 2000 data sıralanmış olacak.. çok ayrıntılı anlatmaya çalıştım.. nasıl yapabilirim? şimdiden çok teşekkürler..
	Alıntı Yaparak Cevapla

21-04-04, 13:11	#2
MiRaBiLiS	Cvp: excel'de yardım çok karmaşık ben anlayamadım anlayan varsa yardımcı olsun lütfen..
	Alıntı Yaparak Cevapla

21-04-04, 15:53	#3
~~HitMan~~	Cvp: excel'de yardım Banada çok karmaşık geldi hocam sen bunu bir tablo ile capture etsende göndersen de oradan baksak !!! Mesajı son düzenleyen HitMan* ( 22-04-04 - 09:02 )*
	Alıntı Yaparak Cevapla

Konu Araçları
Çıktı Görüntüsünü Göster Sayfayı E-posta İle Yolla