kan vinden en vervangen, moet je met de hand van een tekst, maar als er meer dan één tekst, het is saai en vermoeiend.Dus de volgende code van de VBA kan helpen je meteen afmaken.,,, 1.Activeer je lakens, vasthouden, Alt+F11, open de sleutel, Microsoft visuele van toepassing.,,,,, 2.- steek, >, modules en gebruik de volgende codes, module.,,,,, de VBA code: vinden en in de huidige lijst wordt vervangen door de tekst in de tekst,,,, - textboxreplace (") updateby20140603 somber XWS als een vorm van kleine, donkere vorm van donkere xfindstr donkere xreplace koord touw xfindstr = toepassing. Inputbox (" ontdekking ", xtitleid,", type: = 2) xreplace = toepassing. Inputbox ("vervangen door", xtitleid, ", type: = 2) de vaststelling van een XWS = application.activesheet fouten te herstellen XWS KWK in elke vorm van shp.textframe.characters.text shp.textframe.characters.text. Xvalue = = de VBA. (xvalue vervangen, xfindstr, xreplace, onder 1) terminal,,,, en op 3, F5, exploitatie van de code, en zal er een doos om eraan te herinneren dat je in de yOnze oude tekst, je moet vervangen.Kijk 's:,,,,,, 4.Te klikken, oké, in deze doos, de tekst van de waarde van de inbreng van nieuwe, wil je naar een screenshot:,,,,,,, 5.En dan klik je oude waarden zijn opgenomen in de balans van de in het huidige nieuwe waarden vervangen.Zie de schoten:,,,,,,,