（已解决）快速VBA目录

pureshadow

汗，做个目录要这么复杂的代码，hyperlink就可以搞定了。
=hyperlink("#sheet!"&row(a1),)
提取页码稍麻烦点，有个变通的办法，如果没有缩放的话，可以统计最后一行的位置，再除以每页行数。

pureshadow

呃……为什么非要用井号……这个，还是问小比去吧。