The stub use ZwAllocateVirtualMemory to allocate memory, RtlMoveMemory to write memory and EnumDateFormatsW to execute shellcode. You can generate meterpreter/reverse ...
These VBA code examples come from a personal collection that I reference frequently.