2003 te sorunsuz çalışan makrom 2007 de çalışmıyor :(

[dilbaz]

Merhabalar excell 2003 te sorunsuz bir şekilde çalışan makromu office 2007 de kullanamaz oldum. makroyu aşağıda yolluyorum. acil yardımlarınızı bekliyorum.

Sub süzgeç()
Sheets("TOPLAM").Select
Range("A1:G6994").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range _
("A6996:G6997"), CopyToRange:=Range("A6999:G11192"), Unique:=False
Sheets("BÜTÇE").Select
Selection.AutoFilter Field:=2, Criteria1:="<>"
Selection.Sort Key1:=Range("B2"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub

 

[hamitcan]

2007 ile 2003 versiyonları arasında Vba kütüphanesinde bazı farklılıklar oluştu. Bu yüzden kodlarınız çalışmayabilir. Hatayı kod çalışırken görmek gerekir ve versiyona göre de düzenlemek gerekir.

 

[dilbaz]

nasıl yapabiliriz peki?

 

[hamitcan]

Dosyanızı ekleyin, daha çabuk cevap bulabilirsiniz.

 

[Merhum İdris SERDAR]

Merhabalar excell 2003 te sorunsuz bir şekilde çalışan makromu office 2007 de kullanamaz oldum. makroyu aşağıda yolluyorum. acil yardımlarınızı bekliyorum.

Sub süzgeç()
Sheets("TOPLAM").Select
Range("A1:G6994").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range _
("A6996:G6997"), CopyToRange:=Range("A6999:G11192"), Unique:=False
Sheets("BÜTÇE").Select
Selection.AutoFilter Field:=2, Criteria1:="<>"
Selection.Sort Key1:=Range("B2"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub

.

Excel 2007 bende yüklü olmadığı için tam olarak bilmiyorum. Excel 2007'de makro kaydet var mı?

Eğer varsa; Yukarıda makro kaydet ile elde edildiği anlaşılan kodları, Excel 2007'de de elde etmeniz mümkün.

.