+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Özet Tablo (çoklueğersay) (/konu-ozet-tablo-cokluegersay.html)
Re: Özet Tablo (Çoklueğersay) - cdenktas - 15/12/2023
(14/12/2023, 16:08)feraz yazdı: Helal olsun.Önemli değilde hata mesajı nedir.Örneğin aklıma gelen değişken tanımlamaması hatası olabilir.
Function benzersizFirmalar(ByVal i As Long) As Dictionary
Dim dic As Dictionary, son As Long, say As Long, ii As Long, key As String
say = 0
Set dic = New Dictionary
With ThisWorkbook.Worksheets("Özet Tablo")
son = Worksheets(.Cells(i, 1).Value).Range("C" & Rows.Count).End(3).Row
If son < 2 Then GoTo sonSub
For ii = 2 To son
key = ThisWorkbook.Worksheets(.Cells(i, 1).Value).Range("C" & ii).Value
dic(key) = dic(key) + 1
Next
End With
sonSub:
Set benzersizFirmalar = dic
End Function
Koyu renkte olan kısmını hata veriyor...
RE: Özet Tablo (çoklueğersay) - feraz - 15/12/2023
Sayın üstadım anlaşamıyoruz.
Koyu yer neresi?
Öncedende yazmıştım hata mesajı nedir diye.
Tekrar öncedende yazmıştım yolladığım dosya denedinizmi çalışıyormu diye cevap alamadım o dosya için.
Ayruca öncedende yazmıştım ilk ve son eklediğiniz dosya ile yakından uzaktan alakası yok diye zaten kod çalışsa bile sizin ekleyipte benim sildiğim dosyada çalışmaz.
Eğer yollqdığım dosya çalışıyorsa yani doğru sonuç veriyorsa örneğinizi tekrar yükleyin fazla kalabalık sayfa olmasın ve gerçek veriler olmasın.Yok çalışmıyorsa benden bu kadar abey.
Ayrıca Access ile alakası yoktu resimde Access var.
Aynı şeyleri papağan gibi yazıp duruyoruz
RE: Özet Tablo (çoklueğersay) - cdenktas - 18/12/2023
(15/12/2023, 10:26)feraz yazdı: Sayın üstadım anlaşamıyoruz.
Koyu yer neresi?
Öncedende yazmıştım hata mesajı nedir diye.
Tekrar öncedende yazmıştım yolladığım dosya denedinizmi çalışıyormu diye cevap alamadım o dosya için.
Ayruca öncedende yazmıştım ilk ve son eklediğiniz dosya ile yakından uzaktan alakası yok diye zaten kod çalışsa bile sizin ekleyipte benim sildiğim dosyada çalışmaz.
Eğer yollqdığım dosya çalışıyorsa yani doğru sonuç veriyorsa örneğinizi tekrar yükleyin fazla kalabqlık sayfa olmasın ve gerçek veriler olmasun.Yok çalışmıyorsa benden bu kadar abey.
Ayrıca Access ile alakası yoktu resimde Access var.
Aynı şeyleri papağan gibi yazıp duruyoruz
Örnek dosyayı koydum, çok teşekkür ederim.
RE: Özet Tablo (çoklueğersay) - cdenktas - 09/01/2024
(18/12/2023, 09:25)cdenktas yazdı:(15/12/2023, 10:26)feraz yazdı: Sayın üstadım anlaşamıyoruz.
Koyu yer neresi?
Öncedende yazmıştım hata mesajı nedir diye.
Tekrar öncedende yazmıştım yolladığım dosya denedinizmi çalışıyormu diye cevap alamadım o dosya için.
Ayruca öncedende yazmıştım ilk ve son eklediğiniz dosya ile yakından uzaktan alakası yok diye zaten kod çalışsa bile sizin ekleyipte benim sildiğim dosyada çalışmaz.
Eğer yollqdığım dosya çalışıyorsa yani doğru sonuç veriyorsa örneğinizi tekrar yükleyin fazla kalabqlık sayfa olmasın ve gerçek veriler olmasun.Yok çalışmıyorsa benden bu kadar abey.
Ayrıca Access ile alakası yoktu resimde Access var.
Aynı şeyleri papağan gibi yazıp duruyoruz
Örnek dosyayı koydum, çok teşekkür ederim.
Merhabalar, tekrar rahatsız ediyorum, dosyaya bakabildiniz mi?
çok teşekkür ederim.
RE: Özet Tablo (çoklueğersay) - feraz - 10/01/2024
Dosyaya baktım karma karışık ve anlamadım benden bukadar.
Heralde ilk eklediğinize göre çözmüştük ama bu farklı ve neyin ne olduğu belli değil.
Kolay gelsin çözmek isterdim ama beni aştı kusura bakmayın.
RE: Özet Tablo (çoklueğersay) - cdenktas - 10/01/2024
(10/01/2024, 12:11)feraz yazdı: Dosyaya baktım karma karışık ve anlamadım benden bukadar.
Heralde ilk eklediğinize göre çözmüştük ama bu farklı ve neyin ne olduğu belli değil.
Kolay gelsin çözmek isterdim ama beni aştı kusura bakmayın.
Tekrar emeğinize sağlık, çok teşekkür ederim.