- Katılım
- 11 Mart 2005
- Mesajlar
- 3,147
- Excel Vers. ve Dili
- Office 2013 İngilizce
Arkadaşlar öncelikle kurban bayramınızı kutlarım.
Ekte sunulan bir formattaki gibi ;
Kapalı bir dosyada ID numarasına göre Alanlardaki boş hücrelerin sayısını rapor olarak nasıl alabiliriz?
Ekli dosyada Data sayfasındaki gibi bir veri olsun, Rapor sayfasındaki gibi özet bir veriyi kolay yoldan nasıl alabiliriz?
Aşağıdaki kod ile tek tek alanlara bakabiliyoruz, yalnız bu şekildde çok uzun bir kod yazmak gerekeceğinden daha pratik bir yöntem arayışındayım
desteğiniz için şimdiden teşekkürler,
iyi bayramlar...
Ekte sunulan bir formattaki gibi ;
Kapalı bir dosyada ID numarasına göre Alanlardaki boş hücrelerin sayısını rapor olarak nasıl alabiliriz?
Ekli dosyada Data sayfasındaki gibi bir veri olsun, Rapor sayfasındaki gibi özet bir veriyi kolay yoldan nasıl alabiliriz?
Aşağıdaki kod ile tek tek alanlara bakabiliyoruz, yalnız bu şekildde çok uzun bir kod yazmak gerekeceğinden daha pratik bir yöntem arayışındayım
Kod:
Set Con = VBA.CreateObject("adodb.Connection")
Con.Open "provider=microsoft.ace.oledb.12.0;data source=" & _
yol & ";extended properties=""Excel 12.0;hdr=yes"""
''sorgu = "Select Distinct ID, Count(ID) As Say From [Data$] " & _
"Where [Alan2] is null Group By ID"
iyi bayramlar...
Ekli dosyalar
-
9.8 KB Görüntüleme: 8