[]
Makroyu Seçili Sütuna Uygulama
Merhaba
aşağıdaki kodda C1:C5 aralığıa değil o an aktif olarak taralı (seçili) olan aralık yada sütuna kodu uygulamak için nasıl bir uyarlama yapmam gerekiyor.
teşekkürler ve kolaylıklar
Sub Proper_Case()
For Each x In Range("C1:C5")
x.Value = Application.Proper(x.Value)
Next
End Sub
aşağıdaki kodda C1:C5 aralığıa değil o an aktif olarak taralı (seçili) olan aralık yada sütuna kodu uygulamak için nasıl bir uyarlama yapmam gerekiyor.
teşekkürler ve kolaylıklar
Sub Proper_Case()
For Each x In Range("C1:C5")
x.Value = Application.Proper(x.Value)
Next
End Sub
Range("C1:C5") yerine Selection yazman yeterli.
- cakabo (04.10.16 10:47:26)
1