Herkese iyi akşamlar. Bu konuyla alakalı bir haftadır uğraşıyorum ama çözedim. Sitede yaptığım aramalarda benzer sorularla karşılaştım ancak formüller çok karışık ağır geldi kendi dosyama uyarlıyamadım. Kısaca sorum bi sayfada aynı isimdeki farklı satırdaki verileri diğer bir sayfada toplamak ve bunu açılır bir menüyle kontrol edebilmek. Eğer fırsat bulurda yardımcı olabilirseniz çok sevinirim.
-
DİKKAT DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Seçilen isme göre veri alma
- Konbuyu başlatan abrekkaos
- Başlangıç tarihi
- Katılım
- 21 Ekim 2005
- Mesajlar
- 17,093
- Excel Vers. ve Dili
- Excel, 365 - İngilizce
.
Buradaki örnekleri inceleyin.
http://www.excel.web.tr/f122/formulle-suzme-uygulamalary-t86938.html
.
Buradaki örnekleri inceleyin.
http://www.excel.web.tr/f122/formulle-suzme-uygulamalary-t86938.html
.
inş. kendi dosyama uyarlıyabilirim.
- Katılım
- 1 Mart 2005
- Mesajlar
- 22,239
- Excel Vers. ve Dili
- Win7 Home Basic TR 64 Bit
Ofis-2010-TR 32 Bit
Dosyanız ektedir.
Kod:
Sub Açılan1_Değiştir()
Dim sh As Worksheet, i As Long, sat As Long
Set sh = Sheets("VT")
sat = sh.Cells(Rows.Count, "A").End(xlUp).Row
Sheets("ŞABLON").Select
Application.ScreenUpdating = False
Range("A2:G" & Rows.Count).Clear
sh.Range("A1").AutoFilter
sh.Range("A1").AutoFilter field:=2, Criteria1:=Range("N1").Value
sh.Range("A1").CurrentRegion.Offset(1, 0).Copy Range("A2")
sh.Range("A1").AutoFilter
Application.ScreenUpdating = True
End Sub