DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Sub birleştir()
Sheets("Sayfa2").Range("F6") = Sheets("Sayfa1").Range("A1").Text
Sheets("Sayfa2").Range("G6") = Sheets("Sayfa1").Range("D3").Text
Sheets("Sayfa2").Range("H6") = Sheets("Sayfa1").Range("C2").Text
Sheets("Sayfa2").Range("I6") = Sheets("Sayfa1").Range("A4").Text
Sheets("Sayfa2").Range("J6") = Sheets("Sayfa1").Range("K4").Text
End Sub
Tekrar teşekkür ederim. Hayırlı geceler.