- Направите нову радну свеску помоћу СхеетсАрраи -а.
- Сачувајте радну свеску пре него што је пошаљете.
- Избришите датотеку са чврстог диска након што је послата.
Суб Маил_СхеетсАрраи () Дим стрДате као низови (Арраи ("Схеет1", "Схеет3")). Цопи стрДате = Формат (Дате, "дд-мм-ии") & "" & Формат (Тиме, "х-мм- сс ") АцтивеВоркбоок.СавеАс" Део "& ТхисВоркбоок.Наме _ &" "& стрДате &" .клс "АцтивеВоркбоок.СендМаил" рон@дебруин.нл ", _" Ово је тема "АцтивеВоркбоок.ЦхангеФилеАццесс клРеадОнли Килл АцтивеВоркбоок .ФуллНаме АцтивеВоркбоок.Цлосе Фалсе Енд Суб