üç elamanlı diziler nasıl olmalı (array)

Katılım
2 Mart 2005
Mesajlar
2,960
Excel Vers. ve Dili
ev: Ofis 2007- Win Xp
iş: Ofis 2010- Win Vista
aslında nasıl anlatacğımada tam olarak bilmiyorum dilim döndüğünce anlatayım

arrElm(0) = (45, ahmet , kara)
arrElm(1) = (48, mehmet, atıl)
.............
şeklinde gidiyor şeklinde diziye alıp

combobox.additem arrelm listesini nasıl eklemeliyim
yalnız dizideki her elaman ayrı kolonda gözükecek (rowsource gibi)

doğrumu yazdım yanlışmı onuda bilmiyorum
 

kulomer46

Altın Üye
Katılım
23 Mart 2007
Mesajlar
1,514
Excel Vers. ve Dili
Microsoft Office LTSC Professional Plus 2021 - Türkçe
Altın Üyelik Bitiş Tarihi
08-06-2027
Üç elemanlı dizi için,
arrElm(n1,n2,n3) = (45, ahmet , kara)

burada n1, n2 ve n3 rakamları birbirinden farklı olabilir. Bu n1, n2 ve n3 rakamları, 3 boyutlu dizimizin her boyutu için uzunluklarını ifade eder.

arrElm(0,0,0) = (45, ahmet , kara)
arrElm(0,0,1) = (48, mehmet, atıl)
arrElm(0,0,2) = (49, ali , ak)
arrElm(0,0,3) = (50, mehmetali, atılım)

Dört elemanlı dizi için,
arrElm(n1,n2,n3,n4) = (45, ahmet , kara,ömer)

Bu n1, n2, n3 ve n4 rakamları, 4 boyutlu dizimizin her boyutu için uzunluklarını ifade eder.

arrElm(0,0,0,1) = (45, ahmet , kara, atlı)
arrElm(0,0,1,1) = (48, mehmet, atıl, mehmet)

Sonuç olarak diziler çok boyutlu olabilir. Ve her boyutun eleman sayısı farklı olarak belirlenebilir..
 
Katılım
2 Mart 2005
Mesajlar
2,960
Excel Vers. ve Dili
ev: Ofis 2007- Win Xp
iş: Ofis 2010- Win Vista
teşekkürler hocam deneyelim....
 

Zeki Gürsoy

Uzman
Uzman
Katılım
31 Aralık 2005
Mesajlar
4,369
Excel Vers. ve Dili
Office 365 (64 bit) - Türkçe
3 sütun ve 4 satır dizi bu da olabilir.

arr(3, 4)
 
Katılım
2 Mart 2005
Mesajlar
2,960
Excel Vers. ve Dili
ev: Ofis 2007- Win Xp
iş: Ofis 2010- Win Vista
hocam yapmaya çalışıyorum ama beceremiyorum

mesala sayfa1 in
a,c,g,k sütunlarını
a nın son satırına kadar diziye hangi kodlar ile almalıyız tıkandım.
 

kulomer46

Altın Üye
Katılım
23 Mart 2007
Mesajlar
1,514
Excel Vers. ve Dili
Microsoft Office LTSC Professional Plus 2021 - Türkçe
Altın Üyelik Bitiş Tarihi
08-06-2027
Aşağıdaki kod mantığı işini görür.. Belirttiğin excel sütunlarındaki değerleri diziye alıyor.. Ve mesaj kutusunda dizi hakkında bilgiler görüntüleniyor..

Sub aktar5()
Dim son, dizi()
son = Cells(65000, 1).End(xlUp).Row
ReDim dizi(son, 4)
For i = 1 To son
dizi(i, 1) = Cells(i, 1)
dizi(i, 2) = Cells(i, 3)
dizi(i, 3) = Cells(i, 7)
dizi(i, 4) = Cells(i, 11)
Next
MsgBox "Dizimiz 2 boyutludur.1. boyutu " & son & " elemanlı, 2. boyutu 4 elemanlıdır"
For i = 1 To son
For j = 1 To 4
MsgBox "Dizi(" & i & "," & j & ") = " & dizi(i, j)
Next
Next

End Sub
 

kulomer46

Altın Üye
Katılım
23 Mart 2007
Mesajlar
1,514
Excel Vers. ve Dili
Microsoft Office LTSC Professional Plus 2021 - Türkçe
Altın Üyelik Bitiş Tarihi
08-06-2027
combobox1 e verilerini aktarmak içinde aşağıdaki kodları kullan..

Private Sub CommandButton1_Click()
ComboBox1.Clear
For i = 1 To 5
ComboBox1.AddItem "eee"
Next

For i = 1 To 5
ComboBox1.List(i - 1) = Cells(i, 1)
Next


For i = 1 To 5

ComboBox1.List(i - 1, 0) = Cells(i, 1)
ComboBox1.List(i - 1, 1) = Cells(i, 3)
ComboBox1.List(i - 1, 2) = Cells(i, 7)
ComboBox1.List(i - 1, 3) = Cells(i, 11)

Next


End Sub
 

Haluk

Özel Üye
Katılım
7 Temmuz 2004
Mesajlar
12,406
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
Altın Üyelik Bitiş Tarihi
3 Boyutlu diziler için benden de iki alternatif:

Not: 2nci alternatif bence gayet başarılı bir yöntemdir.

.
 
Son düzenleme:
Katılım
1 Şubat 2007
Mesajlar
516
Excel Vers. ve Dili
excel2003
Tşk Hocam
işime yaradı ama bunu sadece combo içinde göstermemiz mümkün mü?
 
Katılım
2 Mart 2005
Mesajlar
2,960
Excel Vers. ve Dili
ev: Ofis 2007- Win Xp
iş: Ofis 2010- Win Vista
9 mesajda verdiğim link userform initaslize comboya üç elaman alır
 
Katılım
1 Şubat 2007
Mesajlar
516
Excel Vers. ve Dili
excel2003
hocam tşk ler ama ben acemiyim 8 mesajdaki eklenmiş dosyada dğişiklik yapamazmısınız?
 
Katılım
2 Mart 2005
Mesajlar
2,960
Excel Vers. ve Dili
ev: Ofis 2007- Win Xp
iş: Ofis 2010- Win Vista
siz bir örnek dosya eklerseniz comboda hangi satırlar hangi düzende gösterilecek bakarız
veriler açık çalışma kitabındanmı
yoksa kapalı çalkışma kitabındanmı ( ADODB.Connectiondan)
eğer kapalı kitap ise inceleyiniz;
http://www.excel.web.tr/showpost.php?p=239701&postcount=4
alınacak
bahsediyoruz
 
Katılım
2 Mart 2005
Mesajlar
2,960
Excel Vers. ve Dili
ev: Ofis 2007- Win Xp
iş: Ofis 2010- Win Vista
hocam yanlış nalamadıysam siz

a1 = aaaa bbbb
a2 = cccc dddd eeee
...................
ise
comboboxta
sütun1/sütun/2sütun3
aaa / bbbb/ ...
ccc / dddd / eeee
yani comboada x hücresini parçalamak istiyorsunuz
ben çözüm getiremeyebilirim eğer öyle ise
 
Üst