Страницы: 1
RSS
Ссылку на Range() записать переменными
 
Подскажите как правильно вписать переменные в Range():
Код
Dim A As String                'буква
Dim B As String                'буква
Dim C As Integer             'цифра
Dim D As Integer             'цифра

 
Private Sub UserForm_Initialize()
        A = a
        B = b
        C = 4
        D = 10
    ListBoxZTV.List = Worksheets("ZatDt4").Range("?:?").Value
End Sub

Private Sub ListBoxZTVs_Click()

        If ListBoxZTVs.Text = "Корпус" Then
        A = b
        B = c
        End If
End Sub
 
Код
 ListBoxZTV.List = Worksheets("ZatDt4").Range(a & c & ":" & b & d).Value
 
Код
ListBoxZTV.List = Worksheets("ZatDt4").Range(A & C & ":" & B & D).Value

Никогда не встречал, чтобы адрес диапазона формировался полностью переменными. Почему у Вас именно так? Возможно, есть решение оптимальнее...
 
Осталось неизвестным что в публичных переменных a и b... :)
 
при этом А и В - явно русскими записано...
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
Точно, не обратил внимания :)
Исправим ситуацию: A = "a" или a = "A"
 
важно еще понимать, что конструкция
       A = a
это не присвоить переменной А значение "а"
так же как и здесь:
       B = b это не В = "b"
и вообще редактор Вам явно напишет и А, и В с обеих сторон от знака равно либо прописными, либо строчными, но одинаковыми

и в итоге вся эта конструкция рухнет при А и В = 0, или по ошибке 13 "не соответствие типов".
хотя... конечно это могут быть разные переменные кириллические А и В и латинские а и b. но такой стиль программирования -  это если нужно кому голову заморочить, а себе-то зачем создавать эти трудности?
Изменено: Ігор Гончаренко - 26.09.2016 10:37:49
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Страницы: 1
Читают тему
Наверх