Is there a way to hibernate a computer via Excel VBA?

I tried something like SendKeys "^{ESC}u", True
to get the shutdown box up but it doesn't work.

Any other ideas?

Thanks