Конкатенация 2 ячеек от Листа 1 до 1 ячейки Листа 2

РЕДАКТИРОВАТЬ: нашел случайный код, который сбросил его. Спасибо всем!

Я пытался выяснить код для объединения

Worksheets("Sheet1").Range ("B2:C2")

к этой ячейке ссылки с символом " - " в качестве разделителя:

Worksheets("Sheet2").Range ("B2")

Я пробовал следующее, но там написано "индекс вне диапазона":

Worksheets("Sheet2").Range("B2").Cell.Value = 
  Worksheets("Sheet1").Range("B2").Cell.Value & 
    Worksheets("Sheet1").Range("C2").Cell.Value

Я также пробовал это, но он только копирует Sheet1.C2 в Sheet2.C2:

Set sourceRange = Worksheets("Sheet1").Range("B2:C2")
Set targetRange = Worksheets("Sheet2").Range("B2")

sourceRange.Copy
targetRange.PasteSpecial Paste:=xlPasteValues

Любая помощь в этом будет оценена. Заранее спасибо!

Источник

1 ответ

Решение

У вас есть дополнительные cells

Worksheets("Sheet2").Range("B2").Value = Worksheets("Sheet1").Range("B2").Value & Worksheets("Sheet1").Range("C2").Value

Должно сработать.

Источник
Другие вопросы по тегам