Duzenlemek

[cilter]

Arkadaşlar,
Ben bu makro hazırlama konusuna çok yabancıyım.
Yani aşşağıda örnek makroda Örnset alan1-set alan2-S1.range v.s) bu kodları nasıl öğrenebilirim.
Lütfen cevaplayın

Sub Aktar01()
On Error Resume Next
Application.ScreenUpdating = False

Set S1 = Sheets(1)

Set alan1 = S1.Range("A1:B100")
Set alan2 = S1.Range("R1:R2")
Set alan3 = S1.Range("S1:T100")

alan3.ClearContents

alan1.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=alan2, CopyToRange:=alan3, Unique:=True
'*****************************************
Set alan1 = S1.Range("A1:B100")
Set alan2 = S1.Range("V1:V2")
Set alan3 = S1.Range("W1:X100")

alan3.ClearContents

alan1.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=alan2, CopyToRange:=alan3, Unique:=True

Application.ScreenUpdating = True

End Sub

 

[cilter]

Yardım edecek kimse yokmu.
Makro konusunda nasıl ve nereden sıfırdan başlayabilirim.
Hangi kaynaklardan veya hangi kitabı almalıyım.
Şimdiden yardımlarınız için teşekkür ederim.

 

[Levent Menteşoğlu]

Aşağıdaki linkleri inceleyerek başlayabilirsiniz.

http://www.excel.web.tr/showthread.php?t=22532

http://www.excel.web.tr/showthread.php?t=4228

http://www.excel.web.tr/showthread.php?t=9985

 

[cilter]

Çok teşekkür ederim. Bunları bir takip edeyim.

 

[cilter]

Hocam,

sizin verdiğiniz yerlerde biraz çalıştım ve çok hoşuma giit. Çok teşekkür ederim. Allah razı olsun. Tam olarak tamamlayamadım ama şimdiden bir şeyler öğrenmeye başladım valla.
Burada size tekrar soru sorabilirmiyim acaba.

 

[cilter]

Hocam bugünde çalışıyorum.
Biraz ilerlettim galiba.
Bir örnek soru gönderebilirmisiniz. yapayım
kusura bakmayın fazla olmuyorum değilmi.

 

[cilter]

Başka sayfada makro

Hocam,

Bu makroyu hani örnek göndermiştiniz ya. başka sayfada çalıştırmak istersek nasıl yapabiliriz. (aynı sayfada başardım)

 

[cilter]

BAşka sayfa

Hocam,
excel 1 sayfada hazırladığımız bir talboda 2 sayfada ona bağlı olarak nasıl makro çalıştırabilirim.
Yani filtre ekranını diğer sayfada nasıl çalıştırabilirim.