bu makroda küçük bir değişiklik

[jambow]

Sub f()
    SON_SATIR = [isimler!D65536].End(3).Row + 1
    If SON_SATIR < 4 Then SON_SATIR = 4
    Sheets("isimler").Cells(SON_SATIR, "D") = [[COLOR="Red"]g3[/COLOR]]
    Sheets("isimler").Cells(SON_SATIR, "E") = [[COLOR="red"]F1[/COLOR]]
    Sheets("isimler").Cells(SON_SATIR, "F") = [[COLOR="red"]G1[/COLOR]]
    
   

    MsgBox "VERESİYE olarak kaydettim. " & vbNewLine & _
    "ok  ", vbInformation, "B i l g i "
    ActiveWorkbook.Save
End Sub

arkadaşlar burada sadce 3 hücedwki verileri aktarıyor
ben a3 ile c50 arasındaki verileri aktarmak isityorum makroyu bu şekilde düzenleyebilirmisiniz

 

[ozgretmen]

a3 ile c50 arasındaki verileri hangi hücrelere aktarmak istiyorsunuz ?

 

[jambow]

diğer sayfada d -e-f hücrelerine aktarmak istiyorum

 

[ozgretmen]

Dosyanız ekte...Yalnız yapmak istediğiniz tam olarak açık olomadığındab cevap yeterli olmayabilir.Örneği inceleyip , bildiriniz.iyi çalışmalar..

 

[MAKROLARIN EFENDİSİ]

Valla benim yardımcı olabilmem için xls görmem lazım

 

[MAKROLARIN EFENDİSİ]

Aşağıda xls dosyası anladığım şekliyle yaptım ama ihtiyaca cevap vermek için daha detaylı bilgi sahibi olmam lazım