Innehållsförteckning
Hur man definierar ett tabellnamn med hjälp av ett makro
Vill du se till att namnet på den aktiva tabellen är inställt på den text som finns i en specifik cell i tabellen? Använd följande makro:
Ange undertabellnamn ()
Dim Cell som sträng
Cell = "a1"
ActiveSheet.Name = ActiveSheet.Range (cell) .Text
Avsluta Sub
Med variabelns värde cell definiera från vilken cell texten ska tas. För att göra detta, överför lämplig cellreferens (här: A1) som adressen.
Makrot tar innehållet från motsvarande cell i den aktiva tabellen. Det nuvarande arbetsbladet byter sedan namn därefter. Följande bild visar ett exempel på en tabell som har bytt namn: