Call SendKeys("~", True) dener misiniz

ek olarak https://www.excel.web.tr/threads/sen...smiyor.199989/

bu arada belki işlem aralarına doevents koymanız iş görebilir