Я делал код для VBA и задавался вопросом, почему я получил ошибку времени выполнения 1004 при попытке вставить в листы "Datasheet". Это говорит мне, что информация не может быть вставлена, поскольку область копирования и область вставки не имеют одинаковый размер и форму.

Есть ли способ обойти это?

If (Not (rowmatched) And k = referencesheetcols) Then
    range2.Copy
    Sheets(referencesheetname).Range("a1:a6000").Cells(p, 1).Offset(2, 0).Select
    ActiveSheet.Paste
    p = p + 1
    Sheets("Datasheet").Activate
    ActiveSheet.Cells(q, 1).Offset(2, 1).Select
    ActiveSheet.Paste
    q = q + 1
End If

Next
End If
Next
|источник

1 ответ1

0

Быстрый ответ: Решено с помощью изменения размера для целевых клеток.

|источник

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .