Makronaredba za popis svih listova u radnoj knjizi - primjeri koda VBA

Sljedeći makro prolazi kroz svaki list u radnoj knjizi i zapisuje naziv kartice svakog lista uzastopno na list koji odaberete. Ovo bi moglo biti korisno za brzi popis svakog lista u radnoj knjizi s mnogo listova.

Navedite sve radne listove u radnoj bilježnici

Da biste koristili makronaredbu, samo zamijenite riječ Sheet1 (pojavljuje se dva puta) u kodu imenom kartice na kojoj želite rezultate. Provjerite nema li važnih podataka na izlaznoj kartici jer briše njihove podatke prije nego što na nju upišete.

123456789101112131415 Tablice podpopisa ()Zatamni kao radni listDim x kao cijeli brojx = 1Listovi ("List1"). Raspon ("A: A"). ČistoZa svaki ws u radnim listovimaListovi ("List 1"). Ćelije (x, 1) = ws.Imex = x + 1Sljedeći wsKraj podm
wave wave wave wave wave