Dưới đây là VietPhrase của đệ, các huynh có thể lấy ở đây :
www.4vn.net/download/vp.nov3008.rar
Dưới đây là VietPhrase của đệ, các huynh có thể lấy ở đây :
www.4vn.net/download/vp.nov3008.rar
Cái này đáng lẽ không nên để bên đây nhưng nếu để đúng chỗ thì chả có ma nào vào.
...
Mọi người đều biết, một bản vietphase tốt thì ... rất dễ đọc và cũng góp phần giảm nhẹ gánh nặng cho những dịch giả mới tập dịch.
Ai cũng muốn có vietphase xịn để đọc, nhưng tự mình làm thì lâu quá, mà làm theo kế hoạch hợp tác thì không bố trí được thời gian, không có hứng, .v.v...
Đệ lập topic này với một mục đích duy nhất là Hợp nhất các bản vietphase có sẵn.
Chức năng hợp nhất và nén vietphase đã có sẵn trong chương trình của bác phuphi nên thực ra cũng không phải làm gì to tát lắm.
Em sẽ chịu trách nhiệm chạy cho nó hơp nhất thành một.
Các bác cố gắng giúp em một việc duy nhất là up bản vietphase nên đây thôi ...
Bản vietphase up sẵn của em này là tổng hợp bản của bác phuphi, một số từ em thêm vào, với bản của bác phnguyen chuyên gia convert cho LHBG. (200 xu làm quà của em nữa ... ), sau khi xử lí bằng chương trình của phuphi nó có kích thước hiện tại là: 1,068,582 bytes.
Hi vọng các bác hợp tác với em. Mọi người cùng có lợi cả mà.
Thanks.
Fingtogo
PS: Nếu bác nào muốn tự làm thì trước khi hợp nhất cần phải sắp xếp lại.
Mod cho em mượn đất trong một tuần thôi nha. Đa tạ.
...........
Edit: Đã up bản vietphrase update đến ngày 20.12.08!
Update lại bản full đã loại hết các nghĩa trùng nhau dùng cho đọc convert ....
Lần sửa cuối bởi fingtogo, ngày 21-12-2008 lúc 14:00.
...
Ko chỉ cần có Vietphrase mà cần cả Name nữa bạn à . Đây là của mình
Vạn Lý Tầm Hoa - Thiên Lý Tầm...Mỹ Nữ Hidden Content
đây là vietpharse của mình
cập nhật 20/08/2010
(dùng để đọc nhé!)
Lần sửa cuối bởi xtiger87, ngày 21-08-2010 lúc 11:37.
Đây là file data của đệ. Hơi ít một chút.
Để check không trùng các huynh làm như sau:
- Bật file này lên bằng word (mở word ra rồi open all file và mở file data.txt)
- Nhấn Edit > Replace
- Gõ vào ô find what dấu "=". Gõ vào ô Raplace with "^t". Và nhấn Replace all.
- Copy tất cả (Select all rồi cut luôn) và paste vào êxcl. Chúng ta sẽ có 2 cột.
- Chèn thêm một cột ở giữa 2 cột và ghi hết "=" vào cột đó (để chút save dạng text tiện hơn.
- Nhấn chọn cột đầu tiên (nhấn vào chữ A). Rồi nhấn Data > Sort sau đó nhấn Ok.
Bây giờ đã có 1 cơ sở dữ liệu có xắp thứ tự. Bạn chỉ việc loại những từ hoặc câu trùng nhau.
- Save as file excel dưới dạng Unicode Text
- Mở file text mới save từ excel bằng word. Trong word vào Edit > Replace. - Gõ vào ô find what dấu "^t". Để trống ô Raplace with (không có nội dung gì). Và nhấn Replace all.
- Save lại.
Cách làm này không chỉ với file data mình đưa lên mà cả với các file dữ liệu của Vietpharse đều dùng cả. Như bây giờ bạn có vài file Names.txt và muốn hợp lại làm 1 thì bạn có thể tham khảo cách làm này.
Xắp xếp dữ liệu như mình thì các cột sau tự động xắp lại theo thứ tự với cột đầu mà?
Với file dữ liệu của Vietpharse:
- Làm tương tự như trên; sau khi xắp xếp theo cột A (Sort...) bạn ghi vào ô C1:
=IF(A1=A2,"CHÚ Ý","")
- Kéo ô C1 đó tới cuối cột (Sao chép xuống các ô của cột C); bạn sẽ có những từ tiếng trung giống nhau ở cột A thì tại cột C sẽ có từ Chú ý rất nổi bật > bạn có thể tìm ra những cụm từ trùng nhau để xử lý (tiện lợi hơn nếu bạn biết nhấn vào cột C và chọn: Data > Filter > Autofilter)
- Sau khi xóa những cụm từ trùng nhau và giữ lại bản tốt nhất bạn có thể copy toàn bộ paste vào word và tiến hành replace (^t bằng =) rồi save lại nguyên dạng.
Note: Sau khi đọc và nhìn lại hình minh họa mình nghĩ nên thay lệnh ở ô C2 là:
=IF( OR (A2=A1, A2=A3),"CHÚ Ý","")
và từ ô C2 này kéo xuống dưới.
Nói chung cách mình làm chẳng có gì mới cả; chỉ đơn giản là kỹ năng sử dụng cơ bản Excel và thêm một chút suy nghĩ để công việc nhẹ nhàng hơn thôi. Bạn nào làm được thì tốt, không làm được cũng chẳng sao
------------------------
Dựa vào cách làm của duongthanh85 mình làm như sau:
- Dùng Notepad mở file Vietphrase, copy nội dung dán vào excel (cột A)
- Ở ô B1 gõ công thức " =Find("=",a1) " (để đếm số từ tiếng Trung)
- Ở ô C1 gõ công thức " =Right(a1,len(a1) -b1) " (để tách phần tiếng Việt)
- Copy 2 công thức xuống dưới.
- Chạy macro sort().
- Copy cột A dán vào Notepad
Bảo đảm trăm cú như một ?? (Dễ bị kiện ra tòa quá...hehe)
Sub sort()
Range("B1").Select
Range("A:C").sort Key1:=Range("B1"), Order1:=xlDescending, Key2:=Range _
("C1"), Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase _
:=False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal, _
DataOption2:=xlSortTextAsNumbers
End Sub
Lần sửa cuối bởi vvktlove, ngày 17-04-2009 lúc 15:18.
Ngoạn mục nhưng không rực rỡ, lên xuống là vô thường
Có 1 người đang xem chủ đề. (0 thành viên và 1 khách)