Chẳng là mình đang cần tìm phần mềm có chức năng thay thế một loạt từ, kiểu như nhập vô từ a thay bằng b, c thay bằng d... rồi khi mở văn bản ra nó thay hết, mấy cái notepad với word chỉ thay một cái một rất bất tiện :D. Có ai biết không ạ?
Printable View
Chẳng là mình đang cần tìm phần mềm có chức năng thay thế một loạt từ, kiểu như nhập vô từ a thay bằng b, c thay bằng d... rồi khi mở văn bản ra nó thay hết, mấy cái notepad với word chỉ thay một cái một rất bất tiện :D. Có ai biết không ạ?
thế thì căng :vQuote:
Originally Posted by nhungong
mình nghĩ bạn có thể sử dụng word để làm điều này.Ví dụ :
Trước đó là như thế này:
http://www.mediafire.com/convkey/f67...mrroqez4zg.jpg
Bạn muốn thay toàn bộ từ khóa "A" bằng từ khóa "thay the"
1_Bấm vào replace
2_Điền "A" vào ô Find What
3_Điền "thay the" vào ô Replace With
4_Bấm vào Replace All
Kết quả sẽ ra như thế này:
http://www.mediafire.com/convkey/793...sy1k5f7lzg.jpg
Subtitle edit.
theo em hiểu thì ý bác @nhungong là cùng 1 lúc replace nhiều từ, ví dụ như cùng 1 lúc thay a --> b, c-->d
chứ không phải làm 2 lần, 1 lần a-->b, lần 2 c-->d
còn nếu không thì như trên là chuẩn rồi :v
Trong word cũng có khu định dạng đc bọn soạn thảo dùng nhiều.
Cái kiểu gõ tắt mà hiện cả cụm từ đó. Ko biết áp dụng cái này vào đc ko nữa. :-?
Con ngỗng còm cần find and replace mấy từ để viết cho cái macro. Còn phần mềm thì viết cũng được nhưng hơi tốn thời gian hơn làm phát macro trong word.Quote:
Originally Posted by nhungong
Mấy cái gõ tắt với auto correction chỉ thay khi gõ thôi còn gõ rồi nó không nhận đâu :D.
Ngỗng @nhungong thử cái macro này trong word nhé
Thay cái a,b,c,d và A,B,C,D vào nhé.Code:Sub MultiReplace()
Dim OldStr As String, NewStr As String
Dim RangeFind As Range, RangeText As Range, i As Long
OldStr = "a,b,c,d"
NewStr = "A,B,C,D"
Set RangeText = Selection.Range
For i = 0 To UBound(Split(OldStr, ","))
Set RangeFind = RangeText.Duplicate
With RangeFind.Find
.ClearFormatting
.Replacement.ClearFormatting
.Text = Split(OldStr, ",")(i)
.Replacement.Text = Split(NewStr, ",")(i)
.Format = False
.MatchWholeWord = True
.MatchAllWordForms = False
.MatchWildcards = False
.Execute Replace:=wdReplaceAll
End With
Next
End Sub
Hết trùm nhậu giờ chuyển qua làm trùm ma cô. :v
Tiện topic "ai biết chỉ giùm", em xin hỏi ké chị nhungong. Ai biết chỉ giùm em phần mềm nào làm Collage trên window 7 ạ. Chỉ biết làm trên ipad mà đưa qua đưa lại mệt quá. ai xài mac biết phần mềm nào làm collage thì chỉ e luôn ạ. Xin đạ tạ.:th_41:
Chị @nhungong =)) =)) =))
Collage có cả bản cho window mà :-?Quote:
Originally Posted by danny1603
http://www.collageitfree.com/
phần mềm đó ko hay lắm. làm đơn giản ghép 2 3 hình kiểu này thôi àQuote:
Originally Posted by angel_of_dead
http://i465.photobucket.com/albums/r...2_13-35-07.jpg
tấm này làm bằng cái snagiteditor tự canh cho nên nó tấm dài tấm dẹt bựa v á.
Kiểu vầy
http://i.imgur.com/ZtdzKy3.png
@Gemini dùng SE 3.4.4 có bị lỗi nếu tách line hoặc chỉnh sửa timecode từ sub đang dịch khiến cho sub đang dịch và sub gốc (original sub trong khi đang dùng translator mode ấy) bị lệch với nhau thì không lưu được sub đang dịch không? Nó cứ báo là this sub seems to be invalid hay empty gì đó, toàn phải save as mới lưu được. Xài 3.4.4 bị cái lỗi đó muốn điên luôn vì lâu lâu lại save tay một lần mà cứ như vậy tức chết đi được :'(. 3.4.3 cũng bị, phải lùi về 3.4.2 mới lưu ngon lành được. Không biết phải do mỗi mình hay do lỗi phần mềm =.=!.
Lỗi đấy ko biết nhé. Vì có dịch sub bao giờ đâu @@. Vào đây báo lỗi cho thằng chủ biết: http://forum.doom9.org/showthread.ph...55#post1704155