harf yerine isim ekleme

[Orion1]

hocam bu tabloda hata var aynı saat vardiyasından iki tane var 08:16.00 vardiyası iki adet onun birini silipde öle formülü uygulasak sana zahmet birde ben bu kodu değiştiremezmiyim acaba şifrelimi bu kodlar

Ekli dosyayı inceleyiniz.

Private Sub CommandButton1_Click()
Dim hucre As Range
If TextBox1.Value = Empty Then
    MsgBox "Bir harf girmelisiniz.!", vbCritical
    TextBox1.SetFocus
    Exit Sub
End If
If TextBox2.Value = Empty Then
    MsgBox "Bir İsim Girmelisiniz..!!", vbCritical
    TextBox1.SetFocus
    Exit Sub
End If
For Each hucre In Range("C9:H39")
    If hucre.Value = TextBox1.Value Then
        hucre.Value = TextBox2.Value
    End If
Next
MsgBox "İşlem Tamamlandı..!!", vbOKOnly + vbInformation
End Sub

 

[feridunsah]

hocam eline sağlık çok güzel oldu teşekkür ediyorum ben bu son yaptığın tabloyu kopyala yapıştır yolu ile yılın bütün aylarına uyguluyabilirmiyim herhangi bir sıkıntı çıkarmı acaba

 

[Orion1]

hocam eline sağlık çok güzel oldu teşekkür ediyorum ben bu son yaptığın tabloyu kopyala yapıştır yolu ile yılın bütün aylarına uyguluyabilirmiyim herhangi bir sıkıntı çıkarmı acaba

Kopyalayın ama kopyaladığınız yere bir buton koyun ve o butona form_ac makrosunu atayın.Böylece userform her sayfada çalışmış olacaktır.:cool.

 

[feridunsah]

hocam sana zahmet değiştir butonun yanına birde kapat düğmesi eklesen üstündeki çarpıdan deilde değiştirin yanından işlem bitince tıklayıp kapatsak teşekkürler

 

[Orion1]

hocam sana zahmet değiştir butonun yanına birde kapat düğmesi eklesen üstündeki çarpıdan deilde değiştirin yanından işlem bitince tıklayıp kapatsak teşekkürler

Dosyanız ekte.

 

[feridunsah]

hocam gece gece sana çok eziyet verdik çok teşekkür ederim hakkını helal et tşk

 

[feridunsah]

08:16.00 Dan Çikan NÖbetÇİ 24:08.00 E GÖnder Ama Arada 32 Saat Dİnlenme
Olacak Şekİlde Aralalardakİ BoŞluklara Yedek NÖbetÇİ Gelecek Şekİlde

24:00:08.00 Çikanda 16:00 :24:00 Gelecek Bunlarin Arasinda Dİnlenme GeÇİŞlerİ
32 Saat Olacak Şekİlde Ayarlanir Bu 32 Saatlİk Aralarada Yedek BekÇİ
Devreye Gİrer Bu Şekİlde Makroyla Otomatİk Olarak Ayarlanabİlİrmİ

 

[feridunsah]

sayfada a gördüğü yere ismi ekleme

08:16.00 Dan Çikan NÖbetÇİ 24:08.00 E GÖnder Ama Arada 32 Saat Dİnlenme
Olacak Şekİlde Aralalardakİ BoŞluklara Yedek NÖbetÇİ Gelecek Şekİlde

24:00:08.00 Çikanda 16:00 :24:00 Gelecek Bunlarin Arasinda Dİnlenme GeÇİŞlerİ
32 Saat Olacak Şekİlde Ayarlanir Bu 32 Saatlİk Aralarada Yedek BekÇİ
Devreye Gİrer Bu Şekİlde Makroyla Otomatİk Olarak Ayarlanabİlİrmİ

 

[feridunsah]

yardımcı olacak arkadaşım yokmu acaba