Soru Talep edilen Personel Ataması

[Baturfurkan]

Önemli değil hocam yardımcı olmuşsak yeterlidir. Kontrol noktalarını bana atsanız da geçmesem yeter. Tipimizden midir bilinmez ama istisnasız her defasında kimlik istedikleri kişi ben oluyorum ) iyi günler size kolay gelsin

Hocam küçük bi tavsiye seçime kadar pek araçla gezmeyin o zaman, Ankara'nın her noktasında güvenlik tedbirleri arttırıldı

 

[Baturfurkan]

https://www.dosyaupload.com/ey6h
Az önceki dosyayı değil bunu kullanın, son halidir.

Hocam bi sorunla karşılaştım ama hata veriyor yardımcı olabilir misiniz?
İlgili Dosya : https://www.dosyaupload.com/amkR

(Sanırım Talep Sayfasındaki görev başlıkları çok olduğu için bu hatayı veriyor?)

 

[Ömer BARAN]

Merhaba.
Belgenizin işleyişini kontrol etmiş değilim.
Fark ettiğim bir hususu belirteyim istedim.

Kullanılan makroda toplaamir, NeKadarUreteyim vs değişkenler Byte olarak tanımlanmış durumda.
Bu değişken türü 0-255 arasında değer alabiliyor, durumu bunun gibi olan,
yani 255'ten fazla tamsayı değer alabilecek değişkenleri Integer olarak tanımlarsanız (Dim satırlarında değişiklik yapacaksınız)
sorun yaşanmaz gibi görünüyor.

Değişken türleri ve alabileceği değerler için bakınız.

 

[Baturfurkan]

Merhaba.
Belgenizin işleyişini kontrol etmiş değilim.
Fark ettiğim bir hususu belirteyim istedim.

Kullanılan makroda toplaamir, NeKadarUreteyim vs değişkenler Byte olarak tanımlanmış durumda.
Bu değişken türü 0-255 arasında değer alabiliyor, durumu bunun gibi olan,
yani 255'ten fazla tamsayı değer alabilecek değişkenleri Integer olarak tanımlarsanız (Dim satırlarında değişiklik yapacaksınız)
sorun yaşanmaz gibi görünüyor.

Değişken türleri ve alabileceği değerler için bakınız.

Teşekkür ederim Ömer bey, ilgili değişikliği yaptığımda yine hata alıyorum. Bu sefer başka bir yerden veriyor. Ama sayenizde yeni bir bilgi öğrenmiş oldum sağolun.

 

[Baturfurkan]

Merhaba.
Belgenizin işleyişini kontrol etmiş değilim.
Fark ettiğim bir hususu belirteyim istedim.

Kullanılan makroda toplaamir, NeKadarUreteyim vs değişkenler Byte olarak tanımlanmış durumda.
Bu değişken türü 0-255 arasında değer alabiliyor, durumu bunun gibi olan,
yani 255'ten fazla tamsayı değer alabilecek değişkenleri Integer olarak tanımlarsanız (Dim satırlarında değişiklik yapacaksınız)
sorun yaşanmaz gibi görünüyor.

Değişken türleri ve alabileceği değerler için bakınız.

Ama dediğiniz gibi görev başlığı sayısını 25,e düşürdüğümde program sorunsuz çalışıyor. Sorun şu ki genelde 20 ile 150 görev başlığı oluyor. Nasıl bi çözüm yapabiliriz acaba? ????

 

[Ömer BARAN]

Önceki bahsettiğiniz sorunun çözümünü söyledim, Byte olan değişken türlerini Integer olarak değiştirin.
Belirttiğim gibi, belgenizi detaylı incelemiş değilim.
Ekran görüntüsünü verdiğiniz kodu buldum ve adım adım çalıştırdığımda fark ettiğim durumu belirttim.

Belgenize hakim değilim, kodları da ben yazmadım (yanlış anlamayın, kod'u yazan akışı biliyor ve ona göre kod oluşturmuştur).
Bu nedenle aldığınız yeni hata nedenini bilemiyorum, en önemlisi de nasıl bir sonuç alınması gerektiğini de bilmiyorum.
Aldığınız yeni hata nedir? Hangi kod çalıştırıldığında, hangi satırda hata alıyorsunuz?
Detay bilgi vermelisiniz.

 

[Baturfurkan]

Önceki bahsettiğiniz sorunun çözümünü söyledim, Byte olan değişken türlerini Integer olarak değiştirin.
Belirttiğim gibi, belgenizi detaylı incelemiş değilim.
Ekran görüntüsünü verdiğiniz kodu buldum ve adım adım çalıştırdığımda fark ettiğim durumu belirttim.

Belgenize hakim değilim, kodları da ben yazmadım (yanlış anlamayın, kod'u yazan akışı biliyor ve ona göre kod oluşturmuştur).
Bu nedenle aldığınız yeni hata nedenini bilemiyorum, en önemlisi de nasıl bir sonuç alınması gerektiğini de bilmiyorum.
Aldığınız yeni hata nedir? Hangi kod çalıştırıldığında, hangi satırda hata alıyorsunuz?
Detay bilgi vermelisiniz.

" Efendim Talep sayfasına Nokta isimlerini ve Talep edilen personel sayılarını yazıp "Personel Ata" isimli Makroya tıklıyorum. Modül1de ki personelata makrom devreye giriyor ve talep ettiğim kadar personeli Amir, Bayan, Erkek sayfalarından kopyalayıp, Çıktı sayfasına yapıştırıyor. Normalde sorunsuz çalışan programım Talep Sayfasına 80 tane Nokta eklemem ile ilk hatayı verdi. Byte'lari Integer olarak değiştirdiğim de ikinci hatayı aldım (Resim 2)

 

[Baturfurkan]

Önceki bahsettiğiniz sorunun çözümünü söyledim, Byte olan değişken türlerini Integer olarak değiştirin.
Belirttiğim gibi, belgenizi detaylı incelemiş değilim.
Ekran görüntüsünü verdiğiniz kodu buldum ve adım adım çalıştırdığımda fark ettiğim durumu belirttim.

Belgenize hakim değilim, kodları da ben yazmadım (yanlış anlamayın, kod'u yazan akışı biliyor ve ona göre kod oluşturmuştur).
Bu nedenle aldığınız yeni hata nedenini bilemiyorum, en önemlisi de nasıl bir sonuç alınması gerektiğini de bilmiyorum.
Aldığınız yeni hata nedir? Hangi kod çalıştırıldığında, hangi satırda hata alıyorsunuz?
Detay bilgi vermelisiniz.

Pardon Ömer Hocam tekrar kontrol ettiğimde bir tane Byte kalmış bu yüzden hata vermiş. Hepsini İnteger yaptığımda sorun çözüldü. Bu saatte kara kara düşünüyordum ne yapacağım diye, hızır gibi yetiştiniz efendim teşekkür ederim

 

[Ömer BARAN]

Kodlardaki tüm Byte olanları Integer yapın.
Çünkü örneğin For ie = 1 To nekadarüreteyim döngüsünde nekadarüreteyim diyelim 300 değerini aldı ancak ie Byte olarak duruyor ve 255'ten itibaren döngü hata verecektir.
Hata oluştuğunda fareyle i veya ie 'nin üzerine gelin (o anki değerini göreceksiniz), bir de fareyle nekadarüreteyim'in üzerine gelin (döngünün son değerini göreceksiniz) bu ikisi birbiriyle uyumlu olmalıdır.

 

[Ömer BARAN]

Birkaç hususu daha belirteyim.
-- Kodlarda kullanılan değişken adlarında Türkçe karakter kullanılmamasında yarar var (kadın yerine kadin deyin mesela) .
-- Tamam kod zaten Talep Sayfası aktif iken çalışıyor ve sorun olmaz gibi görünüyor ancak kod tekniği bakımından
kod içerisinde kullanılan Range(.... veya Cells(.... gibi kısımlarda (aşağıda iki örnek var) hücrenin sayfasını da belirtmekte yarar var.
yeniveri = yeniveri + Cells(X, 2).Value + Ce..... şeklinde değil de yeniveri = yeniveri + s1.Cells(X, 2).Value +s1.Ce....
....eetFunction.CountIf(Range(sk1.Cells(1, 1) şeklinde değil de eetFunction.CountIf(sk1.Range(sk1.Cells(1, 1) gibi.

 

[Baturfurkan]

Birkaç hususu daha belirteyim.
-- Kodlarda kullanılan değişken adlarında Türkçe karakter kullanılmamasında yarar var (kadın yerine kadin deyin mesela) .
-- Tamam kod zaten Talep Sayfası aktif iken çalışıyor ve sorun olmaz gibi görünüyor ancak kod tekniği bakımından
kod içerisinde kullanılan Range(.... veya Cells(.... gibi kısımlarda (aşağıda iki örnek var) hücrenin sayfasını da belirtmekte yarar var.
yeniveri = yeniveri + Cells(X, 2).Value + Ce..... şeklinde değil de yeniveri = yeniveri + s1.Cells(X, 2).Value +s1.Ce....
....eetFunction.CountIf(Range(sk1.Cells(1, 1) şeklinde değil de eetFunction.CountIf(sk1.Range(sk1.Cells(1, 1) gibi.

Anlaşıldı hocam, bu dediklerinizi de düzeltiyorum hemen, teşekkür ederim ????

 

[mab82981]

Hocam kusura bakmayin hiç o şekilde düşünmedim. Dosyada giriş , bina kapısı gibi 9-10 harflik görevler vardı sadece hep öyle olur zannettim. Ömer baran hocam yorum ve bilgi için teşekkür ederim. C# c++ gibi dillerde türkçe karakter kullanmaya izin vermiyor ancak burada izin verdiğini görünce sorun yaratmıyor diye devam ettim bunu yapmaya. Dediğiniz gibi yapmak lazım en azından el alışkanlığı kazanmak adına.

 

[Ömer BARAN]

Konuyu, durumu çok net hatırlamıyorum ama MAC bilgisayarda Türkçe karakter sorunu yaşamıştım gibi aklımda kalmış.

 

[Baturfurkan]

Hocam kusura bakmayin hiç o şekilde düşünmedim. Dosyada giriş , bina kapısı gibi 9-10 harflik görevler vardı sadece hep öyle olur zannettim. Ömer baran hocam yorum ve bilgi için teşekkür ederim. C# c++ gibi dillerde türkçe karakter kullanmaya izin vermiyor ancak burada izin verdiğini görünce sorun yaratmıyor diye devam ettim bunu yapmaya. Dediğiniz gibi yapmak lazım en azından el alışkanlığı kazanmak adına.

Estağfurullah hocam ne sorunu, programınız dün yinede hayatımızı kurtardı denebilir ???? Müsait bi zamanınızda kodlarınızı açıklayabilir misiniz? Bende öğrenmek isterim. Küçük şeyleri internetten bakarım da hani şu kısımda ne iş yapıyor burada ne yapıyor gibi anlatırsanız ????

 

[mab82981]

Tabii ki elimden geldiğince yardımcı olabilirim. Kod bilginiz var mı meslekten veya uğraş sonucu falan.

 

[Baturfurkan]

Tabii ki elimden geldiğince yardımcı olabilirim. Kod bilginiz var mı meslekten veya uğraş sonucu falan.

Herhangi bir kurs almadım ama konuya ilgim, ve ihtiyaç doğrultusunda internetten araştırarak öğrendiğim kadarı var. Ama çabuk kavrarım hocam