Убить елемент массива

Тема в разделе "Visual Basic", создана пользователем -, 1 сен 2008.

  1. Гость

    Работаю на VBA Excel и не нахожу в синтаксисе макросов в команде Erase тегов или команды FullTrim относительно массива.....как убить елемент массива с значением "".Подскажите плиз.
     
  2. Vlanib

    Vlanib Гость

    На сколько мне известно в VBA, впрочем как и в VB, нет собственных классов для работы с массивами,
    кроме Collection. Поэтому придется всё ручками.
    Вот, как один из вариантов, пример подобной сортировки с применением второго динамического массива:

    [codebox]
    Sub MyArr()
    Dim sOriginalArr(10) As String 'Массив для примера
    Dim sSortArr() 'Объявляем динамический массив
    Dim i As Integer, j As Integer
    For i = 0 To 9 'Заполняем массив для примера
    sOriginalArr(i) = Str(i)
    Next
    sOriginalArr(3) = "" 'Вот два пустых значения
    sOriginalArr(7) = ""
    For i = 0 To UBound(sOriginalArr)
    If Not sOriginalArr(i) = "" Then 'А вот сравнение в цикле с ""
    j = j + 1
    ReDim Preserve sSortArr(j) 'И инициализация динамич. массива
    sSortArr(j - 1) = sOriginalArr(i) 'уже сортированными значениями.
    End If
    Next
    End Sub
    [/codebox]
     
Загрузка...
Похожие Темы - Убить елемент массива
  1. Triton
    Ответов:
    8
    Просмотров:
    666
  2. savl
    Ответов:
    0
    Просмотров:
    1.436
  3. ToxaRat
    Ответов:
    0
    Просмотров:
    1.428
  4. Dragon108
    Ответов:
    11
    Просмотров:
    4.286
  5. yerke
    Ответов:
    5
    Просмотров:
    5.541

Поделиться этой страницей