• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

veri getirme

  1. BERKBABA44

    Çözüldü Veri Getirme

    Private Sub CommandButton7_Click() On Error Resume Next Dim aradeğer As String Dim arahücre As Range Dim yer As Variant aradeğer= ListBox2.Value Set arahücre= Sheets("Sözleşme Bilgileri").Range("D:D") yer = Application.Match(aradeğer, arahücre, 0) If Not...
Geri
Üst