En son veriyi tek bir hücrede görmek

[azure26]

Arkadaşlar merhaba diyelimki A1, B2, D5, A3, D7 gibi farklı hücrelere veri girişi oluyor, bunların hepsinden en son hangisine giriş olmuşsa bu girişi hücrede ne yazıyorsa örneğin f15 de nasıl görebilirim. Yardımcı olurmusunuz

 

[Korhan Ayhan]

Aşağıdaki kodu bu işlemi yapacağınız sayfanızın kod bölümüne uygulayıp deneyiniz.

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
    On Error Resume Next
    Application.EnableEvents = False
    Range("F15") = Target
    Application.EnableEvents = True
End Sub

 

[Ömer]

Merhaba,

Çalışma sayfasının kod bölümüne kopyalayın.

Private Sub Worksheet_Change(ByVal Target As Range)
    
    If Intersect(Target, [A1,B2,D5,A3,D7]) Is Nothing Then Exit Sub
    
    [F15] = Target.Value
    
End Sub

 

[azure26]

Bunu excelde makro kullanmadan yapabileceğim bir formül varmı. Yani şöyle bir açıklama yapayım, başka sayfalardanda aynı şekilde veri almak istiyorum aynı hücreye daha sonra hücreye isim verip bunu makroda combobox ta göstermek istiyorum. Tek bir comboboxta değişken veri almak hedefim

 

[Ömer]

Son girilen değer olarak, satıra yada sütuna son girilen değeri formülle bulabilirsiniz fakat işlem sıralaması olarak son girilen veriyi makro ile bulabilirsiniz.