Nano Hash - криптовалюты, майнинг, программирование

Печать VBA .SelectedItem с помощью MsgBox

Я пытаюсь напечатать выбранное имя файла для целей отладки, используя простой MsgBox. msoFileDialogOpen позволяет пользователю выбрать файл. Я пытаюсь напечатать имя файла выбранного файла.

'   Start File Explorer to select file containing data
Dim lngCount As Long
' Open the file dialog
With Application.FileDialog(msoFileDialogOpen)
    .AllowMultiSelect = True
    .Show

'   Display paths of each file selected
    For lngCount = 1 To .SelectedItems.Count
        MsgBox .SelectedItems
    Next lngCount
End With

Когда я запускаю это, я получаю сообщение об ошибке «Ошибка времени выполнения« 450 »: неправильное количество аргументов или неверное назначение свойства».

excel vba excel-2010
19.06.2015

Ответы:


1

Похоже, ваше окно сообщений пытается отобразить всю коллекцию (.SelectedItems), а не по одному (.SelectedItems(lngCount)). Это работает, если вы поставите это?

For lngCount = 1 To .SelectedItems.Count
    MsgBox .SelectedItems(lngCount)
Next lngCount

Или проще, это тоже может сработать:

For Each filename In .SelectedItems
    MsgBox filename
Next
19.06.2015

2

.SelectedItems нельзя отобразить напрямую (поскольку его нельзя преобразовать в текстовую строку), поэтому MsgBox .SelectedItems недействителен.

Чтобы отобразить конкретный выбранный элемент, используйте MsgBox .SelectedItems(lngCount)

19.06.2015

3

Вы пытались отобразить Collection (selecteditemS), а MsgBox принимает только String.

Просто переключитесь на строку ниже:

MsgBox .SelectedItems(lngCount)
19.06.2015
Новые материалы
Кластеризация: более глубокий взгляд
Кластеризация — это метод обучения без учителя, в котором мы пытаемся найти группы в наборе данных на основе некоторых известных или неизвестных свойств, которые могут существовать. Независимо от..
Как написать эффективное резюме
Предложения по дизайну и макету, чтобы представить себя профессионально Вам не позвонили на собеседование после того, как вы несколько раз подали заявку на работу своей мечты? У вас может..
Частный метод Python: улучшение инкапсуляции и безопасности
Введение Python — универсальный и мощный язык программирования, известный своей простотой и удобством использования. Одной из ключевых особенностей, отличающих Python от других языков, является..
Как я автоматизирую тестирование с помощью Jest
Шутка для победы, когда дело касается автоматизации тестирования Одной очень важной частью разработки программного обеспечения является автоматизация тестирования, поскольку она создает..
Работа с векторными символическими архитектурами, часть 4 (искусственный интеллект)
Hyperseed: неконтролируемое обучение с векторными символическими архитектурами (arXiv) Автор: Евгений Осипов , Сачин Кахавала , Диланта Хапутантри , Тимал Кемпития , Дасвин Де Сильва ,..
Понимание расстояния Вассерштейна: мощная метрика в машинном обучении
В обширной области машинного обучения часто возникает необходимость сравнивать и измерять различия между распределениями вероятностей. Традиционные метрики расстояния, такие как евклидово..
Обеспечение масштабируемости LLM: облачный анализ с помощью AWS Fargate и Copilot
В динамичной области искусственного интеллекта все большее распространение получают модели больших языков (LLM). Они жизненно важны для различных приложений, таких как интеллектуальные..