(28/11/2008, 15:33)Hakan yazdı: (28/11/2008, 15:24)nihatkr yazdı: (28/11/2008, 15:07)Hakan yazdı: (27/11/2008, 19:41)Hakan yazdı: Diğer sorumda;
Query de verileri excele verdiğimde 65 000 den fazla olan satırlar söz konusu olduğunda 65 000'e kadar olanı atmakta. Fakat ben Excel 2007 kullanıyorum, 65 000 üstü satırları nasıl Excele verdireceğim?
Şimdiden teşekkür ederim
iyi çalışmalar,
2. sorumu nasıl yapacagım bir fikriniz varmı?
bu soru aslında hep sorulan bir soru. ama excelde satırlar ve sutunlar sınırlandırılmıştır. ancak 65536 satırdan sonrasını daha öce excel.web de verilmiş olana aşağıdaki kodla bir sonraki sayfaya aktararak çözmeniz mümkün olabilir.
Sub GetTxtData2()
'Raider ®
Dim MyFile As String
MyFile = "C:\Test.txt"
j = 0
Set NewSh = Worksheets.Add
j = j + 1
NewSh.Name = "TextSheet-" & j
Open MyFile For Input As #1
Do While Not EOF(1)
i = i + 1
Line Input #1, InputData
Cells(i, 1) = InputData
If i > 65535 Then
Set NewSh = Worksheets.Add
j = j + 1
NewSh.Name = "TextSheet-" & j
i = 0
End If
Loop
Close #1
Set NewSh = Nothing
End Sub
Sayın Nihat,
Bu farklı bişey, Access de Excele ver dediğim zaman olan bir durum bu. Excel 2007 kullanmama rağmen 65 000 üstü veri gönderemiyorum.
bu
Excel içindi zaten..
excelde satır sınırlaması 65536 bunu artırmak (en azından benim bildiğim kadarıyla) mümkün değil.
üstteki kodu excelde kullanarak 65536. satırdan sonra yeni sayfaya devam etmesini sağlayabilirsiniz. ama 200000-500000 satırı aktarmanız mümkün değil zaten aktardıktan sonra filitrelemek raporlamakta baya bir sıkıntı olur diye düşünüyorum.
(28/11/2008, 15:37)nihatkr yazdı: (28/11/2008, 15:33)Hakan yazdı: (28/11/2008, 15:24)nihatkr yazdı: (28/11/2008, 15:07)Hakan yazdı: (27/11/2008, 19:41)Hakan yazdı: Diğer sorumda;
Query de verileri excele verdiğimde 65 000 den fazla olan satırlar söz konusu olduğunda 65 000'e kadar olanı atmakta. Fakat ben Excel 2007 kullanıyorum, 65 000 üstü satırları nasıl Excele verdireceğim?
Şimdiden teşekkür ederim
iyi çalışmalar,
2. sorumu nasıl yapacagım bir fikriniz varmı?
bu soru aslında hep sorulan bir soru. ama excelde satırlar ve sutunlar sınırlandırılmıştır. ancak 65536 satırdan sonrasını daha öce excel.web de verilmiş olana aşağıdaki kodla bir sonraki sayfaya aktararak çözmeniz mümkün olabilir.
Sub GetTxtData2()
'Raider ®
Dim MyFile As String
MyFile = "C:\Test.txt"
j = 0
Set NewSh = Worksheets.Add
j = j + 1
NewSh.Name = "TextSheet-" & j
Open MyFile For Input As #1
Do While Not EOF(1)
i = i + 1
Line Input #1, InputData
Cells(i, 1) = InputData
If i > 65535 Then
Set NewSh = Worksheets.Add
j = j + 1
NewSh.Name = "TextSheet-" & j
i = 0
End If
Loop
Close #1
Set NewSh = Nothing
End Sub
Sayın Nihat,
Bu farklı bişey, Access de Excele ver dediğim zaman olan bir durum bu. Excel 2007 kullanmama rağmen 65 000 üstü veri gönderemiyorum.
bu Excel içindi zaten..
Benim istemiş olduğum şey, Tam olarak anlatayım :
Access 2007'de :
External Data --> Export -->
Excel --> file format (auto gelio) --> Export data with formatting and layout. (seçeneği seçilerek) ---> ok
bu işlemi yaptıgım zaman default olarak kendisi bir
Excel oluşturuyor oluşturulan
Excel daha önceden hazır hale getirilmiş olana olmuyor. Kendisi en basından 65 000 satır sınırlı bir
Excel acıyor.
İşte nihatkr nin bahsettiği şey bu
dosyasına kaydedeceksin. Office 2007 de sınır 65000 den fazla olabilir ama sonuçta bir sınır var diye biliyorum.
Yurtdışı bir forumda anladığım kadarıyla
Access 2007 den
Excel 2007 ye gönderirsen 1 milyon satır oluyormuş.
Hemen test ettim 1.000.000 satır varmış