Как распечатать значения, полученные мной из цикла на другом листе, на другой лист

Привет, ниже мой код, который я работаю с excel vba, и у меня есть значения, которые мне нужны, но я не могу их распечатать.

Вот некоторые значения, которые я получил:

117388 "Наименование продукта" 5_PETØFLAT1,5

111388 "Наименование продукта" 5_PETØFLAT1,5

И с помощью cicle in array (значения masyvas wit, такие как 117388), я получил другие значения wit для cicle from table inother на другом примере «akcijos» ниже, и мне нужно напечатать некоторые из этих значений, например, от 1-4 ниже «Product Name» в 2 столбец в отдельных строках, а затем другие 5-7 ниже другого «названия продукта», и в конце мне нужно сгруппировать строку имени Produc и 1-4 строки ниже, которые были напечатаны.

  1. Palink
  2. RIMI LIETUVA
  3. ŠIAULIŲ TARA
  4. Palink
  5. AIBĖS LOGISTIKA
  6. AIBĖS LOGISTIKA
  7. RIMI LIETUVA

    Dim lastrow2 As Integer Dim masyvas() As Variant Dim x As Integer Dim laikas As Date Dim laikas2 As Date Dim y As Integer Dim prekeskodas As String Dim m As Integer Dim z As Integer Dim s As Integer Dim rng As Range lastrow2 = grafikas.Cells(Rows.Count, 2).End(xlUp).Row For z = 6 To lastrow2 ReDim Preserve masyvas(z) masyvas(z) = grafikas.Cells(z, 2).Value Next z For i = LBound(masyvas) To UBound(masyvas) prekeskodas = masyvas(i) For m = 2 To lastrow If akcijos.Cells(m, 8) >= laikas And akcijos.Cells(m, 8) <= laikas2 Then If prekeskodas = akcijos.Cells(m, 4) Then Sheets("grafikas").Cells(z, 3) = akcijos.Cells(m, 3) z = z + 1 End If End If Next m Next i 

    End Sub

  • Добавление в строковый массив в алфавитном порядке
  • Макро - сортировка нескольких уровней по имени столбца
  • Excel VBA Как Excel сортирует повторяющиеся значения?
  • Как я могу упорядочить / отсортировать сводную таблицу на основе содержимого DataField PivotField?
  • Excel, показывающий набор строк на основе определенного значения
  • Сортировка динамического диапазона по столбцам, хранящимся в массиве как переменные
  • Как найти наименьшие значения в диапазоне AutoFiltered?
  • Перемещение последовательно через диапазон дат
  • Сортировка одного столбца в excel по отношению к другому
  • Сортировка по цвету ячейки в Excel с использованием C #
  • Как сделать объединение двух столбцов, а затем отсортировать их в третьем столбце в Excel?
  • Interesting Posts

    Удалить средние символы (миллисекунды)

    Может ли соединение данных Excel заблокировать таблицу БД?

    Excel: создайте поле перед сохранением, но позвольте мне сохранить пустую форму

    Excel VBA. Есть ли способ иметь несколько диапазонов на одном листе, которые допускают разные события двойного щелчка?

    Использование словаря (хеширование) в VBA

    Изменение диапазона разрывов Sub

    Более быстрый эквивалент функции рабочего листа. Очистить

    Объединить данные в новую ячейку, если совпадают другие ячейки

    Код, не перемещающийся по листам

    как выбрать конкретный столбец после импорта csv

    Защитить файл excel с помощью java

    Как удалить пробел и символы в столбце

    Код VBA, который объединяет букву и переменную для создания ссылки на ячейку

    Подсчет, если несколько столбцов имеют несколько критериев

    Функции дают ошибку только в макро-вызванном диалоге

    Давайте будем гением компьютера.