- Katılım
- 1 Kasım 2006
- Mesajlar
- 26
- Excel Vers. ve Dili
- bilmiyorum
ilişkisiz bir liste kutusunu tabloya nasıl kaydedebiliriz? küçük bir örnek koyarsanız sevnrim.
-
DİKKAT DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
lişkisiz liste kutusunu tabloya nasıl kayedebiliriz bir örnek lütfen
- Konbuyu başlatan emreturgut1
- Başlangıç tarihi
- Katılım
- 1 Kasım 2006
- Mesajlar
- 26
- Excel Vers. ve Dili
- bilmiyorum
bildiğim kadarıyla komutla yapılıyor.ilgilendiğin için sağol.
cevap
Private Sub Liste2_AfterUpdate()
Dim rs As New ADODB.Recordset
rs.Open "Tablo1", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
If rs.EOF <> True Then
Do
If rs("numarası") = numarası.Value Then'burda form daki numarası alanı ile tabloyu karşılaştırıyorsun uyan kayıtların hepsine
rs("tuttuğutakım") = Liste2.Column(0)'burda liste2nin 0 stununun değerini tablodaki tuttuğu takım alanına ekliyorsun
rs.Update
End If
rs.MoveNext
Loop Until rs.EOF
End If
Set rs = Nothing
Set conn = Nothing
End Sub
yukarda tırnak işareti ile ayrılmış bölümde kodun hnagi bölümünün ne işe yaradığı anlattım ama birde burda anlatayım senin formdaki takımlar liste kutun var diyelim formda a kişisini seçtin ve ve ilişkisiz liste kutusundanda bir takım seçtiğin anda tabloda a kişsinin tuttuğutakım alanına seçtiğin takımı ekler bu ara unutmadan listelerde Column(0) 0 ilk stundur sonra 1 2 diye gider yani sen listen 2 stunlu ise ve birini tabloda bir yere diğerini başka yere yazacaksan Column(1) düzenlemen gerekir
Private Sub Liste2_AfterUpdate()
Dim rs As New ADODB.Recordset
rs.Open "Tablo1", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
If rs.EOF <> True Then
Do
If rs("numarası") = numarası.Value Then'burda form daki numarası alanı ile tabloyu karşılaştırıyorsun uyan kayıtların hepsine
rs("tuttuğutakım") = Liste2.Column(0)'burda liste2nin 0 stununun değerini tablodaki tuttuğu takım alanına ekliyorsun
rs.Update
End If
rs.MoveNext
Loop Until rs.EOF
End If
Set rs = Nothing
Set conn = Nothing
End Sub
yukarda tırnak işareti ile ayrılmış bölümde kodun hnagi bölümünün ne işe yaradığı anlattım ama birde burda anlatayım senin formdaki takımlar liste kutun var diyelim formda a kişisini seçtin ve ve ilişkisiz liste kutusundanda bir takım seçtiğin anda tabloda a kişsinin tuttuğutakım alanına seçtiğin takımı ekler bu ara unutmadan listelerde Column(0) 0 ilk stundur sonra 1 2 diye gider yani sen listen 2 stunlu ise ve birini tabloda bir yere diğerini başka yere yazacaksan Column(1) düzenlemen gerekir
- Katılım
- 1 Kasım 2006
- Mesajlar
- 26
- Excel Vers. ve Dili
- bilmiyorum
Gülsüm hanım ilginize teşekkürler.
Birde metin kutusunda hesaplanan alanın değerlerini (ilişkisiz) tabloya bir butan yardımıyla nasıl yazdırabilirim.daha doğrusu ilişkisiz metin kutularını bir komut düğmesi yardımıyla tabloya yazdırmak istiyorum.fakat siz ne kadar anlatsanız ben çok iyi bilmediğim için beceremiyorum.küçük bir örnek koyarsanız sevinirim.(bir çalışma yaptım çok büyük olduğu için buraya koymadım.bir çok formülü örneklere baka baka çözdüm.sayenizde birşeyler öğrendik ama bazı formülleri anlamakta zorlanıyorum.çalıştığım için çok fazla yoğunlaşamıyorum.ama uğraşmayıda çok seviyorum.yardımınıza şimdiden teşekkürler.
Birde metin kutusunda hesaplanan alanın değerlerini (ilişkisiz) tabloya bir butan yardımıyla nasıl yazdırabilirim.daha doğrusu ilişkisiz metin kutularını bir komut düğmesi yardımıyla tabloya yazdırmak istiyorum.fakat siz ne kadar anlatsanız ben çok iyi bilmediğim için beceremiyorum.küçük bir örnek koyarsanız sevinirim.(bir çalışma yaptım çok büyük olduğu için buraya koymadım.bir çok formülü örneklere baka baka çözdüm.sayenizde birşeyler öğrendik ama bazı formülleri anlamakta zorlanıyorum.çalıştığım için çok fazla yoğunlaşamıyorum.ama uğraşmayıda çok seviyorum.yardımınıza şimdiden teşekkürler.