Страница 1 из 1
Control 2 Данные в ячейку Excel
Добавлено: 04 авг 2009, 12:18
kuznetsovSergey
ЛЮДИ ПОМОГИТЕ КАК ЭТО СДЕЛАТЬ, уверен вы знаете как сделать это быстро и просто.
Скачать файл .xls
Re: Control 2 Данные в ячейку Excel
Добавлено: 04 авг 2009, 16:16
EducatedFool
Попробуйте такой вариант: (без удаления контролов, копирование данных в соседнюю ячейку)
уверен вы знаете как сделать это быстро и просто
Да, знаем. А Вы, наверное, задаётесь вопросом, почему Вам не ответили в предыдущей теме?
На самом деле всё просто - задание сформулировано недостаточно ясно...
Вот ещё один вариант (с удалением, то, что Вы просили)
Код: Выделить всё
[color=darkblue]Option[/color] [color=darkblue]Compare[/color] [color=darkblue]Text[/color]
[color=darkblue]Sub[/color] ПереносЗначений()
[color=darkblue]On[/color] [color=darkblue]Error[/color] [color=darkblue]Resume[/color] Next: Application.ScreenUpdating = [color=darkblue]False[/color]
[color=darkblue]For[/color] [color=darkblue]Each[/color] HTMLText [color=darkblue]In[/color] ActiveSheet.OLEObjects
[color=darkblue]If[/color] TypeName(HTMLText.Object) = "HTMLText" [color=darkblue]Then[/color]
HTMLText.TopLeftCell = HTMLText.Object.Value
HTMLText.Delete
[color=darkblue]End[/color] [color=darkblue]If[/color]
[color=darkblue]Next[/color]
[color=darkblue]End[/color] [color=darkblue]Sub[/color]
Re: Control 2 Данные в ячейку Excel
Добавлено: 06 авг 2009, 16:48
kuznetsovSergey
АААА мега круто !! ОГРОМНОЕ СПАСИБО !!
работает всё как часы
Re: Control 2 Данные в ячейку Excel
Добавлено: 07 авг 2009, 07:08
Romashka
Проблема следующая. Веду учет ГСМ в таблице Excel. Таблица прислана с другого предприятия. Там в поле "остаток бензина" забито ограничение и если остаток превышает пределы бака, то эта графа выделяется красным. Скажите, как сделать чтобы красноты не было вообще? Можно ли как то убрать эти ограничения? Заранее спасибо
Re: Control 2 Данные в ячейку Excel
Добавлено: 07 авг 2009, 11:11
Teslenko_EA
Здравствуйте Romashka.
"сделать чтобы красноты не было..." - в Вашем случае думаю можно изменив Условное форматирование "краснеющих" ячеек (в Excel 2003 меню Формат / Условное форматирование...)
Если Вы действительно хотите получать помощь, создавайте свой вопрос.
Евгений.
Re: Control 2 Данные в ячейку Excel
Добавлено: 07 авг 2009, 12:28
Romashka
[quote="Teslenko_EA"]Здравствуйте Romashka.
"сделать чтобы красноты не было..." - в Вашем случае думаю можно изменив Условное форматирование "краснеющих" ячеек (в Excel 2003 меню Формат / Условное форматирование...)
Если Вы действительно хотите получать помощь, создавайте свой вопрос.
Евгений.[/QUO
Спасибо огромное! ПОМОГЛО!!!!!