返回列表 上一主題 發帖

符合條件, 刪除多行

符合條件, 刪除多行

各位好

我想請教各位刪除多行的VBA該怎麼寫才好
刪除的規格是只要在 lang "Traditional Chinese" 上方的, 至數字欄, 都是要刪除的, 例如下方3種範列, 第一個範列是 共有3行, 1, 數字 2, 英文描述 3. lang "Traditional Chinese"
我有先找到網路有人的教學, 但都是以刪除單行為主, 不曉得我這樣的規則是否可以寫的出來?

description                               
        1 item_generation_cannot_change_prefixes                       
        1                       
                # "Prefixes Cannot Be Changed"               
        lang "Traditional Chinese"                       

        1                       
                # "▽ 前綴無法被變更"               
        lang "Thai"                       
        1                       
                # "ไม่สามารถเปลี่ยน Prefix ได้"               
        lang "Russian"                       
        1                       
                # "�D�f�Z�j�^�`�g�q �c�Z�a�r�]�u �^�]�b�Z�c�^�h�r"               


---------------------------------------------
description               
        1 local_display_socketed_gems_have_mana_reservation_+%       
        2       
                1|# "Socketed Gems have %1%%% increased Mana Reservation"
                #|-1 "Socketed Gems have %1%%% reduced Mana Reservation" negate 1
        lang "Traditional Chinese"       

        2       
                1|# "此物品上的寶石增加 %1%%% 魔力保留"
                #|-1 "此物品上的寶石減少 %1%%% 魔力保留" negate 1
        lang "Thai"       
        2       
                1|# "เจ็มที่ใส่มีการสำรองมานาเพิ่มขึ้น %1%%%"
                #|-1 "เจ็มที่ใส่มีการสำรองมานาลดลง %1%%%" negate 1
        lang "Russian"       
        2       
                1|# "�E�U�]�b�Z�o�Z�c�c�q�Z �`�U�b�c�^ �^�b�Z�t�h %1%%% �i�W�Z�a�^�m�Z�c�^�Z �d�V�p�Z�b�U �i�Y�Z�f�\�U�c�c�d�_ �b�U�c�q"
                #|-1 "�E�U�]�b�Z�o�Z�c�c�q�Z �`�U�b�c�^ �^�b�Z�t�h %1%%% �i�b�Z�c�r�n�Z�c�^�Z �d�V�p�Z�b�U �i�Y�Z�f�\�U�c�c�d�_ �b�U�c�q" negate 1

-----------------------------------------------------------------------------------------------
description               
        1 local_physical_damage_+%       
        3       
            #|-100 "No Physical Damage"       
            1|# "%1%%% increased Physical Damage"       
            -99|-1 "%1%%% reduced Physical Damage" negate 1       
        lang "Traditional Chinese"

符合條件刪除多行.rar (466.96 KB)

回復 2# Hsieh


   您好, 十分感謝您的回覆!

我剛有試做, 但轉換過來,  都變成亂碼?
中間偵錯時, 就停留在"d.Remove j" 這一行

可否請您再看看? 謝謝。

TOP

回復 4# 准提部林


真的很謝謝, 還弄了二種方法給我!

一直當伸手牌很不好意思, 我會努力看懂您提供的vba,  再次謝謝!

TOP

回復 5# Hsieh



剛試了, 是成功的! 感謝感謝

想再請問一下, 貼回txt後,  發現每個句子後面都有些空格, 這個有辦法解決嗎?

TOP

本帖最後由 yc1031 於 2015-12-17 08:59 編輯

回復 8# 准提部林


    Xl0000085v02.rar (579.23 KB)

您好, 想學習一下, 假如我也想把以下lang thai and lang Russian 都刪掉, 我只想留中文翻譯的部分, 即是紅字的部分都是要刪除的
那VBA該怎麼改呢?  感謝!

description                       
        1 item_generation_cannot_change_prefixes               
        1               
                # "Prefixes Cannot Be Changed"
        lang "Traditional Chinese"
               
        1               
                # "▽ 前綴無法被變更"       
        lang "Thai"               
        1               
                # "ไม่สามารถเปลี่ยน Prefix ได้"       
        lang "Russian"               
        1               
                # "�D�f�Z�j�^�`�g�q �c�Z�a�r�]�u �^�]�b�Z�c�^�h�r"       

TOP

        靜思自在 : 原諒別人就是善待自己。
返回列表 上一主題