aynı veri

  1. I

    Çözüldü Aktarma Esnasında Mükerrer Kontrolü Yapma

    Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Intersect(Target, Range("A3:A65536")) Is Nothing Then Range("A3:A65536").Replace "ü", "" 'Araya Ekleyin Cancel = True With Target .Font.Name = "Wingdings"...
Üst Alt