Tartalomjegyzék
A következő makró körbejárja a munkafüzet minden lapját, és sorba írja az egyes lapok lapneveit a kiválasztott lapra. Ez hasznos lehet a sok lapos munkafüzet minden lapjának gyors listájához.
Sorolja fel az összes munkalapot egy munkafüzetben
A makró használatához csak cserélje ki a Sheet1 szót (kétszer jelenik meg) a kódban a lap nevével, ahol szeretné az eredményeket. Győződjön meg arról, hogy nincsenek fontos információk a kimeneti lapon, mert az törli az adatokat, mielőtt írna.
123456789101112131415 | Allistalapok ()Dim ws munkalapkéntDim x Mint egészx = 1Táblázatok ("Sheet1"). Tartomány ("A: A"). VilágosMinden egyes munkalaphozTáblázatok ("Sheet1"). Cellák (x, 1) = ws.Namex = x + 1Következő wsEnd Sub |