Код VB для вставки в качестве значений и форматирования исходного кода

#excel #vba #blueprism

#преуспеть #vba #схема

Вопрос:

Я использую Blueprism для автоматизации процесса, который использует Excel. Мне нужно скопировать определенные ячейки и вставить в качестве значений и исходного форматирования. Я использую следующий код. После выполнения задания значения по-прежнему были формулами, а не значениями.

 Dim wb, excel, range As Object

Try

wb = GetWorkbook(Handle, Workbook)
excel = wb.Application

range = excel.Selection
range.PasteSpecial(Paste:=-4163, SkipBlanks:=False, Transpose:=False)
range.PasteSpecial(Paste:=-4122, SkipBlanks:=False, Transpose:=False)

Success = True

Catch e As Exception
Success = False
Message = e.Message
Finally
wb = Nothing
range = Nothing
End Try
 

Ответ №1:

Если вы хотите вставить значения и числовые форматы, это должно быть Paste:=12.

Для значений вставки это Paste:= -4163.

Вставить:=13 означает «вставить все, используя исходную тему».

Для вставки значений и всего форматирования:

 range.PasteSpecial(Paste:=-4163)
range.PasteSpecial(Paste:=-4122)
 

Комментарии:

1. Можете ли вы дать мне код, который будет копировать кнопку внешнего интерфейса для вставки в качестве значений и форматирования исходного кода? Разве это не немного отличается от вставки значений и числовых форматов?

2. Вы имеете в виду, что хотите вставить все форматирование? Если вы это сделаете, то это 2-этапная операция — сначала вставьте значения (вставьте: = -4163), затем вставьте форматирование (вставьте: = -4122) — я обновлю свой ответ.

3. Спасибо, я не могу проверить, пока ресурс не освободится, но примет ответ при тестировании

4. К сожалению, это не копирование и вставка спарклайнов. Есть ли что-то еще, необходимое для обработки этого?