View Single Post
 
Old 02-05-2022, 01:43 PM
nmkhan3010 nmkhan3010 is offline Windows 10 Office 2016
Novice
 
Join Date: Feb 2020
Posts: 21
nmkhan3010 is on a distinguished road
Default

Thank You for Help and Support.

I am appreciating and grateful for your help.

Below code is working well but not fulfilling my actual purpose, here code is deleting the find match word tables only.

My Purpose:

If the find string is more than one time in a document, then take the first match string as a base to delete the all ABOVE tables. but the below code is deleting the only match string tables.

EX: AAA is a match string.

There are N no of tables in a document and AAA is found at table 6 and table 9, then the code has to take the first match string as a base to delete all the tables. i.e. Table 1 to tables 5 has to be deleted, because AAA is firstly matched at Table 6.

Suppose if I want to add a Chinese string as a find string shall it accept or not, previously I pasted as Unicode converter code at

.Text = ChrW(32467) & ChrW(31639) & ChrW(22791) & ChrW(20184) & ChrW(37329)

Native Text : 结算备付金

I worked on the Chinese documents and how to write a Chinese find word in VBA mode.
Is there any best way to find strings in Chinese native? Presently am using Unicode converter to find Chinese strings over the document.

Please highlight where I have to paste a Chinese string in this code.

Please review the code once…

Am thankful for your help and need…
Reply With Quote