Sıralama makrosunda Run time error 1004 hatası

  • Konuyu başlatan Konuyu başlatan ozuberk
  • Başlangıç tarihi Başlangıç tarihi
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Merhaba aşağıdaki kodu çalıştırdığımda Run time error 1004 hatası alıyorum. Koda sıralama nasıl ekleyebilirim.

Sub Kayit ()
Set sf1 = Sheets("G01")
ad = sf1.Range("V3").Text
Set sf2 = Sheets(ad)

Son = sf2.Cells(Rows.Count, 1).End(3).Row + 1

sf2.Range("A" & Son) = sf1.Range("L3")
sf2.Range("B" & Son) = sf1.Range("L4")
sf2.Range("C" & Son) = sf1.Range("L6")
sf2.Range("D" & Son) = sf1.Range("A1")
sf2.Range("E" & Son) = sf1.Range("L7")
sf2.Range("F" & Son) = sf1.Range("L8")
sf2.Range("G" & Son) = sf1.Range("Z9")
sf2.Range("H" & Son) = sf1.Range("Z5")
sf2.Range("I" & Son) = sf1.Range("L5")
sf2.Range("J" & Son) = sf1.Range("L10")
sf2.Range("K" & Son) = sf1.Range("L11")
sf2.[B2:K1001].Sort Key1:=[B2]
Range("A2").Select
End Sub
 
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst