есть ли какая-либо команда, эквивалентная readline в vba?

Question

Есть ли команда, эквивалентная readLine Java в VBA. Я хочу использовать ввод текста в непосредственном окне и поместить его в переменную. Возможно ли это?

Answer 1

Я не совсем уверен, почему вам нужно писать из Immediate Window в переменную во время выполнения - это некоторые странные методы отладки?

Обычно, если вам нужно взять ввод, вы получите форму для взаимодействия с пользователем.

Однако, если вам нужно записать в переменную на время выполнения необходимо учитывать следующее:

Sub Main() 

    Dim immediateInput As String 
    Dim readImmediate As Boolean 
    Do While (readImmediate = False) 
     readImmediate = True 
    Loop 

End Sub 

теперь установить контрольную точку на линии readImmediate = true и добавить immediateInput в Дозоре. Поднимите оба окна и часы и запустите макрос.

Когда среда попадает в точку останова, введите ниже в окне Immediate:

immediateInput = "hello world"

Теперь посмотрим в часы; ваше значение immediateInput должно быть "hello world".

Answer 2

Вы не можете использовать окно проверки в интерактивном режиме. Во-первых - во время работы подпрограммы он не будет принимать никаких ввода с клавиатуры. Тем не менее, вы можете использовать его для передачи данных суб или функции при его вызове, поэтому в некотором смысле вы можете «скопировать» данные, которые уже есть. Что-то вдоль этих линий:

Sub AddNums(ParamArray nums()) 
    Dim total As Double 
    Dim i As Long 
    For i = 0 To UBound(nums) 
     total = total + nums(i) 
    Next i 
    Debug.Print total 
End Sub 

Например:

Кроме того - вы можете переместить входную фазу сбора в сценарий VBScript работает в консольном режиме, вызовите его из VBA, и используйте либо файл (который пишет сценарий), либо, возможно, буфер обмена, чтобы получить данные из сценария после его запуска. Это должно быть осуществимо, хотя, вероятно, лучше найти более идиоматический (основанный на форме) способ сделать это в VBA.