Üstadlar Yardım.
Rows("1:1").Select Satırada Hata Alıyorum
Değerli Yardımlarınızı Bekliyorum.
Range("A28:F28").Select
Selection.Copy
Range("A29:F29").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("Sayfa1").Select
Rows("1:1").Select
Application.CutCopyMode = False
Selection.Insert Shift:=xlDown
Sheets("İnt").Select
Selection.Copy
Sheets("Sayfa1").Select
ActiveSheet.Paste
Rows("1:1").Select Satırada Hata Alıyorum
Değerli Yardımlarınızı Bekliyorum.
Range("A28:F28").Select
Selection.Copy
Range("A29:F29").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("Sayfa1").Select
Rows("1:1").Select
Application.CutCopyMode = False
Selection.Insert Shift:=xlDown
Sheets("İnt").Select
Selection.Copy
Sheets("Sayfa1").Select
ActiveSheet.Paste
