Как скопировать лист? - Microsoft Office Excel - Страница 2

SAS888 · 31.07.2009, 09:14

А Вы пробовали копировать лист?
Войдите в контекстное меню листа, выберите "Переместить/скопировать" и внимательно изучите появившееся окно. Там Excel предлагает все то, что может сделать.

999alex · 13.01.2012, 15:33

А мне нужно было скопировать часть активного листа на другой компьютер:
Private Sub CommandButton1_Click()
On Error Resume Next
ActiveSheet.Copy
ActiveSheet.Shapes("CommandButton1" ).Delete
ActiveSheet.Rows("16:100").Delete Shift:=xlUp
Путь$ = "\\komp\directory\filename" & IIf(Month(Date) > 9, "", "0") & Month(Date) & Year(Date)
ActiveWorkbook.SaveAs Путь$
ActiveWorkbook.Close False
End Sub

31.07.2009, 09:14	#11
SAS888 Старожил Регистрация: 05.12.2007 Сообщений: 4,180	А Вы пробовали копировать лист? Войдите в контекстное меню листа, выберите "Переместить/скопировать" и внимательно изучите появившееся окно. Там Excel предлагает все то, что может сделать. Чем шире угол зрения, тем он тупее.

13.01.2012, 15:33	#12
999alex Регистрация: 14.10.2011 Сообщений: 3	Спасибо, и мне помогло А мне нужно было скопировать часть активного листа на другой компьютер: Private Sub CommandButton1_Click() On Error Resume Next ActiveSheet.Copy ActiveSheet.Shapes("CommandButton1" ).Delete ActiveSheet.Rows("16:100").Delete Shift:=xlUp Путь$ = "\\komp\directory\filename" & IIf(Month(Date) > 9, "", "0") & Month(Date) & Year(Date) ActiveWorkbook.SaveAs Путь$ ActiveWorkbook.Close False End Sub

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Как скопировать лист Excel в Word?	Диагностик	Microsoft Office Excel	5	28.10.2010 23:05
Как скопировать image?	blackstersl	Общие вопросы Delphi	13	15.03.2009 22:51
Как скопировать программу	RAVAL))	Общие вопросы Delphi	1	06.01.2009 02:57
как скопировать файл	Scorpeon	Общие вопросы Delphi	1	19.04.2007 13:45
как скопировать?	zetrix	Microsoft Office Excel	0	30.10.2006 18:52