+- 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ığı: Buttonla Satır Ekleme? (/konu-buttonla-satir-ekleme.html)
Buttonla Satır Ekleme? - Yunus Bozkurt - 14/03/2021
Gerçekleştir biye bir buttonum var buna tıkladığımda belir li hücrelerdeki değerleri hedef sütunların en sonundaki boş satıra eklemek istiyorum. mümkün müdür?
RE: Buttonla Satır Ekleme? - feraz - 14/03/2021
Sub aktar()
Dim son As Long
With ThisWorkbook.Sheets("Sayfa1")
son = .Range("A" & Rows.Count).End(3).Row + 1
.Range("A" & son).Value = .Range("G3").Value
.Range("B" & son).Value = .Range("G4").Value
.Range("C" & son).Value = .Range("G5").Value
End With
End SubRE: Buttonla Satır Ekleme? - feraz - 25/03/2021
Konuyu açan geri dönüş yapma zahmetine girmediği için konu cevaplanmışlara taşınmıştır.