Açılan liste

Katılım
15 Eylül 2007
Mesajlar
1,312
Excel Vers. ve Dili
2013 türkçe
Altın Üyelik Bitiş Tarihi
18.06.2019
Yapmak gereken işlem ney ikinci bir ad mı yanımlayacağız YANİ BAŞKA BİR ÇALIŞMADA UYGULAMAK İÇİN YAPILACAK İŞLEMLERİ TARİF EDEBİLİRMİSİNİZ
 

Ömer

Moderatör
Yönetici
Katılım
18 Ağustos 2007
Mesajlar
22,184
Excel Vers. ve Dili
Microsoft 365 Tr
Ofis 2016 Tr
Bunu daha öncede açıklamıştım. Detaylı incelerseniz rahatlıkla görebilirsiniz.

Sayfalardaki T sütunundaki dolaylı fonksiyonu içinde bulunan sayfa adını verileri aldığınız sayfa adı neyse o şekilde düzenlemelisiniz. Diğer bir konu Ad tanımlamadaki YURTLAR formülü için her sayfa için yeniden bir ad tanımlayarak düzenlemeniz gerekir, dosyadaki YURTLAR1 gibi. Buna göre doğrulamadaki =YURTLAR diğer sayfada =YURTLAR1 olacaktır. Dosyada uygulanan formüller sadece bunlardır. Bu detayları inceleyiniz..

.
 
Katılım
15 Eylül 2007
Mesajlar
1,312
Excel Vers. ve Dili
2013 türkçe
Altın Üyelik Bitiş Tarihi
18.06.2019
ömer bey çok teşekkür ederim
 
Katılım
15 Eylül 2007
Mesajlar
1,312
Excel Vers. ve Dili
2013 türkçe
Altın Üyelik Bitiş Tarihi
18.06.2019
bütün excel hoacalrına iyi akşamlar ; 41 ci mesajdaki ekdeki dosyada satış sayfasında satılan ürün adı sütununda ürün diye veri doğrulama var ad tanımlamadan düzenliyorum ancak listedin dışını durdurmuyor
 

Ömer

Moderatör
Yönetici
Katılım
18 Ağustos 2007
Mesajlar
22,184
Excel Vers. ve Dili
Microsoft 365 Tr
Ofis 2016 Tr
Eklediğiniz tabloda ürün adıyla tanımlanan aralık başvuru hatası veriyor. Hatanın birkaç nedeni olabilir, başvurulan satırları sildiğinizden yada başvurulan sayfayı sildiğinizden tanımlamadaki aralık bozulabilr. Tanımladaki aralığı düzeltirseniz sorun hallolur.

.
 
Katılım
21 Mart 2006
Mesajlar
234
Excel Vers. ve Dili
Excel 2003 - İngilizce
S.Evren Gizlen'in 4.mesajdaki dosyasını inceledim ama nasıl yaptığını çözemedim. Çözümün açıklamasını yapabilirmisiniz. Örneğin doğrulamadaki liste kutusuna =grup denilmiş, grup isimleri buraya nasıl geliyor ve isimler içinde aynı sorum.
 
Katılım
21 Mart 2006
Mesajlar
234
Excel Vers. ve Dili
Excel 2003 - İngilizce
Evet şimdi anladım ad tanımlamalarıyla yapılmış. Tabi ordaki tanımalar içerisindeki formülleri henüz çözemedim :)
 
Katılım
15 Eylül 2007
Mesajlar
1,312
Excel Vers. ve Dili
2013 türkçe
Altın Üyelik Bitiş Tarihi
18.06.2019
ÜRÜN tanımlamayı payıyorum listey ürünler geliyor ancak liste dışını engellemiyor
 

Ekli dosyalar

Katılım
15 Eylül 2007
Mesajlar
1,312
Excel Vers. ve Dili
2013 türkçe
Altın Üyelik Bitiş Tarihi
18.06.2019
50. mesajdaki ekdeki dosyada ürünler diye bir makro var bu makro alış sayfasından alınan sayfasına veri aktarıyor "alınan" sayfasına bir koruma koymak istiyorum örnek koruma şifresi 123 olsun bu karumayı kaldırıp makro işlemini yapsa sonra tekrar aynı korumayı koysa
 
Katılım
15 Eylül 2007
Mesajlar
1,312
Excel Vers. ve Dili
2013 türkçe
Altın Üyelik Bitiş Tarihi
18.06.2019
selam iiy çalışmalar yani bu kod
Sub ÜRÜNLER()
'
If MsgBox(" E M İ N M İ S İ N İ Z", vbYesNo) = vbNo Then Exit Sub
'
Dim hcr As Range, sat As Long
Sheets("ALIŞ").Select
sat = 5
Application.ScreenUpdating = False
Sheets("ALINAN").Range("C5:C65536").ClearContents
For Each hcr In Range("E5:E" & Cells(65536, "E").End(xlUp).Row)
If WorksheetFunction.CountIf(Range("E5:E" & hcr.Row), hcr.Value) = 1 Then
Sheets("ALINAN").Cells(sat, "C").Value = hcr.Value
sat = sat + 1
End If
Sheets("ALINAN").Select
Range("C5:C104").Select
Selection.Sort Key1:=Range("C5"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Range("C5").Select
Sheets("ALIŞ").Select
Next
Application.ScreenUpdating = True
MsgBox "İşlem Tamam"
End Sub

şifreyi kaldırsın çalışsın ve tekrar şifreyi koysun şifrede123 olabilir
 

Ömer

Moderatör
Yönetici
Katılım
18 Ağustos 2007
Mesajlar
22,184
Excel Vers. ve Dili
Microsoft 365 Tr
Ofis 2016 Tr
Sayın mustafakoza,

Bu kodların açılır listeyle ne ilgisi var. Farklı konularla ilgili sorularınızı yeni konu başlığı açarak sorunuz.

Kod:
Sub ÜRÜNLER()
ActiveSheet.Unprotect Password:=123
[COLOR=red]kodlar[/COLOR]
ActiveSheet.Protect Password:=123
End Sub
.
 
Katılım
15 Eylül 2007
Mesajlar
1,312
Excel Vers. ve Dili
2013 türkçe
Altın Üyelik Bitiş Tarihi
18.06.2019
ömer bey ilginiz için teşekkür ederim acak denedim olmuyor tam son şekli ile kodu yazıverebilirmisinizALIŞ SAYFASINA KORUMA KOYMAYACAK ALINAN SAYFASINA KORUMA KOYACAK
 
Son düzenleme:
Üst