[Çözüldü]  Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil, Değiştir

Kulanıcı arayüz formu

Cevap: Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil, Değişt

İleti#141)  Enes Recep BAĞ » 19 May 2014 21:50

138. mesajınızda paylaştığınız kodları örneğinizde göremedim. [ilginc]
Bu şekilde nerede hata aldığınızı bilemem ki.
Kullanıcı avatarı
Enes Recep BAĞ
Forum Moderatörü
 
Adı Soyadı:Enes Recep BAĞ
Kayıt: 30 Ağu 2010 15:39
Konum: 0 549 808 82 66
Meslek: Bilgi işlem
Yaş: 37
İleti: 8263
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray / Merkez

Cevap: Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil, Değişt

İleti#142)  acinik » 19 May 2014 21:52

Şu konuyu anlayıp, bir kaç dosya hazırlasam benden kralı yok. Derste bulamuyorum. Ama KTF olayını çözdüm sayılır.

[music]
Kullanıcı avatarı
acinik
Yeni Başlamış
 
Adı Soyadı:Ergun Acinik
Kayıt: 11 Nis 2011 09:06
Konum: MERSİN
Meslek: muhasebe
Yaş: 34
İleti: 48
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Mersin

Cevap: Cevap: Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil,

İleti#143)  Enes Recep BAĞ » 19 May 2014 21:53

acinik yazdı:Şu konuyu anlayıp, bir kaç dosya hazırlasam benden kralı yok. Derste bulamuyorum. Ama KTF olayını çözdüm sayılır.

[music]

KTF olayını çözdüyseniz daha ne istiyorsunuz, siz zaten kralsınız o zaman. :)
Kullanıcı avatarı
Enes Recep BAĞ
Forum Moderatörü
 
Adı Soyadı:Enes Recep BAĞ
Kayıt: 30 Ağu 2010 15:39
Konum: 0 549 808 82 66
Meslek: Bilgi işlem
Yaş: 37
İleti: 8263
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray / Merkez

Cevap: Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil, Değişt

İleti#144)  acinik » 19 May 2014 22:21

Biraz büyük konuştum sanki:) Kendi çapımda kral diyelim. :)
Kullanıcı avatarı
acinik
Yeni Başlamış
 
Adı Soyadı:Ergun Acinik
Kayıt: 11 Nis 2011 09:06
Konum: MERSİN
Meslek: muhasebe
Yaş: 34
İleti: 48
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Mersin

REKLAM
Excel Logo XML Oluşturucu
Logo Object Designer ile Uyarlama

Cevap: Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil, Değişt

İleti#145)  sleeper » 19 May 2014 22:23

Enes Recep BAĞ yazdı:138. mesajınızda paylaştığınız kodları örneğinizde göremedim. [ilginc]
Bu şekilde nerede hata aldığınızı bilemem ki.


Bu sefer daha detaylı bir örnek ekledim.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
sleeper
Yeni Başlamış
 
Adı Soyadı:ali karataş
Kayıt: 04 Kas 2013 16:28
Konum: istanbul
Meslek: memur
Yaş: 34
İleti: 63
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul

Cevap: Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil, Değişt

İleti#146)  at1lla » 13 Ağu 2014 22:22

Merhaba Tarkan Bey,

Örnek olarak verdiğiniz kodları kendime uyarlamaya çalıştım. Fakat " Object required (Error 424) "hatası veriyor sorunu çözemedim.
Dosyamı eklersem yardımcı olabilirmisiniz.
Sizin kodlarınızı userform2 de kaydet düğmesine yazdım.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
at1lla
 
Adı Soyadı:atilla aydın
Kayıt: 28 Nis 2014 21:55
Konum: istanbul\beylikdüzü
Meslek: pazarlama
Yaş: 48
İleti: 7
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul\beylikdüzü

REKLAM
ETA - Excel Konsolide Raporlama
ETA Excel Personel Entegre Raporu

Cevap: Cevap: Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil,

İleti#147)  ahmetilhan282 » 14 Ağu 2014 00:16

at1lla yazdı:Merhaba Tarkan Bey,

Örnek olarak verdiğiniz kodları kendime uyarlamaya çalıştım. Fakat " Object required (Error 424) "hatası veriyor sorunu çözemedim.
Dosyamı eklersem yardımcı olabilirmisiniz.
Sizin kodlarınızı userform2 de kaydet düğmesine yazdım.

Aşağıdaki satır yerine
Kod: Tümünü seç
For Each bul In masraf.Range("a2:a" & Range("a65536").End(3).Row)

aşağıdaki satırı yazınız.
Kod: Tümünü seç
For Each bul In Sheets("masraf").Range("a2:a" & Range("a65536").End(3).Row)
Kullanıcı avatarı
ahmetilhan282
Site Dostu
 
Adı Soyadı:Ahmet İLHAN
Kayıt: 15 Oca 2014 00:04
Konum: Adana
Meslek: Güvenlik
Yaş: 29
İleti: 842
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Mersin

Cevap: Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil, Değişt

İleti#148)  at1lla » 14 Ağu 2014 09:04

İlginiz için teşekkür ederim , o şekilde de denemiştim fakat sonuç vermedi. Farklı bir şekilde kendim çözdüm.

Kod: Tümünü seç
Sheets("masraf").Unprotect "22eyl22"
sonsat = Sheets("masraf").Cells(Rows.Count, "a").End(3).Row
If sonsat < Val(TextBox1.Text) Then
MsgBox "bu satırda bilgi yok"
Exit Sub
End If
sayfa_adi = masraf
sat = TextBox1.Text + 2
Sheets("masraf").Cells(sat, "b").Value = TextBox2.Value
Sheets("masraf").Cells(sat, "c").Value = TextBox3.Value
Sheets("masraf").Cells(sat, "d").Value = TextBox4.Value
Sheets("masraf").Cells(sat, "e").Value = TextBox5.Value
Sheets("masraf").Cells(sat, "f").Value = TextBox6.Value
Sheets("masraf").Cells(sat, "g").Value = TextBox7.Value
Sheets("masraf").Cells(sat, "h").Value = TextBox8.Value
Sheets("masraf").Cells(sat, "ı").Value = TextBox9.Value
Sheets("masraf").Cells(sat, "j").Value = TextBox10.Value
Sheets("masraf").Cells(sat, "k").Value = TextBox11.Value
Sheets("masraf").Cells(sat, "l").Value = TextBox12.Value
Sheets("masraf").Protect "22eyl22"
Kullanıcı avatarı
at1lla
 
Adı Soyadı:atilla aydın
Kayıt: 28 Nis 2014 21:55
Konum: istanbul\beylikdüzü
Meslek: pazarlama
Yaş: 48
İleti: 7
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul\beylikdüzü

Kaydedilen Sayfa Açık Değilse!!!

İleti#149)  teknisyen7777 » 02 Ekm 2014 12:43

Merhaba,
UserFormu excelde farklı bir sayfadayken çalıştırıyorum, kayıtta sorun yok ama bul, sil, değiştir çalışmıyor. Kayıt sayfası açıkken sorunsuz çalışıyor ama başka bir sayfadayken yada excel kapalıyken kayıt hariç diğerleri çalışmıyor. Bunu nasıl giderebiliriz.
Kullanıcı avatarı
teknisyen7777
Yeni Başlamış
 
Kayıt: 26 Eyl 2014 15:18
Meslek: kamu
Yaş: 42
İleti: 62
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: sakarya

Cevap: Kaydedilen Sayfa Açık Değilse!!!

İleti#150)  Enes Recep BAĞ » 03 Ekm 2014 19:07

teknisyen7777 yazdı:Merhaba,
UserFormu excelde farklı bir sayfadayken çalıştırıyorum, kayıtta sorun yok ama bul, sil, değiştir çalışmıyor. Kayıt sayfası açıkken sorunsuz çalışıyor ama başka bir sayfadayken yada excel kapalıyken kayıt hariç diğerleri çalışmıyor. Bunu nasıl giderebiliriz.


teknisyen7777 yazdı:Sorun Çözüldü, çok teşekkürler.
http://www.excelvba.net/viewtopic.php?f=78&t=1483&start=140
Bu linteki son mesajımla ilgili bir fikriniz olabilirmi acaba. Bir yanıt gelmedi uzun zamandır.



Hakan Bey kesin yanıt için dosyanızı ekleyin, kodlarınızı inceleyelim ona göre yanıt verelim.
Kullanıcı avatarı
Enes Recep BAĞ
Forum Moderatörü
 
Adı Soyadı:Enes Recep BAĞ
Kayıt: 30 Ağu 2010 15:39
Konum: 0 549 808 82 66
Meslek: Bilgi işlem
Yaş: 37
İleti: 8263
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray / Merkez

Cevap: Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil, Değişt

İleti#151)  teknisyen7777 » 03 Ekm 2014 19:30

Merhaba,

Dosyamı ekledim.
Anamenu sayfasında personel ekle butonuna tıkladığımda gelen formun personel sayfasına kayıt yapmasını istiyordum.

Not: önceki denememde kayıt yapılan sayfa açıkken (kaydet-sil-bul-değiştir) tüm işlemleri yapıyor, fakat kayıt sayfası değilde başka bir sayfa açıkken formu çağırdığımda sadece kayıt yapıyordu.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
teknisyen7777
Yeni Başlamış
 
Kayıt: 26 Eyl 2014 15:18
Meslek: kamu
Yaş: 42
İleti: 62
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: sakarya

Cevap: Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil, Değişt

İleti#152)  Enes Recep BAĞ » 03 Ekm 2014 19:48

anamenu sayfasında, PERSONEL EKLE-ÇIKAR butonuna basınca userform1i açıyor.
Userform1in içindeki aşağıdaki kodları,
Kod: Tümünü seç
Private Sub UserForm_Initialize()
Dim i As Byte
ComboBox1.Clear
For i = 2 To [a65536].End(3).Row
ComboBox1.AddItem Cells(i, 2)
Next i
End Sub


Bu kodlar ile değiştirin.
Kod: Tümünü seç
Private Sub UserForm_Initialize()
Dim i As Byte
ComboBox1.Clear
For i = 10 To 59
If Cells(i, 4) <> "" Then ComboBox1.AddItem Sayfa2.Cells(i, 4)
Next i
End Sub


Sonrasında çıkan ekranda userform1 çıkıyor.
Ad Soyad ve Ünvan geliyor.
Siz burada kaydet dediğinizde nereye kayıt edecek.
Bilgi verirseniz yardımcı olmaya çalışırım.
Kullanıcı avatarı
Enes Recep BAĞ
Forum Moderatörü
 
Adı Soyadı:Enes Recep BAĞ
Kayıt: 30 Ağu 2010 15:39
Konum: 0 549 808 82 66
Meslek: Bilgi işlem
Yaş: 37
İleti: 8263
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray / Merkez

Cevap: Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil, Değişt

İleti#153)  teknisyen7777 » 03 Ekm 2014 19:52

Çalışma kitabında personel sayfası var, oraya kaydetmesini istiyorum. Ancak dediğim gibi silme, değiştirme ve bulma işlemlerini kayıt sayfası olan personel açık değilse yapmıyor, sadece kayıt yapıyor farklı sayfa açıkken.
Kullanıcı avatarı
teknisyen7777
Yeni Başlamış
 
Kayıt: 26 Eyl 2014 15:18
Meslek: kamu
Yaş: 42
İleti: 62
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: sakarya

Cevap: Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil, Değişt

İleti#154)  Enes Recep BAĞ » 03 Ekm 2014 20:09

Dosyanız ekte.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
Enes Recep BAĞ
Forum Moderatörü
 
Adı Soyadı:Enes Recep BAĞ
Kayıt: 30 Ağu 2010 15:39
Konum: 0 549 808 82 66
Meslek: Bilgi işlem
Yaş: 37
İleti: 8263
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray / Merkez

Cevap: Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil, Değişt

İleti#155)  teknisyen7777 » 05 Ekm 2014 16:50

Bayramınız kutlu olsun hocam, yardımlarınız için teşekkürler.
Biz bayram falan demeden çalışmaya devam :)
Hocam sorum maalesef devam ediyor. Form kayıt haricinde diğer işlevlerini yapmıyor (bul, sil değiştir)
Userform1 sadece personel sayfası açıkken tüm işlevlerini yapıyor. yani anamenu sayfasından personel ekle-çıkara tıkladığımızda kayıt harici hiçbir işlemi yapamıyoruz.
Kullanıcı avatarı
teknisyen7777
Yeni Başlamış
 
Kayıt: 26 Eyl 2014 15:18
Meslek: kamu
Yaş: 42
İleti: 62
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: sakarya

Cevap: Cevap: Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil,

İleti#156)  Enes Recep BAĞ » 05 Ekm 2014 21:31

teknisyen7777 yazdı:Bayramınız kutlu olsun hocam, yardımlarınız için teşekkürler.

Sizlerinde bayramı kutlu olsun. [evet]
Madem sadece kendi sayfasında çalışıyor, diğer sayfalarda çalışmıyor, o halde bul değiştir veya sil butonlarına bağlı olan kodların ilk satırına hangi sayfada işlem yaptırmak istiyorsanız o sayfanın adını yazın, kodların en son satırına da geri ana sayfanızın ismini yazın. ;)
Örnek verecek olursak;
Sil butonu için,
sub sil()
sheets("kayıtsayfam").select
.
.
.
kodlarınız
.
.
.
sheets("anasayfam").select
end sub
Sayfalar arası geçiş efekti olacaktır, olmasın istiyorsanız da, gene kodlarınızın ilk satırına,
application.screenupdating=false yazın.
Bu şekilde dener misiniz?
Kullanıcı avatarı
Enes Recep BAĞ
Forum Moderatörü
 
Adı Soyadı:Enes Recep BAĞ
Kayıt: 30 Ağu 2010 15:39
Konum: 0 549 808 82 66
Meslek: Bilgi işlem
Yaş: 37
İleti: 8263
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray / Merkez

Cevap: Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil, Değişt

İleti#157)  teknisyen7777 » 07 Ekm 2014 12:34

Bu mantıkla aynı dediğiniz şeyi ben yapmıştım ve olmuştu ( demek gelişme gösteriyorum bende :) )
Fakat geçiş efekti gözükmemesi hususunu nasıl çözeceğimi bilmiyordum. Pc ye geçince kodları deneyeceğim.
Kullanıcı avatarı
teknisyen7777
Yeni Başlamış
 
Kayıt: 26 Eyl 2014 15:18
Meslek: kamu
Yaş: 42
İleti: 62
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: sakarya

Cevap: Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil, Değişt

İleti#158)  ohreyn » 23 Ekm 2014 07:02

Arkadaşlar, abilerim ve usta kardeşlerim öncelikle herkese hayırlı sabahlar.
Bir kaç yıl önce VBA konusuna hobi olarak öğrenmeye çalışıp kendi işlerimde kullanmak amacı ile ilgi duymuştum fakat iş yoğunluğum nedeniyle ara vermek zorunda kaldım. Bu aralar biraz zaman ayırabiliyorum çok şükür.
Başlarda başaramayacağımı düşündüm ama bu konunun ve viewtopic.php?f=78&t=4623&p=36274#p36274 konusunun başındaki örnekleri inceleyerek, bir kaç gün ve bu gece boyunca uğraşarak ekteki dosyayı hazırlayabildim. Eminim pek çoğunuz için basit bir dosyadır, hatta ben gereksiz uzun kodlarda kullanmış olabilirim.
Dosya eğer başarabildiysem geliştirilerek telefon rehberinden farklı amaçlar içinde kullanabileceğim kodlar içeriyor, tabii ki bu işin sınırının hayal gücü olduğunu düşünüyorum ama daha yolun çok başında olduğumun da farkındayım.

Şimdi bunca hikayeden sonra sizlerden istediğim benim çözüm bulamadığım bir kaç konu var:

1) Sayfa da bir kişi bile kayıtlı olsa combobox1'e giriş yapmadan ara'ya basınca problem olmuyor, fakat kimse kayıtlı değilse ara tuşuna basınca değiştir ve sil tuşları çıkıyor bunu nasıl engelleyebilirim?
2)Kayıtlı bir isimi tekrar kayıt yapabiliyoruz, engellemenin bir yolu var mıdır? Yoksa tasarımı değiştirmek mi gerekir?
3)Kayıt esnasında Soyad kısmı boş iken kaydı engelleyemedim. Diğer bölümler için boş kalması çok problem değil.
4)Textbox1'e (Ad) girilen kelimenin sadece ilk harfi Textbox2'ye girilen kelimenin ise bütün harflerinin büyük olmasını sağlayabilir miyim? (Bu benim şimdiye kadar kavrayabildiğim for-next gibi döngülerle olmuyor sanırım.)
5)Aynı isim farklı soyisim'le kayıtlı kişiler combobox'a yazıldığında süzme tarzı bir işlem yapılabilir mi? Örneğin Ahmet isimli 5 kişi var Ahmet yazıldığında sadece onların listelenmesi sağlanabilir mi? Yoksa bunun içinde tasarım değişikliği mi gerekir?
6)Textbox1 boş iken kayıt yapılmıyor ama boşluk tuşuna bir kez basılsa dahi bunu karakter olarak algıladığı için boş kayıt yapıyor, bunun bir çözümü var mıdır?
7)Kaydet ve kapat tuşuna sayfayı değil de komple excel'i kapattırma işlemi yaptırılabilir mi?
8)Bunların haricinde benim farkedemediğim hatalar varsa belirtirseniz sevinirim, sizin tavsiye edebileceğiniz değişiklikler için de aynı şey geçerli

Yanlış hatırlamıyorsam bu ilk mesajım, ilk mesaj için biraz uzun yazdığımın farkındayım önce mümkün mertebe örnekleri inceleyip anlamaya çalıştım.

Yardımlarınız için şimdiden teşekkürler.

Ayrıca örnek olarak kullandığım dosyaların sahipleri Tarkan VURAL ve Hüseyin GÜNBAY' beylere ayrıca teşekkür ederim.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
ohreyn
Yeni Başlamış
 
Adı Soyadı:Orhan ERDİM
Kayıt: 12 Şub 2014 20:32
Konum: bursa / karacabey
Meslek: Kimya Mühendisi
Yaş: 35
İleti: 18
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Bursa / Karacabey

Cevap: Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil, Değişt

İleti#159)  ohreyn » 23 Ekm 2014 10:55

Tekrar herkese merhabalar. Bir önceki mesajımda ki sorulara ilave olarak bir sorum daha olacak. Combobox' ta kayıtlı olmayan birisini arattığımızda Msgbox "kişi eklensin mi? " tarzında sorgulatarak kayıt işlemi ile devam edebilir miyiz acaba ben bunu da if döngüleri ile denedim ama malesef başaramadım. Kodların içerisinde de ' işareti ile ayırarak o şekil bıraktım sonunda.
Teşekkürler şimdiden.
[TESEKKÜR] [TESEKKÜR] [TESEKKÜR]
Kullanıcı avatarı
ohreyn
Yeni Başlamış
 
Adı Soyadı:Orhan ERDİM
Kayıt: 12 Şub 2014 20:32
Konum: bursa / karacabey
Meslek: Kimya Mühendisi
Yaş: 35
İleti: 18
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Bursa / Karacabey

Cevap: Örnek: UserForm - Hücreye Bilgi Gir, Bul, Sil, Değişt

İleti#160)  Enes Recep BAĞ » 23 Ekm 2014 21:14

Merhaba Orhan Bey, Karacabey'e selamlar,

Dosyanız uzun, burada kolay kolay dosyanıza zaman ayıracak kimse olmayabilir.
Sizin içinde uygunsa benim mail adresime ne yapmak istediğinizi adım adım anlatın müsait olduğumda size yardımcı olayım.
enesbag@excelvba.net
Kullanıcı avatarı
Enes Recep BAĞ
Forum Moderatörü
 
Adı Soyadı:Enes Recep BAĞ
Kayıt: 30 Ağu 2010 15:39
Konum: 0 549 808 82 66
Meslek: Bilgi işlem
Yaş: 37
İleti: 8263
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray / Merkez

ÖncekiSonraki

Forum UserForm

Online Kullanıcılar

Bu forumu görüntüleyenler: Kayıtlı kullanıcı yok ve 1 misafir

cron
Bumerang - Yazarkafe