USER FORM un QUERY CLOSE unda hatalar oluşuyo. ilk 30-40 dosyada bişe yok sonra tekliyo bazen belge noyu müşterilerde göstermiyo müşteri hareketlerinde içeriği tıkladığımda hata veriyo göstemiyo. Aklıma kötü şeler geliyo :)
hocam kurcalarken enteresan bişe ile karşılaştım AnaSayfada ki Müşteriler bölümünde C:\Users\Hakan\Desktop. diye uzantı veriyo bu esnada müşter gözlem çalışmıyo fakat bi müşterinin dosyasının açtığımda içerine girdiğim vakit bu yukardaki uzantıyı vermiyo normale dönüyo ve görevini yerine getiriyo müşteri gözlemi aktif çalıştırıyo neden olabilirki yani müşteri dosyası açıksa çalışıyo anlamadım açık değilse hareketleri göstermiyo Yani müşteri bakiyelerinde müşteriye çift tıkladığımda hareketi olsada olmasada DOSYA BULUNAMADI diyo.
Mehmet hocam herşey için teşekkür ederim bir çok videonuzu izledim mükemmel. Daha sonra BTS kanalıyla tanıştım onunla epeyce çalışma yaptık ön muhasebe konusunda, sonra arkadaşın iş yoğunluğu sebebiyle yarım kaldık, ben iki sene öncesine kadar 1996 dan bu yana eta 6 ticari proğramı kullanıyordum daha sonra fornext proğramıyla tanıştım ücretsiz bir sürüm,şimdi onu kullanıyorum fakat raporlamalarda kısıtlamalar var o yüzden arayış içerisindeyim. Lisans almak isteyincede yüklü ücret istiyorlar rica etsem bu çalışmayı bana gönderebilirmisiniz?
tarihe göre listeleme yapınca "Run-time error '13' Type mismathc" hatası alıyorum. Çözüme dair fikri olan varsa çok memnun olurum. Listeleme sayfasında hücre biçimlendiri Genel yaptım olmadı, Tarih yaptım olmadı, Sayı yaptım olmadı. Yardım lütfen
On Error Resume Next Tbs1 = UFMüşteriBakiyeleri.Tbs1 Satır = WorksheetFunction.Match(Tbs1, wsMüşteriler, Range("A:A"), 0) If Err.Number > 0 Then Err.Number = 0
End If Tbs2 = FormatNumber(CDbl(SayıKontrol(wsMüşteriler.Cells(Satır, 2))), 2) Tbs3 = FormatNumber(CDbl(SayıKontrol(wsMüşteriler.Cells(Satır, 3))), 2) Tbs4 = FormatNumber(CDbl(SayıKontrol(wsMüşteriler.Cells(Satır, 4))), 2) If IsDate(wsMüşteriler.Cells(Satır, 6)) = True And wsMüşteriler.Cells(Satır, 6) 0 Then Tbs6 = FormatDateTime(wsMüşteriler.Cells(Satır, 6), vbShortDate) Else Tbs6 = "" End If
Tbs7 = FormatNumber(CDbl(SayıKontrol(wsMüşteriler.Cells(Satır, 7))), 2) If IsDate(wsMüşteriler.Cells(Satır, 8)) = True And wsMüşteriler.Cells(Satır, 8) 0 Then Tbs8 = FormatDateTime(wsMüşteriler.Cells(Satır, 8), vbShortDate) Else Tbs8 = "" End If
Tbs9 = FormatNumber(CDbl(SayıKontrol(wsMüşteriler.Cells(Satır, 9))), 2) Tbs10 = wsMüşteriler.Cells(Satır, 10) ** Bu şekilde yaptığım vakit lbl deki isim geliyo fakat alt döküm gelmiyo. error olayını kaldırdığım zaman "mutch" hatası veriyo bu sefer lbl deki ismide göstermiyo. Yardım edermisiniz rica etsem
Elinize sağlık Mehmet hocam.
Mehmet hocam sizi çok özledik
USER FORM un QUERY CLOSE unda hatalar oluşuyo. ilk 30-40 dosyada bişe yok sonra tekliyo bazen belge noyu müşterilerde göstermiyo müşteri hareketlerinde içeriği tıkladığımda hata veriyo göstemiyo. Aklıma kötü şeler geliyo :)
hocam kurcalarken enteresan bişe ile karşılaştım AnaSayfada ki Müşteriler bölümünde C:\Users\Hakan\Desktop. diye uzantı veriyo bu esnada müşter gözlem çalışmıyo fakat bi müşterinin dosyasının açtığımda içerine girdiğim vakit bu yukardaki uzantıyı vermiyo normale dönüyo ve görevini yerine getiriyo müşteri gözlemi aktif çalıştırıyo neden olabilirki yani müşteri dosyası açıksa çalışıyo anlamadım açık değilse hareketleri göstermiyo Yani müşteri bakiyelerinde müşteriye çift tıkladığımda hareketi olsada olmasada DOSYA BULUNAMADI diyo.
hocam iade faturası içinde ayrı bir ders yaparmsınız
müşterigözlem de match özelliği çalışmıyo onun yerine ne koyabilirim bilgisi olan varmı ?
mutch ı çıkardığım zaman lbl deki isim geliyo fakat al bilgiler gelmiyo.
Mehmet hocam herşey için teşekkür ederim bir çok videonuzu izledim mükemmel. Daha sonra BTS kanalıyla tanıştım onunla epeyce çalışma yaptık ön muhasebe konusunda, sonra arkadaşın iş yoğunluğu sebebiyle yarım kaldık, ben iki sene öncesine kadar 1996 dan bu yana eta 6 ticari proğramı kullanıyordum daha sonra fornext proğramıyla tanıştım ücretsiz bir sürüm,şimdi onu kullanıyorum fakat raporlamalarda kısıtlamalar var o yüzden arayış içerisindeyim. Lisans almak isteyincede yüklü ücret istiyorlar rica etsem bu çalışmayı bana gönderebilirmisiniz?
tarihe göre listeleme yapınca "Run-time error '13' Type mismathc" hatası alıyorum. Çözüme dair fikri olan varsa çok memnun olurum.
Listeleme sayfasında hücre biçimlendiri Genel yaptım olmadı, Tarih yaptım olmadı, Sayı yaptım olmadı. Yardım lütfen
KAFAYI YİYCEM YA MÜŞTERİ GÖZLEMDEKİ LİSTELEDEKİ MACROLAMA OLAYINI SATICI GÖZLEM E YAPIYOM OLMUYO AMA MÜŞTERİLERDE OLUYO ??????????????????
Arkadaşlar bana yardımcı olabilecek biri varmı çok önemli benim için
Sub BilgileriGetir()
On Error Resume Next
Tbs1 = UFMüşteriBakiyeleri.Tbs1
Satır = WorksheetFunction.Match(Tbs1, wsMüşteriler, Range("A:A"), 0)
If Err.Number > 0 Then
Err.Number = 0
End If
Tbs2 = FormatNumber(CDbl(SayıKontrol(wsMüşteriler.Cells(Satır, 2))), 2)
Tbs3 = FormatNumber(CDbl(SayıKontrol(wsMüşteriler.Cells(Satır, 3))), 2)
Tbs4 = FormatNumber(CDbl(SayıKontrol(wsMüşteriler.Cells(Satır, 4))), 2)
If IsDate(wsMüşteriler.Cells(Satır, 6)) = True And wsMüşteriler.Cells(Satır, 6) 0 Then
Tbs6 = FormatDateTime(wsMüşteriler.Cells(Satır, 6), vbShortDate)
Else
Tbs6 = ""
End If
Tbs7 = FormatNumber(CDbl(SayıKontrol(wsMüşteriler.Cells(Satır, 7))), 2)
If IsDate(wsMüşteriler.Cells(Satır, 8)) = True And wsMüşteriler.Cells(Satır, 8) 0 Then
Tbs8 = FormatDateTime(wsMüşteriler.Cells(Satır, 8), vbShortDate)
Else
Tbs8 = ""
End If
Tbs9 = FormatNumber(CDbl(SayıKontrol(wsMüşteriler.Cells(Satır, 9))), 2)
Tbs10 = wsMüşteriler.Cells(Satır, 10)
** Bu şekilde yaptığım vakit lbl deki isim geliyo fakat alt döküm gelmiyo. error olayını kaldırdığım zaman "mutch" hatası veriyo bu sefer lbl deki ismide göstermiyo. Yardım edermisiniz rica etsem