#1 21.01.07 12:45
Подскажите плиз макрос excel на VBA
есть один лист - название "15.12.06 (1)", надо макрос сделать, чтобы создавался новый лист - копия старого с именем "15.12.06 (2)" и взаимствовать несколько значений из старого листа. Соответственно, след лист будет "16.12.06 (1)" потом "16.12.06 (2)" и т.д.
С новым листом всё очень просто, а далше затык, программирую плохо и синтаксис VBA не знаю. Подскажите плиз.
Offline
#2 22.01.07 15:22
Re: Подскажите плиз макрос excel на VBA
' в начальной книге есть один лист
n = 3 ' количество листов
Dday = 14
For i = 2 To 2 * n + 1
If i Mod 2 = 1 Then
Sheets(t).Copy after:=Sheets(Sheets.Count)
Else
Dday = Dday + 1
t = Dday & ".12.06(1)"
Sheets.Add after:=Sheets(Sheets.Count)
ActiveSheet.Name = t
End If
Next i
Offline
