Dizi içerisinde değişken nasıl kullanabilirim?

  • Konuyu başlatan Konuyu başlatan merakli
  • Başlangıç tarihi Başlangıç tarihi

merakli

Kullanıcı
Katılım
28 Tem 2022
Mesajlar
748
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Merhaba,
VBA da yeniyim

Alttaki gibi bir Sub içerisinde
Ndf olarak tanımlanan dizi değişkenin elemanlarının başındaki rakam olan 1 i intTestNo değişkeninin değerinden almasını istiyorum.

intTestNo = Sheets("ADO").[AC6].Text

Ndf = Array("1_Matematik.xlsm", "1_Türkçe.xlsm", "1_Fen.xlsm", "1_İnkılap.xlsm", "1_İngilizce.xlsm", "1_Din.xlsm")

Bunun için diziyi en mantıklı ne şekilde yazmalıyım?

VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(14 satır)
 
Filtrede belirli isim haricindeki satırları silme
İşaretli satırları başka sayfaya kopyalama
Tarihe göre sırala Oylamaya göre sırala
Merhabalar Sn. @merakli
Kod içindeki bu satırı
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(1 satır)

bu satır ile değiştiriniz.
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(1 satır)
 
Oyla 0 Olumsuz oyla
Alternatif;

Ndf = Array("_Matematik.xlsm", "_Türkçe.xlsm", "_Fen.xlsm", "_İnkılap.xlsm", "_İngilizce.xlsm", "_Din.xlsm")

Sonra döngü içindeki altta ki satırı revize edebilirsiniz.

Connect_xls ThisWorkbook.Path & "\" & intTestNo & Ndf(i)
 
Oyla 0 Olumsuz oyla
Korhan AYHAN' Alıntı:
Alternatif;

Ndf = Array("_Matematik.xlsm", "_Türkçe.xlsm", "_Fen.xlsm", "_İnkılap.xlsm", "_İngilizce.xlsm", "_Din.xlsm")

Sonra döngü içindeki altta ki satırı revize edebilirsiniz.

Connect_xls ThisWorkbook.Path & "\" & intTestNo & Ndf(i)
Genişletmek için tıklayın ...

Evet bu açıdan bakmamıştım.
Teşekkürler.


VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(14 satır)

Bu şekilde daha mantıklı.
 
Oyla 0 Olumsuz oyla
Konuyla ilgili bir başka şey danışmak istiyorum.

VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(14 satır)

Recup sub'ın içinde T = Select_Db(Req, 0)
şeklinde olan kısmın döndürdüğü veriyi nasıl görebilirim.

T = Select_Db(Req, 0)

msgBox T

şeklinde denediğimdebir sonuç döndürmedi sanki


Select_Db fonksiyonu aşağıdaki şekilde...
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(32 satır)
 
Oyla 0 Olumsuz oyla
Bahsettiğiniz fonksiyon sanırım bir veri dizisi döndürüyor. Bu sebeple siz sonucu bir listbox üzerinde görüntüleyebilirsiniz.

Ya da dizinin elemanlarını MsgBox üzerinde gösterebilirsiniz.
 
Oyla 0 Olumsuz oyla
Yanıt için giriş yapmanız veya üye olmanız gerekir.
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt