как открывать файл (с импортом текста), чтобы его имя зависело от переменной
If x = 1 then Open App.Path + "\1.txt" For Input As #1
If x = 2 then Open App.Path + "\2.txt" For Input As #1
Этот код работает, но при большом количестве файлов (имена которых соответствуют ЗНАЧЕНИЮ ПЕРЕМЕННОЙ), удобней было бы открывать примерно так (но так чтоб работало):
Если "х" чему-то там равен, то открыть файл с именем = его значению
Open App.Path + "\"Х".txt" For Input As #1