- Katılım
- 11 Mart 2005
- Mesajlar
- 3,190
- Excel Vers. ve Dili
- Office 2013 İngilizce
Merhaba,
Ekli dosyada ADO Recordset ile ana sayfaya veri alırken;
Kopyalanacak başlangıç hücresini resize etmeye gerek kalmadan, sadece ilk hücrenin adresini tanımlayarak yapılamz mı?
Sht.Range("A2").Resize(y, 2)
Resize olayı hücre otomatik kendi algılasa; her seferinde Resize boyutlarını belirlerken hataya düşüyorum.
teşekkürler,
Ekli dosyada ADO Recordset ile ana sayfaya veri alırken;
Kopyalanacak başlangıç hücresini resize etmeye gerek kalmadan, sadece ilk hücrenin adresini tanımlayarak yapılamz mı?
Sht.Range("A2").Resize(y, 2)
Resize olayı hücre otomatik kendi algılasa; her seferinde Resize boyutlarını belirlerken hataya düşüyorum.
teşekkürler,
Kod:
Veri = RS.GetRows
y = UBound(Veri, 2)
arr = WorksheetFunction.Transpose(Veri)
Dim Hedef As Range
Set Hedef = Sht.Range("A2").Resize(y, 2)
Hedef.Value = arr
Ekli dosyalar
-
20 KB Görüntüleme: 7