Поиск кода для извлечения данных из столбца A, когда любая ячейка в столбце B через H не равна нулю

Question

Поиск кода для извлечения данных из столбца A, когда любая ячейка в столбце B через H не равна нулю

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

Для вашей проблемы, я думаю, вы правы. Группа контейнеров не может быть обновлена. Чтобы изменить существующую группу, вам нужно удалить и воссоздать ее.

Существуют некоторые другие ограничения в группе контейнеров, вы можете получить более подробную информацию о контейнере в Azure из этой ссылки , также о группе контейнеров.

-3

excel vba

задан Pᴇʜ 21 January 2019 в 07:47

1 ответ

Другие вопросы по тегам:

excel vba

Похожие вопросы:

score 0 · Answer 1

Этот код должен делать то, что вы хотите. Он определяет наличие целых чисел в диапазоне B: AH с помощью функции рабочего листа COUNT ().

Private Sub CountIntegers()

    Dim Arr As Variant                  ' output array
    Dim Rng As Range
    Dim Rl As Long                      ' last row
    Dim R As Long                       ' row counter
    Dim i As Long                       ' index of Arr

    With ActiveSheet
        Rl = .Cells(.Rows.Count, "A").End(xlUp).Row
        ReDim Arr(1 To Rl)
        For R = 2 To Rl                 ' assuming row 1 to have headers
            Set Rng = Range(.Cells(R, "B"), .Cells(R, "AH"))
            If Application.Count(Rng) Then
                i = i + 1
                Arr(i) = .Cells(R, "A").Value
            End If
        Next R
    End With

    ReDim Preserve Arr(i)
    ' specify the output sheet here:-
    Set Rng = Worksheets("Sheet2").Cells(2, 1).Resize(i)
    Rng.Value = Application.Transpose(Arr)
End Sub