VBAで使える改造コードを教えてください。(色々)