Szia!
Ctrl+F11 előhívja a Visual Basic ablakot. Ott insert - module, és oda írd be ezt a makrót.
Üdv.