Excell makro konusunda yardım

Başlatan reinasa74, Ara 03, 2020, 06:43 ÖS

« önceki - sonraki »

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

reinasa74

Merhabalar,

Bir konuda yardım rica ediyorum.
Hücreye tıkladığımda onun sağındaki hücreyi kopyalayıp, diğer sheet teki tablomda en alt satıra kopyalamasını istiyorum.

Yardımcı olurmusunuz?

Teşekkür ederim.

Bülent

Merhaba,

Her satıra buton ekleyip kod yazmak yerine, ilgili hücreye çift tıklayınca hücre değerini diğer sayfaya yazmak daha kullanışlı olur.
Bunun için sayfanın BeforeDoubleClick olayını aşağıdaki kodu yazıp deneyebilirsiniz:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column <> 2 Then Exit Sub
Cancel = True
son = Worksheets("Mont-2").Range("D65530").End(3).Row + 1
Worksheets("Mont-2").Range("D" & son).Value = Target.Value
MsgBox Target.Value & " Mont-2 sayfasının " & Range("D" & son).Address(0, 0) & " aktarıldı"
End Sub