Når du trenger å automatisere oppgaver i Microsoft Excel 2010 , kan du slå til Visual Basic for Applications , er et programmeringsspråk som følger med alle moderne versjoner av Microsoft Office- programmer for Windows (VBA støtte ble fjernet for Mac kontor i versjon 2008 , men erstattes i versjon 2011 ) . VBA lar deg kjøre et lite program over flere Excel- celler , i motsetning til Excel formler , som bare fungerer på cellen de er i. Mens Excel programmet kommer med en finne og erstatte veiviseren, kan du bruke VBA til å finne og erstatte celle innholdet uten å kreve noen brukerundersøkelser , og du kan gjøre det på tvers av alle regnearkene i arbeidsboken . Instruksjoner
en
Åpne Excel- arbeidsbok der du vil skrive inn VBA-kode . Trykk "Alt" og " F11 " for å åpne opp VBA -konsollen .
2
Dobbeltklikk på modulen der du vil oppgi kode. Hvis det ikke er modulen du kan høyreklikke på et regneark, flytter musen over "Sett inn" og velg " Module ". Deretter dobbeltklikker du på modulen for å hente den opp
3
Kopier følgende formel inn i modulen : .
Sub AReplace ( )
Dim sb Som regneark
Hver sb I regneark
sb.Cells.Replace Hva: = " XXX" , erstatning: = " YYY " , lookat : = xlPart , _
< p > SearchOrder : = xlByRows , matchCase : = False
Neste
End Sub
Change " XXX " på verdien du søker etter og " YYY " på verdien du ønsker å erstatte den med . Du kan også endre " matchCase " verdien til " true" hvis kapitalisering er viktig . Denne makroen vil finne og erstatte alle ønskede verdier på hvert regneark i arbeidsboken
4
Bruk følgende kode hvis du bare ønsker å erstatte alle verdiene i et gitt valg: .
Selection.Replace Hva: = " XXX" , erstatning: = " YYY " , lookat : = xlPart , _
SearchOrder : = xlByRows , matchCase : = False
Du kan bruke denne koden i noen annen VBA makro så lenge du skriver inn denne koden etter at du har definert et merket område i makroen.
5
Klikk på " X " i øverste høyre hjørne av VBA vinduet for å lukke det. Alle endringene lagres automatisk .
6
Klikk på " Developer "-fanen og trykk på "Macro "-knappen . Velg ditt makro fra listen og klikk "Kjør " for å erstatte alle de målrettede verdier i regnearket eller arbeidsboken.
