|
|
|
Данные из Combobox в ячейку Excel
|
|||
|---|---|---|---|
|
#18+
Подобная но более сложная проблема: Есть 2 Combobox на одной форме, и несколько Textbox. Имеем книгу с проименованными листами На каждом из которых располагается одинаковая таблица. За выбор листов отвечает Combobox1 и тут все просто: Private Sub ComboBox1_Change() Sheets(ComboBox1.ListIndex + 1).Select End Sub Private Sub UserForm_Initialize() Dim n As Long n = Sheets.Count For i = 1 To n ComboBox1.AddItem Sheets(i).Name Тут все просто _________________________________________________ значения Combobox2 прописаны так: ComboBox2.AddItem "3-экипаж" ComboBox2.AddItem "4-экипаж" ComboBox2.AddItem "5-экипаж" ComboBox2.AddItem "6-экипаж" ComboBox2.AddItem "7-экипаж" ComboBox2.AddItem "8-экипаж" Эти данные должны вставляться при выборе в столбец "B" при чем ячейка там на прямую зависит от последнего заполненного столбца "С" другими словами Постановка в столбец "В" начинается с .Cells(Rows.Count, "C").End(xlUp).Row +1, Примерно так только не знаю как должен выглядеть этот алгоритм в сборе и +1 я поставил сам оно где то там должно быть но где не знаю ПЛЗ соберите все в кучу весь нет перешерстил но ни как, а сам не силен! Заранее спасибо! "С УВАЖЕНИЕМ МЫШОВСКИЙ" ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.06.2012, 11:36 |
|
||
|
|

start [/forum/topic.php?fid=60&tid=2157680]: |
0ms |
get settings: |
11ms |
get forum list: |
13ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
34ms |
get topic data: |
11ms |
get forum data: |
2ms |
get page messages: |
27ms |
get tp. blocked users: |
2ms |
| others: | 13ms |
| total: | 121ms |

| 0 / 0 |

Извините, этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
... ля, ля, ля ...