En son girilen değeri 2. sayfaya yazdıran makro?

[mars2]

İyi günler;

Çalışma kitabımın 1. sayfasında, her gün göreve çıkan araçların plaka ve km yazmaktayım. Ancak, bu araçların çıkış km 2. sayfanın c sutununda otomatik olarak yazacak makro.

Dikkat: burada kopylaya bağ yapıştır ile mümkün bıulunmamaktadır. Çünkü aşağıda görüldüğü gibi hergün alt alta ayrı olarak yazılmaktadır.

Ã?rnek Sayfa1
Tarih Plaka No Çıkış Km
10.04.2005 1 255
10.04.2005 2 298
...

.
.
.
11.04.2005 1 275
11.04.2005 2 320
.
.
.
Sayfa2
Plaka No Çıkış Km
1 275
2 320
.

 

[bedersu]

Merhaba,

Anladığım kadarıyla 2.Sayfa C Sütununa 1,Sayfadaki çıkış kilometrelerinin hepsini yazar yazmaz taşımak istiyorsunuz.Bunun için makroya gerek yok bence.Sayfa2 C1 hücresine

=Sayfa1!C1 yazın.Hücrenin sağ alt kenarından tutun aşağıya doğru çekin.Sayfa1 ' ne yazarsanız aynısı Sayfa2 'de de olacaktır.

Yok ben illa makroyla yapacağım derseniz bir module oluşturun ve aşağıdaki kodları yazın.enter tuşuna basınca otomatik olarak bilgiler taşınacak:

Sub auto_open()
Application.OnKey "~", "kopyala"

End Sub

Sub kopyala()
aa = WorksheetFunction.CountA(Range("C:C"))

Sheets("Sayfa2").Cells(aa, 3) = Sheets("Sayfa1").Cells(aa, 3)
ActiveCell.Offset(1, 0).Select
End Sub
Sub auto_close()
Application.OnKey "~", "kopyala"

End Sub
Umarım doğru anlamışımdır.

 

[mars2]

Sayın bedersu;

sorunu tam olarak ya anlatamadım veya yanlış yorumluyorsunuz.
1- 1. sayfada hergün araçların plaka nosu ve çıkış km leri yazılmakta. hergün araçların göreve gidip gelmeleri halinde bir alt satıra yazılmakta ve günlük araç takibi yapılmakta2. 2. sayfada araç plakaları 1 sefer yazılmakta ve sabittir. aracın en son km'sini c sutununda hızasına yazdırma istiyorom.
örnek
1. sayfa
Sıra No Tarih Plaka No Çıkış Km
1 10.04.2005 1 255
.
.
.
.
.
.
25 11.04.2005 1 298

buna göre
2. sayfada
Sıra No Plaka No Çıkış Km
1 1 10.04.2005 tarihinde en çıkış km 255 olduğundan bu değer gelecek ve 11.04.2005 tarihinde ise aynı hücreye 298 değeri gelecek.
cevabınız için teşekkürler.

 

[Levent Menteşoğlu]

Tamamen formüllerle yapılmış ekteki örneği inceleyin.