Trang web hiển thị tốt nhất trên các trình duyệt mới và được bật Javascript.

Ví dụ Cột A có 1 loạt các giá trị trong phạm vi A1:A10.

KieuKieu

Ví dụ Cột A có 1 loạt các giá trị trong phạm vi A1:A10.
Mình muốn thay đổi giá trị của cột A thành giá trị mới như sau:
Range("A1") = "ABC" & Range("A1")

Code đó mình lặp qua từng dòng để thay thế.
Có cách nào nhanh tuyệt vời không?

VuTienQuyen

ý bạn là lặp như thế này phải không:
Dim i As Integer
For i = 1 To 10
Range("A" & i) = "ABC" & Range("A" & i)
Next i

VuTienQuyen

Nếu ko dùng vòng lặp thì bạn thử cách này xem:
tại ô B1="ABC"&A1 => kéo hoặc double click chuột cho chạy tới B10, sau đó dùng code sau:
Public Sub khong_dung_vong_lap()
Range("B1:B10").Select
Selection.Copy
Range("C1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

Range("C1:C10").Copy
Range("A1:A10").Select
ActiveSheet.Paste
Range("C1:C10") = ""
End Sub

SonDoan

Máy nào cũng biết nịnh chủ nhỉ

KieuKieu

Tóm lại là vòng lặp tốn nhiều thời gian. Tốn hơn gấp đôi trong trường hợp này.

SonDoan

Nếu chạy vòng lặp trong array (tức là chạy trong bộ nhớ) thì tốc độ tang lên rất nhiều đấy Sau này thuật toán xử lý người ta hay đưa range value sang array. Xử lý trên array rồi gán giá trị range với array sau xử lý. Tốc độ nhanh hơn xử lý trên excel khoảng 10 lần

Mn ơi, có nhóm nào về kế toán ở zalo thì add e vs ạ các anh chị cho em hỏi Cách replace xuống dòng zxczxczxczxc § Nội Quy § § Nội Quy § --- §0 - Trước khi đọc nội quy: quy định đưa ra là Có hàm nào làm cho chữ đậm hoặc nghiêng không nhi? Cách để tính nhanh khi nhảy lung tung tính tiền ăn mỗi bữa lỗi hàm trong wps excel giúp em giải câu excel ạ - Ở đây có ai nhận làm thuê bài tập excel ở trường không ạ, giúp mình vs ?? Xem thêm