Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 27.01.2014, 18:38   #1
bel62
Пользователь
 
Регистрация: 20.07.2012
Сообщений: 17
По умолчанию Функция скопирования значений ячейки

Подскажите, как правильно будет выглядеть макрос на языке VBS.
Имеются 2 ячейки "А2" и "А3". В обоих ячейках есть данные.
Нужна Функция скопирования значений ячейки "А2" и вставка в ячейку "А3" с сохранением данных в "А3", то есть дополнить
"А3" данными из "А2".
bel62 вне форума Ответить с цитированием
Старый 27.01.2014, 19:06   #2
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

VBS или всёж VBA?
А то могу вечером и vbs предоставить - там всё. Есть такой UsingExcel.vbs
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 27.01.2014, 19:13   #3
bel62
Пользователь
 
Регистрация: 20.07.2012
Сообщений: 17
По умолчанию

Цитата:
Сообщение от Hugo121 Посмотреть сообщение
VBS или всёж VBA?
А то могу вечером и vbs предоставить - там всё. Есть такой UsingExcel.vbs
VBS
Вот примерно такой:
ObjExcel.Range("Y3").Value = ObjExcel.Range("C8").Value
bel62 вне форума Ответить с цитированием
Старый 27.01.2014, 19:22   #4
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Через пару часов файл прикреплю.
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 27.01.2014, 19:36   #5
bel62
Пользователь
 
Регистрация: 20.07.2012
Сообщений: 17
По умолчанию

Цитата:
Сообщение от Hugo121 Посмотреть сообщение
Через пару часов файл прикреплю.
Услуга- сколько будет стоит?
bel62 вне форума Ответить с цитированием
Старый 27.01.2014, 19:55   #6
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

не понял о чем Вы, но пробуйте этот
Код:
ObjExcel.Range("A3").Value = ObjExcel.Range("A3").Value + ObjExcel.Range("A2").Value
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 27.01.2014, 20:39   #7
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Не понял - что сколько стоит? Какая услуга?
Вот файл - ковыряйтесь. Где-то что-то может не работать, не моё
Вложения
Тип файла: rar UsingExcel.rar (2.3 Кб, 10 просмотров)
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 27.01.2014, 21:30   #8
bel62
Пользователь
 
Регистрация: 20.07.2012
Сообщений: 17
По умолчанию

Цитата:
Сообщение от IgorGO Посмотреть сообщение
не понял о чем Вы, но пробуйте этот
Код:
ObjExcel.Range("A3").Value = ObjExcel.Range("A3").Value + ObjExcel.Range("A2").Value
Спасибо. Скрипт правильный-вопрос решил.
bel62 вне форума Ответить с цитированием
Старый 28.01.2014, 08:45   #9
bel62
Пользователь
 
Регистрация: 20.07.2012
Сообщений: 17
По умолчанию

Цитата:
Сообщение от IgorGO Посмотреть сообщение
не понял о чем Вы, но пробуйте этот
Код:
ObjExcel.Range("A3").Value = ObjExcel.Range("A3").Value + ObjExcel.Range("A2").Value
Яндекс -100
bel62 вне форума Ответить с цитированием
Старый 28.01.2014, 11:43   #10
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

Спасибо!

принято.
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Функция скопирования ячейки bel62 Microsoft Office Excel 2 20.07.2012 21:32
Автоподстановка значений в ячейки таблицы allaire Microsoft Office Excel 1 10.05.2012 19:15
Много значений одной ячейки Rost93 PHP 27 02.10.2011 22:42
Несколько значений одной ячейки Larryes Microsoft Office Excel 3 02.12.2010 13:30
растягивание значений без формата ячейки marc-nikita Microsoft Office Excel 3 08.12.2009 11:24