aktarma

[abuitun]

iyi akşamlar,
bir sayfayı aktardıktan sonra aynı sayfayı değişiklik yapıp tekrar aynı ismde aktarbilirmiyiz.

 

[Kemal Demir]

iyi akşamlar,

Açıklayacı bir ornek dosya ekleyebilirmisiniz.

 

[abuitun]

aktar

maliyet sayfasına veriler girdik aktarma işlemini yaptık ve öreğin ayçiçeği olarak aktardık . Aktarma işleminden sonra maliyet sayfasında ayçiçeği sayfasını geri getirip üzerinde değişiklik yaptıktan sonra tekrar aktarma yapılabilir mi?ayçiçeği ismiile.
Umarım son soru anlaşılır

 

[abuitun]

maliyet sayfasına veriler girdik aktarma işlemini yaptık ve öreğin ayçiçeği olarak aktardık . Aktarma işleminden sonra maliyet sayfasında ayçiçeği sayfasını geri getirip üzerinde değişiklik yaptıktan sonra tekrar aktarma yapılabilir mi?ayçiçeği adıyla
sayfa aktarırken bazı veriler veri girişi sayfasına da aktarılıyor.
Umarım son soru anlaşılır

 

[abuitun]

İyi akşamlar
aşağıdaki kodda sayfadaki tüm verileri aktara bilmek için hasngi kodlar eklenmeli
Sub aktar()
If Not Sheets("Sayfa1").Range("A1") = Empty Then
For i = 1 To Worksheets.Count
If Sheets(i).Name = Sheets("Sayfa1").Range("A1") Then
MsgBox "Bu isimli bir sayfa mevcut..... !"
Exit Sub
End If
Next
Set NewSh = Worksheets.Add(After:=Sheets(Sheets.Count))
NewSh.Name = Sheets("Sayfa1").Range("A1")
End If
Set NewSh = Nothing
End Sub

 

[abuitun]

aktarma makrosu

maliyet sayfasında c3 hücresine verilen ürün ismi ile yeni sayfaya aktarma yapılablirmi.
bir çok ürün için aktarma yaptıktan sonra aktarılan sayfalar da veri eklemesi yapıldıktan sonra aynı isimde tekrar aktarma yapabilşirmiyiz.