Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Etiket Adını Kalıcı Olarak Butonla İle Değiştirme

sertac76
sertac76
Access Cevaplanmış Soruları
12
1982

Etiket Adını Kalıcı Olarak Butonla İle Değiştirme

#7
sertac76
Destek Ekibi
sertac76
Bul
Destek
Adı Soyadı: Se.... Ak....
Konum: Ardahan
Ofis Versiyonu: Ofis XP
Son Oturumu: 09/01/2024,13:23
Yorumları: 138
Konuları: 31
Kayıt Tarihi: 03/11/2008
Teşekkür Puanı: 4
Public Sub MasaRenk()
[Form_Frm_Masa].Btn_Masa1.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=1"), "5753088")
[Form_Frm_Masa].Btn_Masa2.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=2"), "5753088")
[Form_Frm_Masa].Btn_Masa3.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=3"), "5753088")
[Form_Frm_Masa].Btn_Masa4.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=4"), "5753088")
[Form_Frm_Masa].Btn_Masa5.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=5"), "5753088")
[Form_Frm_Masa].Btn_Masa6.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=6"), "5753088")
[Form_Frm_Masa].Btn_Masa7.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=7"), "5753088")
[Form_Frm_Masa].Btn_Masa8.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=8"), "5753088")
[Form_Frm_Masa].Btn_Masa9.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=9"), "5753088")
[Form_Frm_Masa].Btn_Masa10.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=10"), "5753088")
[Form_Frm_Masa].Btn_Masa11.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=11"), "5753088")
[Form_Frm_Masa].Btn_Masa12.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=12"), "5753088")
[Form_Frm_Masa].Btn_Masa13.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=13"), "5753088")
[Form_Frm_Masa].Btn_Masa14.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=14"), "5753088")
[Form_Frm_Masa].Btn_Masa15.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=15"), "5753088")
[Form_Frm_Masa].Btn_Masa16.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=16"), "5753088")
[Form_Frm_Masa].Btn_Masa17.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=17"), "5753088")
[Form_Frm_Masa].Btn_Masa18.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=18"), "5753088")
[Form_Frm_Masa].Btn_Masa19.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=19"), "5753088")
[Form_Frm_Masa].Btn_Masa20.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=20"), "5753088")
[Form_Frm_Masa].Btn_Masa21.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=21"), "5753088")
[Form_Frm_Masa].Btn_Masa22.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=22"), "5753088")
[Form_Frm_Masa].Btn_Masa23.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=23"), "5753088")
[Form_Frm_Masa].Btn_Masa24.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=24"), "5753088")
[Form_Frm_Masa].Btn_Masa25.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=25"), "5753088")
[Form_Frm_Masa].Btn_Masa26.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=26"), "5753088")
[Form_Frm_Masa].Btn_Masa27.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=27"), "5753088")
[Form_Frm_Masa].Btn_Masa28.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=28"), "5753088")
[Form_Frm_Masa].Btn_Masa29.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=29"), "5753088")
[Form_Frm_Masa].Btn_Masa30.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=30"), "5753088")
[Form_Frm_Masa].Btn_Masa31.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=31"), "5753088")
[Form_Frm_Masa].Btn_Masa32.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=32"), "5753088")
[Form_Frm_Masa].Btn_Masa33.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=33"), "5753088")
[Form_Frm_Masa].Btn_Masa34.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=34"), "5753088")
[Form_Frm_Masa].Btn_Masa35.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=35"), "5753088")
[Form_Frm_Masa].Btn_Masa36.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=36"), "5753088")
[Form_Frm_Masa].Btn_Masa37.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=37"), "5753088")
[Form_Frm_Masa].Btn_Masa38.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=38"), "5753088")
[Form_Frm_Masa].Btn_Masa39.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=39"), "5753088")
[Form_Frm_Masa].Btn_Masa40.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=40"), "5753088")
[Form_Frm_Masa].Btn_Masa41.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=41"), "5753088")
[Form_Frm_Masa].Btn_Masa42.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=42"), "5753088")
[Form_Frm_Masa].Btn_Masa43.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=43"), "5753088")
[Form_Frm_Masa].Btn_Masa44.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=44"), "5753088")
[Form_Frm_Masa].Btn_Masa45.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=45"), "5753088")
[Form_Frm_Masa].Btn_Masa46.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=46"), "5753088")
[Form_Frm_Masa].Btn_Masa47.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=47"), "5753088")
[Form_Frm_Masa].Btn_Masa48.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=48"), "5753088")
[Form_Frm_Masa].Btn_Masa49.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=49"), "5753088")
[Form_Frm_Masa].Btn_Masa50.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=50"), "5753088")
[Form_Frm_Masa].Btn_Masa51.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=51"), "5753088")
[Form_Frm_Masa].Btn_Masa52.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=52"), "5753088")
[Form_Frm_Masa].Btn_Masa53.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=53"), "5753088")
[Form_Frm_Masa].Btn_Masa54.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=54"), "5753088")
[Form_Frm_Masa].Btn_Masa55.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=55"), "5753088")
[Form_Frm_Masa].Btn_Masa56.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=56"), "5753088")
[Form_Frm_Masa].Btn_Masa57.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=57"), "5753088")
[Form_Frm_Masa].Btn_Masa58.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=58"), "5753088")
[Form_Frm_Masa].Btn_Masa59.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=59"), "5753088")
[Form_Frm_Masa].Btn_Masa60.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=60"), "5753088")
[Form_Frm_Masa].Btn_Masa61.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=61"), "5753088")
[Form_Frm_Masa].Btn_Masa62.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=62"), "5753088")
[Form_Frm_Masa].Btn_Masa63.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=63"), "5753088")
[Form_Frm_Masa].Btn_Masa64.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=64"), "5753088")
[Form_Frm_Masa].Btn_Masa65.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=65"), "5753088")
[Form_Frm_Masa].Btn_Masa66.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=66"), "5753088")
[Form_Frm_Masa].Btn_Masa67.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=67"), "5753088")
[Form_Frm_Masa].Btn_Masa68.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=68"), "5753088")
[Form_Frm_Masa].Btn_Masa69.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=69"), "5753088")
[Form_Frm_Masa].Btn_Masa70.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=70"), "5753088")
[Form_Frm_Masa].Btn_Masa71.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=71"), "5753088")
[Form_Frm_Masa].Btn_Masa72.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=72"), "5753088")
[Form_Frm_Masa].Btn_Masa73.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=73"), "5753088")
[Form_Frm_Masa].Btn_Masa74.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=74"), "5753088")
[Form_Frm_Masa].Btn_Masa75.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=75"), "5753088")
[Form_Frm_Masa].Btn_Masa76.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=76"), "5753088")
[Form_Frm_Masa].Btn_Masa77.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=77"), "5753088")
[Form_Frm_Masa].Btn_Masa78.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=78"), "5753088")
[Form_Frm_Masa].Btn_Masa79.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=79"), "5753088")
[Form_Frm_Masa].Btn_Masa80.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=80"), "5753088")
[Form_Frm_Masa].Btn_Masa81.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=81"), "5753088")
[Form_Frm_Masa].Btn_Masa82.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=82"), "5753088")
[Form_Frm_Masa].Btn_Masa83.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=83"), "5753088")
[Form_Frm_Masa].Btn_Masa84.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=84"), "5753088")
[Form_Frm_Masa].Btn_Masa85.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=85"), "5753088")
[Form_Frm_Masa].Btn_Masa86.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=86"), "5753088")
[Form_Frm_Masa].Btn_Masa87.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=87"), "5753088")
[Form_Frm_Masa].Btn_Masa88.BackColor = Nz(DLookup("ArkaRenk", "Srg_Masa", "Urn_Hrk_Ust_MasaId=88"), "5753088")

End Sub
Cevapla
#8
ozanakkaya
sledgeab
ozanakkaya
Bul
Kurucu
Adı Soyadı: Oz.... Ak....
Konum: Denizli
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: Dün,12:50
Yorumları: 13.536
Konuları: 499
Kayıt Tarihi: 29/01/2008
Teşekkür Puanı: 3.139
Mesleğiniz: Memur
Merhaba, eklediğiniz kodun etiket adını kalıcı olarak değiştirme ile alakasını anlamadım.

Daha önce belirttiğim gibi, tablo kullanmadan bu işlemi yapamazsınız. Değişken kullansanız bile uygulamayı açıp kapatınca etiket adı eski haline döner. Tablo kullanacaksanız belirtin ona göre kod yardımında bulunalım.
Cevapla
#9
Allback
Uzman
Allback
Bul
Uzman
Adı Soyadı: Er.... Er....
Yaşı: 40
Konum: Kocaeli
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: 03/04/2023,10:49
Yorumları: 316
Konuları: 39
Kayıt Tarihi: 16/11/2011
Teşekkür Puanı: 27
Mesleğiniz: Yönetici
(13/09/2018, 09:46)ozanakkaya yazdı: Merhaba, eklediğiniz kodun etiket adını kalıcı olarak değiştirme ile alakasını anlamadım.

Daha önce belirttiğim gibi, tablo kullanmadan bu işlemi yapamazsınız. Değişken kullansanız bile uygulamayı açıp kapatınca etiket adı eski haline döner. Tablo kullanacaksanız belirtin ona göre kod yardımında bulunalım.

Tablo ile yapılabilecek şekilde örnek paylaşmıştım ama o şekilde istemediğini belirtti...
Cevapla
#10
sertac76
Destek Ekibi
sertac76
Bul
Destek
Adı Soyadı: Se.... Ak....
Konum: Ardahan
Ofis Versiyonu: Ofis XP
Son Oturumu: 09/01/2024,13:23
Yorumları: 138
Konuları: 31
Kayıt Tarihi: 03/11/2008
Teşekkür Puanı: 4
Sanırım ben tam ifade edemedim. Tablo bir kereye mahsus bilgiler yazılıcak sonrasında tablo kullanılmayacak. Taki etiket adını ne zaman değiştirene kadar.
Cevapla
#11
ozguryasin
Uzman
ozguryasin
www Bul
Uzman
Adı Soyadı: Öz.... Ya....
Yaşı: 41
Konum: Bursa
Ofis Versiyonu: Ofis 2016 32 Bit
Son Oturumu: 14/03/2024,00:41
Yorumları: 1.176
Konuları: 43
Kayıt Tarihi: 23/09/2009
Teşekkür Puanı: 616
Mesleğiniz: Yazılım
dediğinize göre o verinin bir yerde tutulması gerekiyor. çünkü ne zaman değiştireceğiniz belli olmayacak. tablo istemiyorsanız şunu yapabilirsiniz, değiştireceğiniz zaman tasarım bölümünden etiket adını değiştirirsiniz.
POWER 'un Çekirgesi :=)
ozguryasin, 23-09-2009 tarihinden beri AccessTr.neT AİLESİ üyesidir.
Access'i Profesyonel Şekilde Öğrenmek İçin https://www.accesstr.net Ailesi Yeter. alkis


Site Kurallarını sorularınızın hızlı cevaplanması için kesinlikle okuyunuz.
Cevapla
#12
ozanakkaya
sledgeab
ozanakkaya
Bul
Kurucu
Adı Soyadı: Oz.... Ak....
Konum: Denizli
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: Dün,12:50
Yorumları: 13.536
Konuları: 499
Kayıt Tarihi: 29/01/2008
Teşekkür Puanı: 3.139
Mesleğiniz: Memur
Örneğinizin düzenlenmiş hali ektedir. Etiket adını kaydetme olayında yapılabilecek işlem budur.

Formdaki etikete çift tıkladığınızda etiket adını değiştirebilirsiniz. 

Önceki mesaja eklediğiniz MasaRenk kodu fonksiyon ile düzenlenebilir ancak örneğinizi yenilemeniz gerekiyor.
.rar etiket adı_sld.rar (Dosya Boyutu: 25,73 KB | İndirme Sayısı: 1)
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task