otomatik A dan Z yapma

[dr_1356]

merhaba excel sayfasında bir tarih yazınca a4 sutunundan aşagısını sutunu kaydete basınca otomaatik olarak AdanZ yapabilirmi örnek ektedir

 

[İhsan Tank]

merhaba excel sayfasında bir tarih yazınca a4 sutunundan aşagısını sutunu kaydete basınca otomaatik olarak AdanZ yapabilirmi örnek ektedir

merhaba
Kitabınızın Kod bölümünde bulunan Thisworkbokk bölümüne

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Range("A5:E65536").Sort key1:=Range("A5"), ORDER1:=xlAscending
MsgBox "Tarih Sıralaması Yapıldı", vbInformation
End Sub

bu kodu yapıştırın.
eki inceleyiniz

 

[dr_1356]

ihsan bey çok teşekür ederim tam istedigim gibi olmuş fakat kaydete basınca tarih sıralaması yapıldı butonunu kaldırasanız çok iyi olur birde bunu nasıl yaptınız vaktiniz varsa tarif edebilirmisiniz ben kod bölümünüde thisworkbook uda bılamadım bana zaman ayırdıgınız için teşekürlerrrrrrrrrrrrr

 

[İhsan Tank]

ihsan bey çok teşekür ederim tam istedigim gibi olmuş fakat kaydete basınca tarih sıralaması yapıldı butonunu kaldırasanız çok iyi olur birde bunu nasıl yaptınız vaktiniz varsa tarif edebilirmisiniz ben kod bölümünüde thisworkbook uda bılamadım bana zaman ayırdıgınız için teşekürlerrrrrrrrrrrrr

merhaba

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Range("A5:E65536").Sort key1:=Range("A5"), ORDER1:=xlAscending
End Sub

bu kod'u
alt+F11 tuş kombinasyonunu kullanarak kitabın kod bölümüne geçersiniz. ve sol tarafta bulunan yerde thisworkbook bölümü var oraya bakarsanız

 

[dr_1356]

tamam yaptım tam istedigim gibi oldu çok çok teşekür ederim sagolasın.......

 

[İhsan Tank]

tamam yaptım tam istedigim gibi oldu çok çok teşekür ederim sagolasın.......

rica ederim
:yazici: