[TABLO] tablodaki bir kolondaki verileri diziye atma
#1
ben a tablosundaki b kolonunu bir dizi ye atmak istiyorum bunu nasıl sağlayabilirim?



  Alıntı
Bu mesajı beğenenler:
#2
dizi derken neyi kastediyorsun sıralı olarak yan yana mı yazılmasını istiyorsun?



  Alıntı
Bu mesajı beğenenler:
#3
yani vba daki dizilerden bahsediyorum örneğin dizi(i) gibi her veriyi ayrı bir dizi değişkenine atamak istiyorum



  Alıntı
Bu mesajı beğenenler:
#4
Sayin peace5219;

Asagidaki gibi yapilabilir
Visual Basic
  1. Private sub Boton_click()
  2. Dim Kayit As recordset,KayitSay As Long
  3. Dim Dizi(1 to 1000) as String 'veya Long ....vb.
  4. Dim Sayac as Long
  5. Set Kayit=Application.CurrentDb.Open("Select b From a")
  6. Kayit.Movefirst:KayitSay =Kayit.RecordCount
  7. do
  8. Sayac=Sayac + 1
  9. Dizi(Sayac)=Kayit.Fields(0)
  10. Kayit.movenext
  11. loop until Kayit.eof
  12. Kayit.close:set Kayit=nothing
  13. '********* Veriyi gosterme *********
  14. Sayac=0
  15. For Sayac=1 to KayitSay
  16. msgbox Dizi(Sayac)
  17. next Sayac
  18. EndSub





  Alıntı
Bu mesajı beğenenler:
#5
Dim kayit As Recordset, kayitsay As Long
Dim Dizi() As Variant
Dim sayac As Long
Dim tag1 As String
tag1 = Me.equipment_tag

Set kayit = Application.CurrentDb.OpenRecordset("Select arrival_actual_date_started from [sub list] where ((([sub list].master_equipment)='" & Me.equipment_tag & "')) ")
kayit.MoveFirst: kayitsay = kayit.RecordCount
Do
sayac = sayac + 1
Dizi(sayac) = kayit.Fields(0)
kayit.MoveNext
Loop Until kayit.EOF
kayit.Close: Set kayit = Nothing
'********* Veriyi gosterme *********
sayac = 0
For sayac = 1 To kayitsay
MsgBox Dizi(sayac)
Next sayac


kusura bakmayın işlerim dolayısıyla ancak ilgilenebildim fakat o dediğiniz yöntem hata veriyor ne yazıkki Dizi(sayac) = kayit.Fields(0) bu satırda subscript out of range hatası veriyor



  Alıntı
Bu mesajı beğenenler:
#6
Sayin peace5219;
Dim Dizi() As Variant yazmissiniz.

sub list tablosunda arrival_actual_date_started alan veri turu ne ise (Kalin olarak isaretlenen yerdeki tur de) olmalidir.
Dim Dizi(1 to 1000) As String, Long, Double .......
Dizi atanacak veri araligi kadar tanimli olmalidir.
[/quote]

bu islem dizi(1 to 1000) arasi sirasiyla tablo icinde ki veriyi gosterir. Sizin yapmak istediginiz onur_can'nin dedigi gibi alt alta yazilmis sutunda ki veriyi yan yana yazili sekilde mi gormek istiyorsunuz yoksa tag ozelligi ile gruplama ile ozellik mi atamak istiyorsunuz ?

Kolay gelsin.............



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [FORM] Aktif Saati Tablodaki Saat Arasına Göre Bulup Forma Yazdırma yahyamacit 5 140 14-03-2024, 11:07
Son Mesaj: yahyamacit
  Tablodaki Verileri Yan Yana Yazdırmak 10pele 11 148 09-03-2024, 02:52
Son Mesaj: dsezgin
  Ağ Konumundaki Excel Dosyasından Alınan Verileri Güncelleyememe geneclean 2 119 20-02-2024, 14:27
Son Mesaj: dsezgin
  Acces Sql De Tablodakı Bos Kayıtları Sorgulayabılmek sevincili 2 99 02-02-2024, 01:59
Son Mesaj: dsezgin
  Verileri Güncellemek m_demir 18 358 21-01-2024, 19:59
Son Mesaj: m_demir
  Bir Sütuna Girilen Verileri Başka Bir Sütun Ile Karşılaştırıp Hesaplama bilservisci 4 265 08-01-2024, 11:58
Son Mesaj: bilservisci
  Tablodaki Verileri Yan Yana Yazdırmak atyaty 4 334 11-12-2023, 12:57
Son Mesaj: atyaty
  Tablodaki Verileri Formda Arayarak Daraltma Asistan1 1 169 03-05-2023, 20:07
Son Mesaj: alperalper

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi