• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Harf Dönüştürme Makro

leonadies

Excel Derya Deniz Bizde Kulaç Atmaya Çalışıyoruz:)
Altın Üye
Katılım
12 Şubat 2015
Mesajlar
520
Excel Vers. ve Dili
Office 2016 TR 64 Bit Windows
Üstadlar merhaba;

R sütununa manuel olarak yazılacak yazıların İlk Harfleri Büyük Olacak Şekilde olmasını istiyorum. Nasıl yapabilirim ?
 
Merhaba,

Aşağıdaki kodları ilgili sayfanın kod bölümüne kopyalayıp deneyiniz.

Not : Birinci satırın başlık olduğunu varsayarak birinci satırda çalışmaz.

Kod:
Private Sub Worksheet_Change(ByVal Target As Range)

    If Intersect(Target, [R:R]) Is Nothing Or Target.Row < 2 Then Exit Sub
    If Not Target.Value = "" Then
        Application.EnableEvents = False
        Target.Value = Application.WorksheetFunction.Proper(Target.Value)
        Application.EnableEvents = True
    End If
    
End Sub
 
Çalışmadı üstad
 
Sayfanın kod bölümüne yapıştırın kaydederken
Makro İçerebilen Excel Çalışma Kitabı olarak kaydedin

Private Sub Worksheet_Change(ByVal Target As Range)

If Intersect(Target, [R:R]) Is Nothing Or Target.Row < 1 Then Exit Sub
If Not Target.Value = "" Then
Application.EnableEvents = False
Target.Value = Application.WorksheetFunction.Proper(Target.Value)
Application.EnableEvents = True
End If

End Sub
 
Makro çalışma sayfası olarak kayıtlı zaten.
Insert > Clas Module Diyip

Kodları yapıştırdım ama olmadı. Nerde hata yapıyorum anlamadım. R2 Hücresinden itibaren o sütunun tamamında istiyorum.
 
.

Excel sayfasındayken ALT F11' ye birlikte basın. Modüle eklemeden, ilgili sayfayı bulup, tılkayın ve açılan yere kodları yapıştırın.

.
 
En kısa sürede hangi kod bloğunu nereye uygulamanız gerektiğini öğrenmenizde fayda var.

Kodlar modüle uygulanabilir. (Genellikle "SUB" ile başlarlar.)
Kodlar sayfanın kod bölümüne uygulanabilir. (Sayfalarda yapılan işlemlerde kullanılır. Genellikle "Private Sub Worksheet" ile başlarlar.)
Kodlar kitabın geneline uygulanabilir. (ThisWorkbook ya da BuÇalışmaKitabı bölümüne uygulanırlar. Genellikle "Private Sub Workbook" ile başlarlar.)
Kodlar Userformun kod bölümüne uygulanabilir.

Bu verdiklerim temel olanlardır. Duruma göre değişik (GELİŞMİŞ) uygulamalar olabilir.

Size önerilen kod sayfa olaylarında kullanılır. Yani sayfa adı üzerinde sağ klik yaptıktan sonra açılan menüden KOD GÖRÜNTÜLE seçeneğini seçtiğinizde karşınıza gelen sağ taraftaki beyaz alana uygulanır. Daha sonra excel sayfasını açıp sayfada değişiklik yaptığınızda kod çalışmaya başlar.
 
Geri
Üst