USERFORM İLE ARAMA

VBA Makrolar ile ilgili sormak istedikleriniz, yapmak istedikleriniz hakkında yardım alabileceğiniz bölümdür.

USERFORM İLE ARAMA

İleti#1)  ilker29 » 21 Oca 2023 09:24

Merhaba arkadaşlar
İş yerinde kullanmak için bir form hazırlamaya çalışıyorum.
Yapmak istediğim userform üzerindeki Textbox1 e yazdığım sayıyı A sütununda arayacak ve Textbox2 ye yazdığım sayıyı B sütununda arayacak ikisinin kesiştiği satırda Textbox taki veriyi C sütununa yazmasını istiyorum. konu hakkında acil yardım. hoşçakalın
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
ilker29
Yeni Başlamış
 
Adı Soyadı:ilker gökçe
Kayıt: 21 Ekm 2010 09:23
Konum: ereğli
Meslek: elektrik teknikeri
Yaş: 44
İleti: 89
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: AKSARAY



Yıllık Maaş Bordrosu Hesaplama 2022

Cevap: USERFORM İLE ARAMA

İleti#2)  Yken » 27 Oca 2023 17:09

Kod: Tümünü seç
Private Sub CommandButton1_Click()
Dim aa As Integer, bb As Integer, cc As Variant, sonsat As Long

sonsat = Sayfa1.Range("A1").End(xlDown).Row
dizi = Range("A1:B" & sonsat).Value
aa = TextBox1.Value
bb = TextBox2.Value
cc = TextBox3.Value

For j = LBound(dizi, 1) To UBound(dizi, 1)
    If aa = (dizi(j, 1)) And bb = (dizi(j, 2)) Then
        Unload Me
        Cells(j, 3).Value = cc
        Exit For
    End If
Next

End Sub
Kullanıcı avatarı
Yken
Siteye Alışmış
 
Kayıt: 07 Kas 2014 11:06
Meslek: Muhasebe
Yaş: 57
İleti: 114
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul


Forum Genel Makro Soruları

Online Kullanıcılar

Bu forumu görüntüleyenler: Google [Bot] ve 4 misafir

Bumerang - Yazarkafe