Word文档内容如下：
XXXXX XXXXXX XXXX
XX XXXX XXXXX XXXXXXXXXXX
XXXX XXXXXXXXXXXX XXXXXX (sky)
XXXXXXX XXXXXXXXXXXXXXX X
XXXXXXXXXXX XXXXXXXXXXX XXXXXXXXXX (sky)
xxxxxxxxxxxxxxx xxxxxx xxxx
XX (sky)
我想提取以（sky）out结尾的句子，并将它们正确地打包到文档的末尾，如下所示：
XXXXX XXXXXX XXXX
XX XXXX XXXXX XXXXXXXXXXX
XXXXXXX XXXXXXXXXXXXXXX X
xxxxxxxxxxxxxxx xxxxxx xxxx
XXXX XXXXXXXXXXXX XXXXXX (sky)
XXXXXXXXXXX XXXXXXXXXXX XXXXXXXXXX (sky)
XX (sky)
如何利用VBA实现这一目标？