Revival5084
Altın Üye
- Katılım
- 3 Mayıs 2020
- Mesajlar
- 5
- Excel Vers. ve Dili
- 2016 türkçe
- Altın Üyelik Bitiş Tarihi
- 30-01-2025
simgeyi filtrele kopyala filtreyi kaldır yapıştırılacak yeri seç yapıştır yaptığımda ''RUN-TİME ERROR 1004'' hatası alıyorum
''Range sınıfının pastespecial yönetimi başarısız'' diyor ne yapmalıyım
aşağıda sarı yazıyle belirttiğim hatalı diyor sarı olarak çıkıyor. lütfen yardım
Sub Makro2()
'
' Makro2 Makro
'
'
ActiveSheet.Range("$F$1:$F$69").AutoFilter Field:=1, Criteria1:= _
ActiveWorkbook.IconSets(xl3Symbols2).Item(3), Operator:=xlFilterIcon
Range("D11:F33").Select
Selection.Copy
ActiveSheet.Range("$F$1:$F$69").AutoFilter Field:=1
Range("N9").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("L8").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = ""
Range("L9").Select
End Sub
''Range sınıfının pastespecial yönetimi başarısız'' diyor ne yapmalıyım
aşağıda sarı yazıyle belirttiğim hatalı diyor sarı olarak çıkıyor. lütfen yardım
Sub Makro2()
'
' Makro2 Makro
'
'
ActiveSheet.Range("$F$1:$F$69").AutoFilter Field:=1, Criteria1:= _
ActiveWorkbook.IconSets(xl3Symbols2).Item(3), Operator:=xlFilterIcon
Range("D11:F33").Select
Selection.Copy
ActiveSheet.Range("$F$1:$F$69").AutoFilter Field:=1
Range("N9").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("L8").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = ""
Range("L9").Select
End Sub