bir alt satıra geçtiğimde otomatik olarak c) diye yazmasını istiyorum

Katılım
9 Ağustos 2010
Mesajlar
2
Excel Vers. ve Dili
microsoft excel 2007 türkçe
Mesela a) yazdım alt satıra geçtiğimde otomatik olarak b) bi alt satıra geçtiğimde otomatik olarak c) diye yazmasını istiyorum bunu nasıl yaparım
İkinci sorum
26 TEM-1 AĞU diye yazdığımda alt satırlara aşağıdaki ibi devam etmesini istiyorum
2 AĞU-8 AĞU
9 AĞU-15 AĞU
diye otomatik yazmasını istiyorum bunu nasıl yaparım
 

Ekli dosyalar

Son düzenleme:

Ömer

Moderatör
Yönetici
Katılım
18 Ağustos 2007
Mesajlar
22,184
Excel Vers. ve Dili
Microsoft 365 Tr
Ofis 2016 Tr
Merhaba,

Bu yöndeki yapılması gerekenlerin bir standartı varmı yoksa sürekli değişken midir?

Küçük bir excel dosyası ekleyerek istediklerini detaylı açıklarsanız daha kısa ve net yanıtlar alırsınız..

.
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,737
Excel Vers. ve Dili
Excel 2019 Türkçe
Sayfanın kod kısmına ekleyin.
Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
    arr = Array("a)", "b)", "c)", "ç)", "d)", "e)", "f)", "g)", "ğ)", "h)", "ı)", "i)", "j)", "k)", "l)", "m)", "n)", "o)", "ö)", "p)", "r)", "s)", "ş)", "t)", "u)", "ü)", "v)", "y)", "z)")
    For i = 0 To 28
    If i = 28 Then Exit Sub
    If ActiveCell.Row = 1 Then Exit Sub
        If arr(i) = ActiveCell.Offset(-1, 0).Text Then
            ActiveCell = arr(i + 1)
            ActiveCell.Select
        End If
    Next
End Sub


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = 1 Then SendKeys "{F2}"
End Sub
 

Ekli dosyalar

uzmanamele

Uzman
Uzman
Katılım
26 Eylül 2007
Mesajlar
9,421
Excel Vers. ve Dili
excel 2010
merhaba

alternatif olsun;
formülü A1'e yazın ve sütun boyunca kopyalayın.
Kod:
=EĞER(B1<>"";DAMGA(SATIRSAY($A$1:A1)+96)&")";"")
 
Katılım
9 Ağustos 2010
Mesajlar
2
Excel Vers. ve Dili
microsoft excel 2007 türkçe
Kusura bakmayında ben microsoft excel 2007 türkçede kod ekleme kısmını bulamadım
 
Üst