Gelismiş Flitre Uygulamasında Değişken Kullanabilir miyiz?

[dEdE]

Merhaba Xl Dostları,
Aşağıdaki kodlarla süzme işlemi yapıyorum.
Bu kodlardaki süzme kriteri olan Range("F1:H2") yerine herhangibir hücre kullanmadan değişken kullanabilir miyiz?
Örneğin;Adı=Ahmet, SoyAdı=Zeki, Yaş=60 vb..gibi
Saygılar

Sub GelismisFlitre()
Sheets("Veri").Select
    Range("E1:g500").AdvancedFilter Action:=xlFilterCopy, [B]CriteriaRange:=Sheets("Liste").Range("F1:H2"[/B]), _
    CopyToRange:=Sheets("D_Liste").Range("A1:C1"), Unique:=False
End Sub

 

[Merhum İdris SERDAR]

.

Buradaki örneği inceleyin.

http://www.excel.web.tr/f122/geli-mi-suzme-t87071.html


.

 

[dEdE]

Sayın yurttas,

Yanıt için teşekkürler.
Belirttiğiniz dosyadaki kodlarda yer alan

CriteriaRange:= _
        Range("B7:O8")

ifadesindeki "B7:O8" aralığı yerine, (sayfadan bir hücreyi referans göstermeden) örneğin bir textbox veya inputbox aracılığı ile değişken kullanabilir miyiz diye sormuştum.
Saygılar.

 

[Merhum İdris SERDAR]

Sayın yurttas,

Yanıt için teşekkürler.
Belirttiğiniz dosyadaki kodlarda yer alan

CriteriaRange:= _
        Range("B7:O8")

ifadesindeki "B7:O8" aralığı yerine, (sayfadan bir hücreyi referans göstermeden) örneğin bir textbox veya inputbox aracılığı ile değişken kullanabilir miyiz diye sormuştum.
Saygılar.

.

Bir de buna bakın.

http://www.excel.web.tr/f133/metin-kutusu-textbox-ile-bazy-veri-turlerini-suzme-t16264.html

.

 

[dEdE]

Teşekkürler Sayın yurttas,
İşime yaradı, sorun çözüldü.