AccessTr.neT

Tam Versiyon: Comment Açıklama Bilgisi Kodunu Revize Etmek
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2 3 4 5 6 7
Tamam Hocam
Zafer Hocam fare ile aynı satırda veya farklı satırlarda toplu seçim yapınca inputbox çıksa
misal ahmet isimli personelin 12345678910 günlerini toplu seçince fare ile inputbox açılsa girilen açıklama metnini Ahmet in 12345678910 . satırlarına tek seferde girse

veya
5. satırda ahmet 6. satırda mehmet 7. satırda veli var üç personelin 123456789. satırları fare ile seçilince inputboxa girilen veri 3 personelin de 123456789. hücrelerine girse.
Ayrıca Üsteki yeşil kısıma tıklayınca hata mesajı veriyor  SN SCİL ADI yazan kısım ya hiç inputbox açılmasın orada ya da hata vermesin
(20/11/2020, 21:45)hayalibey yazdı: [ -> ]Zafer Hocam fare ile aynı satırda veya farklı satırlarda toplu seçim yapınca inputbox çıksa
misal ahmet isimli personelin 12345678910 günlerini toplu seçince fare ile inputbox açılsa girilen açıklama metnini Ahmet in 12345678910 . satırlarına tek seferde girse

veya
5. satırda ahmet 6. satırda mehmet 7. satırda veli var üç personelin 123456789. satırları fare ile seçilince inputboxa girilen veri 3 personelin de 123456789. hücrelerine girse.
Ayrıca Üsteki yeşil kısıma tıklayınca hata mesajı veriyor  SN SCİL ADI yazan kısım ya hiç inputbox açılmasın orada ya da hata vermesin
Ben vazgeçtim abey bu konudan Img-grin
Son yaptığım oldumu olmadımı?
(20/11/2020, 22:12)feraz yazdı: [ -> ]
(20/11/2020, 21:45)hayalibey yazdı: [ -> ]Zafer Hocam fare ile aynı satırda veya farklı satırlarda toplu seçim yapınca inputbox çıksa
misal ahmet isimli personelin 12345678910 günlerini toplu seçince fare ile inputbox açılsa girilen açıklama metnini Ahmet in 12345678910 . satırlarına tek seferde girse

veya
5. satırda ahmet 6. satırda mehmet 7. satırda veli var üç personelin 123456789. satırları fare ile seçilince inputboxa girilen veri 3 personelin de 123456789. hücrelerine girse.
Ayrıca Üsteki yeşil kısıma tıklayınca hata mesajı veriyor  SN SCİL ADI yazan kısım ya hiç inputbox açılmasın orada ya da hata vermesin
Ben vazgeçtim abey bu konudan Img-grin
Son yaptığım oldumu olmadımı?

Son oldu Hocam özelde size mesaj atamıyorum kapalı nasıl yapacaz
Sayın @hayalibey
Çoklu seçim yapınca
1- Çıkan imputbox'a x yazıp, OK düğmesine tıklarsanız. seçimdeki Açıklamaları siler.
2- Boş bırakıp OK veya boş bırakmasanız bile Cancel düğmesine basarsanız işlem yapmadan çıkar
3- 'x' değerinin dışındaki değer yazaeranız Açıklama ekler.
Kod:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  myvalue = InputBox(Açıklama gir", "AÇIKLAMA")
If myvalue = "" Then
Exit Sub
ElseIf myvalue = "x" Then
Selection.ClearComments
Else
For i = 1 To Selection.Count
Range(Selection(i).Address).ClearComments
  Range(Selection(i).Address).AddComment
      Range(Selection(i).Address).Comment.Text Text:=myvalue
  Next
End If
End Sub
NOT. Ayrık olarak Çoklu seçim yapmayın yanlış işlem yapar.
Sayın Ali hocam,B sütunundaki 6 rakam olayı var daha Img-grin
Ayrıca B sütununda bazılarının önünde boşluk var 6 karakterli gibi görünsede 7 olarak kod algılıyor bazı işlemler yapmayınca.
Hatırlatayım istedim Img-grin
Sayfalar: 1 2 3 4 5 6 7