Макрос для формы добавления данных

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Макрос для формы добавления данных (Код для кнопки Добавить в форме)

Ученик

Дата: Вторник, 09.04.2013, 21:37 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 24

Репутация: 0 ±

Замечаний: 0% ±

Здравствуйте, у меня вот какой вопрос к знающим!
Имеется список студентов, также есть кнопка для добавления студента в список. После щелчка по этой кнопке открывается форма excel, в которой имеется поле для ввода данных о студенте. После ввода данных в форме и щелчка по кнопке Добавить, данные о студенте должны появиться в списке. Еще нужно, чтобы для добавленного студента автоматически создавался лист в имеющейся книге. Затруднение именно в работе с формой. Как реализовать данную задачу? Файл-пример прилагаю.

К сообщению приложен файл: 7498441.xlsm (19.6 Kb)

Ответить

RAN

Дата: Вторник, 09.04.2013, 23:04 | Сообщение № 2

Группа: Друзья

Ранг: Экселист

Сообщений: 5660

Репутация: 1163 ±

Замечаний: 0% ±

2010

[vba]

Код

Private Sub CommandButton1_Click()
     Sheets(1).Cells(Rows.Count, 1).End(xlUp).Offset(1) = Me.TextBox1
     ThisWorkbook.Worksheets.Add after:=Sheets(Sheets.Count)
     ActiveSheet.Name = Me.TextBox1
     Sheets(1).Activate
End Sub

[/vba]

Быть или не быть, вот в чем загвоздка!

Ответить

Ученик

Дата: Суббота, 13.04.2013, 14:11 | Сообщение № 3

Группа: Пользователи

Ранг: Новичок

Сообщений: 24

Репутация: 0 ±

Замечаний: 0% ±

Спасибо,то,что нужно!

Ответить

Страница 1 из 1
1