trích xuất dữ liệu ra file excel mới

[lehungbx]

mọi người cho e hỏi e có 1 mã code muốn trích xuất dữ liệu từ 1 vùng cảu 1 sheet ra file excel mới mà không biết lỗi ở đâu mọi người chỉ giúp e với được không ạ
e cảm ơn.
nó cứ báo lõi ở lệnh
ws.Range("E4").PasteSpecial Paste:=Excel.XlPasteType.xlPasteValues



Sub SaveAndCopyData()
Dim ws As Worksheet
Dim selectedFile As Variant

' Hi?n th? h?p tho?i L?u File
With Application.FileDialog(msoFileDialogSaveAs)
.FilterIndex = 2
.Show

' Ki?m tra n?u ng??i dung ?a ch?n m?t t?p tin
If .SelectedItems.Count > 0 Then
' Sao chep d? li?u t? Range "E4:Y10000" c?a Sheet "THUNGHIEM" vao cac Sheet m?i
Sheets("THUNGHIEM").Range("E4:Y10000").Copy
For Each ws In ActiveWorkbook.Worksheets
ws.Range("E4").PasteSpecial Paste:=Excel.XlPasteType.xlPasteValues

Next
Application.CutCopyMode = False ' Xoa b? nh? t?m

' L?u Workbook v?i ???ng d?n va ten file do ng??i dung ch?n
selectedFile = .SelectedItems(1)
ActiveWorkbook.SaveAs Filename:=selectedFile, FileFormat:=xlOpenXMLWorkbookMacroEnabled
ActiveWorkbook.Close
End If
End With
End Sub

 

[tieutuvodanh192]

Bạn thử thay ws.Range("E4").PasteSpecial Paste:=Excel.XlPasteType.xlPasteValues thành ws.Range("E4").PasteSpecial Paste:=xlPasteValues xem thế nào.

 

[Maika8008]

Ai lại viết cái giá trị dùng cho tham số Paste kỳ kỳ vậy ta: Paste:=Excel.XlPasteType.xlPasteValues?

 

[giaiphap]

Ai lại viết cái giá trị dùng cho tham số Paste kỳ kỳ vậy ta: Paste:=Excel.XlPasteType.xlPasteValues?

Tui đoán là code cắt ghép từ một nguồn nào đó, vì dựa vào lệnh Excel.XlPasteType.xlPasteValues. Lệnh này là một hằng trong thư viện Microsoft.Office.Interop, chính xác và đầy đủ phải ghi vầy Microsoft.Office.Interop.Excel.XlPasteType.xlPasteValues (Trong C# tui có sử dụng nó)

 

[Maika8008]

Tui đoán là code cắt ghép từ một nguồn nào đó, vì dựa vào lệnh Excel.XlPasteType.xlPasteValues. Lệnh này là một hằng trong thư viện Microsoft.Office.Interop, chính xác và đầy đủ phải ghi vầy Microsoft.Office.Interop.Excel.XlPasteType.xlPasteValues (Trong C# tui có sử dụng nó)

Khổ thế nhỉ! Thế thì tôi nghĩ có ai đó học đại học rồi nhưng lại đi giải toán số học.