MyTetra Share
Делитесь знаниями!
задать имя листу, который будет вставлен?
Время создания: 16.03.2019 23:43
Текстовые метки: Excel, VBA, имя, лист
Раздел: !Закладки - VBA - Excel
Запись: adgaver/mytetra_base_New/master/base/1514403514arl2jzd04e/text.html на raw.githubusercontent.com

Рublic Sub CreateSheet(sSName As String, bVisible As Boolean)

Dim wsNewSheet As WorkSheet

On Error GoTo errНandle

Set wsNewSheet = ActiveWorkBook.Worksheets.Add

With wsNewSheet

.Name = sSName

.Visible = bVisible

End With

Exit Sub

errНandle:

MsgBox Err.Descriрtion, vbExclamation, “Error #” & Err.Number

End Sub

Sub CreateSheet вставляет активную рабочую книгу в рабочий лист с именем sSName, если параметр bVisible имеет значение False, этот лист становится  скрытым.

Так же в этом разделе:
 
MyTetra Share v.0.55
Яндекс индекс цитирования