Makroer er små programmer som kjører en bestemt oppgave . I Microsoft Excel , er det en makro som vil kopiere alle områdenavn fra en arbeidsbok og lime dem inn i en annen . Opprette denne makroen vil trekke områdenavn og lime dem automatisk. Instruksjoner
en
Åpne arbeidsboken du vil kopiere områdenavn fra . Hvis du ikke allerede har navnene sett , definere områdenavn . For å gjøre dette , klikk på "Insert "-menyen , velg " Navn" og deretter velge " Definer " fra listen . Finne navnene i arbeidsboken boksen .
2
Finn navnet på den andre arbeidsboken. Sørg for at arbeidsboken lagres som en Makroaktivert arbeidsbok . Filtypen skal være. XLSM eller . LSM .
3
Hold nede " Alt" og " F11 " tastene . Visual Basic-redigering vil åpne . Klikk på " Module" i " Insert"-menyen . Modulen vindu vil dukke opp .
4
Skriv inn følgende kode inn i vinduet . Endre referansen til book2.lsm eller book2.xls til navnet på boken du limer inn også.
Gå Copy_All_Defined_Names ()
' Loop gjennom alle de definerte navnene i den aktive
' arbeidsbok .
for hver x i ActiveWorkbook.Names
"Legg hver definerte navn fra den aktive arbeidsboken til
' målet arbeidsbok ( " book2 . xls "eller" Book2.xlsm ") .
' " x.value "refererer til cellereferanser den
' definerte navnet peker til.
Arbeidsbøker ( " . Book2.xls ") Names.Add Navn: = x.Name , _
RefersTo : = x.Value
Neste x
End Sub
5
Lukk Visual Basic Editor Window . Klikk på " X "-knappen eller hit " ATL " og " F11 " igjen for å lukke vinduet . Makroen vil automatisk lagre . Når du er tilbake på bok en eller arbeidsboken du kopierer fra , lagrer arbeidsboken. Klikk på " File" og velg " Lagre" eller " Lagre som ". Ikke endre navnet på filen på noen måte .
6
Åpne arbeidsboken du limer inn til eller starte en ny arbeidsbok . Lagre arbeidsboken som en Excel makroaktivert arbeidsbok . Kontroller at navnet er det samme som navnet på book2.lsm i koden. Skrivemåten kapitalisering og forlengelse må være nøyaktig.
7
Åpne den første arbeidsboken igjen og klikk på " verktøy "-menyen . Velg " Makro " og klikk " Makroer ".
8
Klikk på " Copy_All_Defined_Names " fra listen over makroer . Velg " Run " alternativet. Navnene vil automatisk bli limt i andre arbeidsboken.
9
Åpen book2 eller limes inn i arbeidsboken. Alle navnene bør limes .