Makró a munkafüzet összes lapjának felsorolásához - VBA kódpéldá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

Segít a fejlesztés a helyszínen, megosztva az oldalt a barátaiddal

wave wave wave wave wave