Următoarea macrocomandă parcurge fiecare foaie dintr-un registru de lucru și scrie numele filei fiecărei foi în mod succesiv pe o foaie pe care o alegeți. Acest lucru ar putea fi la îndemână pentru o listă rapidă a fiecărei foi dintr-un registru de lucru cu mai multe foi.
Enumerați toate foile de lucru dintr-un registru de lucru
Pentru a utiliza macro-ul, înlocuiți cuvântul Sheet1 (apare de două ori) în cod cu numele filei în care doriți rezultatele. Asigurați-vă că nu există informații importante în fila de ieșire, deoarece șterge datele lor înainte de a le scrie.
| 123456789101112131415 | Sub ListSheets ()Dim ws Ca foaie de lucruDim x Ca întregx = 1Foi („Foaie1”). Interval („A: A”). ȘtergețiPentru fiecare ws din foi de lucruFoi („Sheet1”). Celule (x, 1) = ws.Namex = x + 1Următorul wsSfârșitul Sub |
