powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / копирование и вставка
6 сообщений из 6, страница 1 из 1
копирование и вставка
    #34263351
mitis
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Во первых всем привет !
А теперь подробно о проблеме мне нужно скопировать данные из
одного документа и вставить их в уже открытый. Это я сделал
Workbooks.Open Filename:="C:\temp.xls"
Range("B1").Select
Selection.Copy
ActiveWindow.Close
Range("D8").Select
ActiveSheet.Paste
Но вся загвоздка в том что перед вставкой мне нужно
вставить строку .Т.Е.содержимое ячейки D8 должно быть
следующим "Бланк на выполнение№"+"данные из буфера"
На словах я знаю как это сделать нужно объявить переменную и поместить
туда данные из буфера а затем присвоить ячейки D8 значение
"Бланк на выполнение№"+"созданная переменная". Но мои познания VB не
позволяют мне этого сделать . Помогите пожалуйста !!!!!!!
...
Рейтинг: 0 / 0
копирование и вставка
    #34263493
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а если посте копирования добавить текст:
Код: plaintext
1.
...
Range("D8").value = "Бланк на выполнение № " & Range("D8").value
...
Рейтинг: 0 / 0
копирование и вставка
    #34263700
mitis
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
не пойму тоесть строку
Range("D8").Select
ActiveSheet.Paste
заменить на
Range("D8").Value = "Бланк на выполнение № " & Range("D8").Range("D8").Select
ActiveSheet.Paste
Но ведь тогда сначала вставляется Бланк на выполнение № , а затем уже заменяя ее
вставка из буфера. Или я не так понял ?
...
Рейтинг: 0 / 0
копирование и вставка
    #34263840
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
mitisне пойму тоесть строку
Range("D8").Select
ActiveSheet.Paste
заменить на
Range("D8").Value = "Бланк на выполнение № " & Range("D8").Range("D8").Select
ActiveSheet.Paste
Но ведь тогда сначала вставляется Бланк на выполнение № , а затем уже заменяя ее
вставка из буфера. Или я не так понял ?

ты все правильно понял, а я не удачно выразился, посте копирования и вставки, конечно
...
Рейтинг: 0 / 0
копирование и вставка
    #34263998
Фотография k-nike
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Нет. Судя по приведенному коду автора топика, он ничего не понял.
Ему нужно было тупо вставить ваш код:
Код: plaintext
Range("D8").value = "Бланк на выполнение № " & Range("D8").value
а он его зачем-то откорректировали на:
Код: plaintext
Range("D8").Value = "Бланк на выполнение № " & Range("D8").Range("D8").Select

img=http://www.sql.ru/forum/members/32779.gif]
...
Рейтинг: 0 / 0
копирование и вставка
    #34264189
mitis
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
спасибо огромное vbapro и K-nike все работает прекрасно просто с начала я
сделал не верно как и сказал K-nike . Ещё раз спасибо.
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / копирование и вставка
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]