Sına sonucu aktarma

[mest3651]

Merhaba. Arkadaşlar yapmak istediğimi dosyada anlatmaya çalıştım. şimdiden çok teşekkür ederim.

 

[muygun]

Merhaba;
Kayıt aşamasında mükerrer yada alan değişikliği sorununu aşmak için çift tıklama yöntemini daha uygun buldum.
Eki deneyin.
İyi çalışmalar.

 

[mest3651]

çok saolun. sonuç kısmını dosyada anlattığım gibi ilgili hücrelere atması gerekiyor. teşekkür ederim.

 

[muygun]

Kaydet butonuna basınca ilgili hücrelere atmıyor mu?

 

[mest3651]

Atıyor. Fakat bu listeyi ilgili birime teslim edeceğimden sonuçları Sayfa1 e atması gerekiyor. Fotmatı o şekilde istiyorlar.

 

[muygun]

Merhaba;
data sayfası Sayfa1 olarak değiştirildi.
İnceleyin.
İyi çalışmalar.

 

[mest3651]

Merhaba. Çok saol emeğin için. Aday ilk hakkında kaldığı zaman sonucu girmek isteiğimde kaçıncı hak olduğunu bilemiyorum. 150 ye yakın aday var. Anladığım kadarıyla bu makroda kaçıncı hakkıysa o hücreye çift tıklama gerekiyor.

 

[mest3651]

MERHABA. DOSYADA ANLATTIĞIMI ALLTAKİ MAKRAOYA UYGULAYABİLİRMİYİZ.

Sub getirr()
Application.ScreenUpdating = False
On Error Resume Next
Set s11 = ThisWorkbook.Worksheets("SINAV SONUCU")
Set s10 = ThisWorkbook.Worksheets("SAYFA1")
For i = 1 To s10.Range("X65536").End(xlUp).Row
For k = 1 To s11.Range("A65536").End(xlUp).Row
If s10.Cells(i, "X") = s11.Cells(k, 1) And s11.Cells(k, 3) > 69 Then
s10.Cells(i, "k") = s11.Cells(k, 3)
End If
Next k
Next i
Application.ScreenUpdating = True
MsgBox "İşlem TAMAM.", vbInformation
End Sub


Bu makroda 69 dan büyükse ilgili hücreye atıyor. Benim istediğim kaç aldıysa notu ilgili hücreye atması.

 

[YUSUF44]

Koddaki "if" ve "End if" satırlarını silin, aradaki satır kalsın.

 

[mest3651]

Yusuf Hocam ekteki dosyada uygulamak istiyorum. Bu kodla olurmu? Açıklamasını yaptım orda. Biraz karışık. saolun.

 

[muygun]

Merhaba;
Doğru anlamışsınız. Birçok nedenden dolayı böyle bir işlem (çift tıklama ile sınav no belirleme) yapmıştım.
Diyelim ki aday 1. sınava girdi başaramadı 2. sınava girmedi yani sınavı pas geçti. 3. sınava geldi ve girdi yine başaramadı (bu adayın son girdiği sınav 2. sınavı mı? yoksa 3. sınavı mı? (nasıl bileceksiniz? 4 sınav hakkı var diyorsunuz)
Bu nedenle kontrollü sınav sonucu yerleştirme daha mantıklı gelmişti.

Ama kaçıcı hakkı olursa olsun sıradan yerleşsin ve 4 sınav hakkını tamamlayabilsin diyorsanız;
Birde bu eki deneyin.
İyi çalışmalar.

 

[mest3651]

Merhaba. tam istediğim gibi. Çok Teşekkür ederim. Bişey daha ekleyebilirmiyiz. Not kısmı boş ise GİRMEDİ anlamına geliyor. eğer not kısmı boşsa SONUÇ kısmına GİRMEDİ yazdırabilirmiyiz. Sizi baya uğraştırdım. Hakkınızı helal edin. çok saolun.

 

[muygun]

Merhaba;
4 değişik tarih ile verileri kaydederek deneyin.
İyi çalışmalar.

 

[mest3651]

Merhaba. Sonucu direk 4.sınav hücresine atıyor.

 

[muygun]

Merhaba;
Benim denemelerimde bir sorun göremedim.
Tabloyu baştan kullanın.
1- Sayfa1 sayfasında S5 : AA65536 aralığını temizleyin.
2-işlem sayfasına geçin.
3-C1 hücresine bir tarih yazın.
4- işlem sayfasında T.C No'ların karşısında sonuç kısımlarına geçecek şekilde not , kalacak şekilde not ve bir-ikisini boş bırakarak kaydet butonuna basın.
5-Sayfa1 sayfasına geçin yazılan sonuçları kontrol edin (hatalı sonuç aktarması varsa belirtin ve dosyayı bu hatalı şekliyle buraya ekleyin)
6- 3,4,5. maddeyi 3 kez daha tekrarlayın.
Hata hangi aşamada oluyorsa hatalı dosyayı ekleyin.
İyi çalışmalar.

 

[mest3651]

Sonuç aktarma

MUygun hocam dosyada yine 4. sınav sonucuna atıyor.

 

[muygun]

Merhaba;
Dosyada nasıl bir değişiklik yaptığınızı bilemiyorum ama verileri mest3651-sürücü kurs analiz-3 dosyasına yerleştirip çalıştırınca sorunsuz işlem yaptı.
İnceleyin.
İyi çalışmalar.

 

[mest3651]

Sonuç aktarma

Merhaba. Muygun hocam uğraştırıyorum sizi çok saolun. İşlem sayfasında sınav sonucunu atarken sayfa1 deki ilk tc nolu (36829994572) adayın sınav sonucunu İşlem sayfasındaki ilk adayın sonucunu atıyor. Normalde 67 atması gerekirken 73 atıyor. kayma oluyor sanırım.

 

[muygun]

Merhaba;
Farklı bir yöntemle sonuca gitmeyi denedim. (Ama galiba Sayfa1 sayfasında bazı T.C.'ler yok. İşlem sayfasında D sütununda bulunan T.C.'lerin satır no'sunu yazdırdım.)
Eki deneyin.
İyi çalışmalar.

 

[mest3651]

Sonuç aktarma

Muygun hocam çok saol. sayfa 1 de verileri say makrosu iptal olmuş. B,A2,A1 SAYFASINDA saydırmak için makro yapmışsınız ama doğru çalışmıyor. Çok teşekkür ederim.