Em gửi lại, em gửi nhầm hình, nhờ thầy chỉ giúp em bị sai chỗ nào vậy thầy
Hàm LEFT trong VBA không dùng theo dạng WorksheetFunction được bạn nhé, mà dùng trực tiếp dạng:
Sheet6.Range("L" & i).Value = Left(Sheet6.Range("J" & i), 1)
Trong đó bạn cần chỉ rõ số ký tự cần tách là mấy ký tự.