Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Dictionary длина ключа - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Dictionary длина ключа (Макросы/Sub)
Dictionary длина ключа
Glen Дата: Суббота, 20.04.2024, 08:36 | Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 94
Репутация: 10 ±
Замечаний: 0% ±

Excel 2010-16
Всем доброго дня.
Прошу подсказать какое ограничение по длине у ключа в словаре Dictionary. Есть подозрение, что оно существует и что оно 250 символов


Пехаль киндриков куравь, пехаль киндриков лузнись.
 
Ответить
СообщениеВсем доброго дня.
Прошу подсказать какое ограничение по длине у ключа в словаре Dictionary. Есть подозрение, что оно существует и что оно 250 символов

Автор - Glen
Дата добавления - 20.04.2024 в 08:36
wild_pig Дата: Суббота, 20.04.2024, 23:19 | Сообщение № 2
Группа: Проверенные
Ранг: Обитатель
Сообщений: 517
Репутация: 97 ±
Замечаний: 0% ±

2003, 2013
[vba]
Код
Sub uuu()
Dim i&
Dim k$
'--------------
    With CreateObject("Scripting.Dictionary")
        For i = 1 To 500
            k = k & 1
            .Item(k) = Len(k)
        Next
        Cells(1, 1).Resize(.Count, 2) = WorksheetFunction.Transpose(Array(.Items, .Keys))
    End With
End Sub
[/vba]
может быть и больше
 
Ответить
Сообщение[vba]
Код
Sub uuu()
Dim i&
Dim k$
'--------------
    With CreateObject("Scripting.Dictionary")
        For i = 1 To 500
            k = k & 1
            .Item(k) = Len(k)
        Next
        Cells(1, 1).Resize(.Count, 2) = WorksheetFunction.Transpose(Array(.Items, .Keys))
    End With
End Sub
[/vba]
может быть и больше

Автор - wild_pig
Дата добавления - 20.04.2024 в 23:19
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Dictionary длина ключа (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!