Обозначить переменную при использовании оператора With - VBA

Узнай цену своей работы

Формулировка задачи:

Всем здравствуйте. Пытаюсь в VBA написать код, чтобы при определенных значениях переменных "Н" и "L" прописывался текст "VL" или "Gr" либо ничего. В VBA делаю первые шаги, по этому прошу помощи. Часть кода:

Решение задачи: «Обозначить переменную при использовании оператора With»

textual
Листинг программы
Dim Н As Integer
    Set Н = ActiveLayer.CreateArtisticText()
 
With Н ActiveLayer.CreateArtisticText(n1 + (x1 + k) / 2, n2 - t2 - x3 - k * 2 - l * 2 - (hz / 3 * 1.35) + hotst, x1 + k - 1, cdrRussian, cdrCharSetRussian, _
         "Arial", hz, Bold:=cdrFalse, Italic:=cdrTrue, Underline:=cdrNoFontLine, _
         Alignment:=cdrCenterAlignment)
      .Fill.ApplyUniformFill CreateCMYKColor(0, 0, 0, 100)
  End Withh

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

10   голосов , оценка 4 из 5
Похожие ответы