sayın feraz aşağıdaki kodu ekledikten sonra userformumu açan kod tür uyuşmazlığı hatası verdi, ben de bayağı bi inceledim acaba ne alaka diye, sonunda Me.Controls kısmına bakarken bende textboxların haricinde buton vesairenin de olduğu aklıma geldi ve hemen if else bloğu ekledim ki sadece textboxları seçsin diye, sorun çözüldü, böyle bir hata yaşayan olursa belki işe yarar diye paylaştım, çok teşekkür ederim çok makbule geçti bu çalışma , çok ihtiyacım vardı teşekkürler.

Dim clsTxtler() As New clsTextboxKopyala

Private Sub UserForm_Initialize()
    Dim say As Long, ctl As Control
   
    say = 0
    For Each ctl In Me.Controls
    If TypeName(ctl) = "TextBox" Then
        ReDim Preserve clsTxtler(say)
        Set clsTxtler(say).txt = ctl
        say = say + 1
        End If
       
    Next
End Sub

konuyu güncelliyorum, silme işlemini yapıyor ama kopyala yapıştır dediğim zaman kare şeklinde kutucuklar şeklinde görünüyor yapıştırılan yazılar, ya da boşluk yapıştırıyor, nerede sorun var acaba, kusura bakmayın konu bayağı uzadı ama, bir de sayfadaki butona tıklıyorum çalışmıyor hiç tepki vermiyor.