AccessTr.neT
Excelde Vba İle Yeni Kayıt Eklerken Satır Çizgi Renk Vs Satır Özellikleriyle Eklemek - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Excelde Vba İle Yeni Kayıt Eklerken Satır Çizgi Renk Vs Satır Özellikleriyle Eklemek (/konu-excelde-vba-ile-yeni-kayit-eklerken-satir-cizgi-renk-vs-satir-ozellikleriyle-eklemek.html)

Sayfalar: 1 2

Excelde Vba İle Yeni Kayıt Eklerken Satır Çizgi Renk Vs Satır Özellikleriyle Eklemek - accessman - 14/01/2020

sorudan da anlaşıldığı üzere userformdan kayıt ekledik ama sadece hücrelere data yazmış oluyoruz
arka renkler çizgiler vs olmuyor son satırın özellikleri ile yeni satır oluşturulup yeni kayıt o satıra yazılsa olur mu
mesela mouse ile ortalardan bir yerden sayfaya satır eklense diğer hücrelerin özellikleri ile satır ekleniyor bunu Vba kodları ile nasıl yapabiliriz

Excelde Vba İle Yeni Kayıt Eklerken Satır Çizgi Renk Vs Satır Özellikleriyle Eklemek - berduş - 14/01/2020

aşağıdaki kod işinize yarayabilir
Range("sonsatır").Offset(1).EntireRow.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromRightOrAbove

Range("sonsatır").EntireRow.Copy

Range("sonsatır").Offset(1).EntireRow.PasteSpecial xlPasteFormats

Application.CutCopyMode = False


Cvp: Excelde Vba İle Yeni Kayıt Eklerken Satır Çizgi Renk - accessman - 14/01/2020

LastRow = .Cells(Rows.Count, "A").End(xlUp).Row
bunu son satır yerine nasıl yazarız

Excelde Vba İle Yeni Kayıt Eklerken Satır Çizgi Renk Vs Satır Özellikleriyle Eklemek - berduş - 14/01/2020 

lastrow = Cells(Rows.Count, "A").End(xlUp).Row

Rows(lastrow).Offset(1).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromRightOrAbove

Rows(lastrow).EntireRow.Copy

Rows(lastrow).Offset(1).PasteSpecial xlPasteFormats

Application.CutCopyMode = False
Not: Konu başlıklarını çok uzun tutmayın sınır 85 olmasına rağmen her mesajın başına "cvp:" gibi bir ön ek eklediğinden "sınırı aştı" uyarısı veriyor. yani başlık 80den uzun olmasın.

Cvp: Excelde Vba İle Yeni Kayıt Eklerken Satır Çizgi Renk Vs Satır Özellikleriyle - accessman - 14/01/2020

teşekkürler çok işime yarayacak

Cvp: Excelde Vba Kayıt Eklerken Satır Çizgi Renk Vs Satır Özellikleriyle Eklemek - accessman - 14/01/2020

eğer sayfada belirtecek olsaydık nasıl yazmamız gerekirdi