powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Совместить формат и значения
6 сообщений из 6, страница 1 из 1
Совместить формат и значения
    #34531786
Loyso
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
День всем добрый!
Проблема возникло. Есть три листа - на одном "2" шаблон строк (строки могут быть нескольких видов - цвет, толщина, объединение и прочее), на втором листе "3" - набор данных ( тех самых строк, с указанием типа строки для соотнесения с шаблоном), на третьем листе "1" это надо объединить.

Как я это делал бы, если бы не надеялся что есть более удобный способ:

Пробегал бы по строкам с данными ("3") и в соответствии с типом строки копировал бы из "2" шаблон строки, потом пастил бы его в "1", потом заполнял поячеечно. Работать будет, хоть и медленно.

НО!!!
Есть подозрение, что можно сделать следующим образом:

Пробегаем по "3", копируем соответствующтие строке шаблоны из "2" в "1", а потом копируем все данные из "3" из пастим их райнжем, а не поячеечно! Супер! Одно "но" - потрется формат. Подкажите плиз, как можно скопипастить данные через VBA, не затрагивая формат того места, куда пастишь.

Обязательное условие:
Лист "2" и "3" после обработки должны быть пустыми. Остается только лист "1".

Надеюсь, что я понятно объяснил.

Заранее всем спасибо.

(короче говоря, нужен быстрый алгоритм - данных может быть очень много - поячеечная вставка займет уйму времени)
...
Рейтинг: 0 / 0
Совместить формат и значения
    #34531938
12345
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
LoysoПодкажите плиз, как можно скопипастить данные через VBA, не затрагивая формат того места, куда пастишь.


Pastes a Range from the Clipboard into the specified range.

Код: plaintext
expression.PasteSpecial(Paste, Operation, SkipBlanks, Transpose)

expression Required. An expression that returns a Range object.

Paste Optional XlPasteType. The part of the range to be pasted.

XlPasteType can be one of these XlPasteType constants.
xlPasteAll default
xlPasteAllExceptBorders
xlPasteColumnWidths
xlPasteComments
xlPasteFormats
xlPasteFormulas
xlPasteFormulasAndNumberFormats
xlPasteValidation
xlPasteValues
xlPasteValuesAndNumberFormats

Operation Optional XlPasteSpecialOperation. The paste operation.

SkipBlanks Optional Variant. True to have blank cells in the range on the Clipboard not be pasted into the destination range. The default value is False.

Transpose Optional Variant. True to transpose rows and columns when the range is pasted.The default value is False.

То есть для вставки только значений - при вставке используйте пераметр xlPasteValues - только значения.
...
Рейтинг: 0 / 0
Совместить формат и значения
    #34532144
Loyso
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо
Сейчас попробую
...
Рейтинг: 0 / 0
Совместить формат и значения
    #34533059
Loyso
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Фигушки:(.
У меня в формате некоторые ячейки объединены и когда я пытаюсь положить строку к примеру


/Вася/Пупкин/___________ /дворник/

В формат типа
/имя_/_____фамилия__/_____ должность__ /
/____/______________/_______________/

То он ругается, что ячейки должны быть одинаковыми по размеру...
Что делать? объединять в исходнике или ещё параметры какие есть?
Прим: два непустых значения в одну объединенную ячейку не пытаюсь загнать...
...
Рейтинг: 0 / 0
Совместить формат и значения
    #34533355
12345
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А нельзя вначале скопировать нужный формат, а затем скопировать только значения?
...
Рейтинг: 0 / 0
Совместить формат и значения
    #34533944
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
зачем копировать, используй значение ячейки
Код: plaintext
[TargetCell].Value = [SourceCell].Value
потом очисти содержимое всего листа
Код: plaintext
Cells.ClearContents
кроме этого, для ускорения, вот посмотри этот топик
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Совместить формат и значения
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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