Yapılan tabloda son satır doldukça otomatik yeni satır ekleme

zubizu21

Altın Üye
Katılım
26 Ekim 2016
Mesajlar
25
Excel Vers. ve Dili
2013 excel,
LibreOffice
Altın Üyelik Bitiş Tarihi
09-02-2025
Merhabalar. Aramaları yaptım daha önce böyle birşey bulmuştjm ama tekrar ulaşamadım aynı yazıya.

Tablo gibi birşey oluşturdum. Ama sürekli elle giriş yapiyorum. Üye geldikçe ekleme yapiyorum. Şimdi bunu tablo gibi yaparak bir tane hücreye açılır liste yapcam. Liste yapmakta sıkıntı yok yaparım onu ama istediğim şey şu son satır dolduğunda yada son satıra yazı yazdığımda bir altında aynı şablonda yeni satır açılacak.

Yardımcı olursanız sevinirim.
 

1Al2Ver

Altın Üye
Katılım
5 Kasım 2007
Mesajlar
4,712
Excel Vers. ve Dili
64 Bit TR - Microsoft Office 365 - Win11 Home
Altın Üyelik Bitiş Tarihi
04-01-2026

dellerlim

Altın Üye
Altın Üye
Katılım
25 Şubat 2012
Mesajlar
323
Excel Vers. ve Dili
office 2016 türkçe
Altın Üyelik Bitiş Tarihi
15.03.2027
Bu kodlar A1:D1 aralığının biçimlendirmesini; A sütunundaki dolu hücrelerin bulunduğu satırda A ve D sütunları arasındaki hücrelere uygular. Butona veya sayfanın kod bölümüne yapıştırıp kullanabilirsiniz.

Kod:
Sub zubizu21()
For i = 2 To 50
If Cells(i, 1) <> "" Then
    Range("A1:D1").Select
    Selection.Copy
    Range(Cells(i, 1), Cells(i, 4)).Select
    Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False
    Application.CutCopyMode = False

End If
Next i
End Sub
 

dellerlim

Altın Üye
Altın Üye
Katılım
25 Şubat 2012
Mesajlar
323
Excel Vers. ve Dili
office 2016 türkçe
Altın Üyelik Bitiş Tarihi
15.03.2027
Koşullu Biçimlendirme'de kullanılabilir ve daha pratik olur bence.
 

zubizu21

Altın Üye
Katılım
26 Ekim 2016
Mesajlar
25
Excel Vers. ve Dili
2013 excel,
LibreOffice
Altın Üyelik Bitiş Tarihi
09-02-2025
Yapamadım. Veri doğrulamada olmadı. Kod zaten kamu kuruluşu olduğu için makrolara izin vermiyor zaten.

Libre office olduğu için koşullu biçimlendirme ayarlıyamadım. Excelde olsa yapabiliyorum
 

zubizu21

Altın Üye
Katılım
26 Ekim 2016
Mesajlar
25
Excel Vers. ve Dili
2013 excel,
LibreOffice
Altın Üyelik Bitiş Tarihi
09-02-2025
Tamamdır yaptım teşekkür ederim alakanıza.
 
Üst