Kopyala Yapıştır

[tolgaka16]

Merhabalar,

3 sütundan oluşan bir tablom var. Tablomun 1. sütununa ilk satırdan başlamak üzere belli tarihlerde veri girişi yapmaktayım. 2. ve 3. sütunları ise formül ile hesaplatıyorum.

Yazdığım bir makro ile bir butona basarak formül ile hesaplattığım 2. ve 3. sütunlardaki verileri kopyala yapıştır yöntemi ile sabitliyorum. Bu butonu en son doldurduğum satırı sabitlemek için nasıl kullanırım. Yani her seferde seçilmesi gereken range'in bir bir satır aşağıdaki range olması gerekiyor.

Yardımlarınız için şimdiden teşekkür ederim.

 

[mehmett]

Tablonuzun herhangi bir hücresi seçiliyken aşağıdaki makroyu çalıştırın.

[vb:1:c0c15ad1d8]Sub Makro1()
Selection.CurrentRegion.Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
ActiveCell.SpecialCells(xlLastCell).Select
End Sub[/vb:1:c0c15ad1d8]

 

[tolgaka16]

Yardımınız için gerçekten çok teşekkür ederim.
Sevgi ve saygılarımla,