2014-09-03 2 views
1

Я ищу способ доступа к VBA, чтобы установить обратную цветную метку, форму и т. Д. Как градиент. В настоящее время я применяю сплошные цвета, но надеялся, что есть способ сделать это с помощью градиента.Доступ к цвету градиента VBA для метки/формы

Вот как я в настоящее время применяют задний цвет в Access:

Label2.BackColor = RGB(119, 49, 65) 

Здесь был код, который я использую в Excel, чтобы заполнить ячейку как градиент, работал хорошо. Тем не менее, я точно не знаю, как будет работать Access VBA. Предложения указать мне в правильном направлении?

Range("D14").Select 
    With Selection.Interior 
    .Pattern = xlPatternLinearGradient 
    .Gradient.Degree = 0 
    .Gradient.ColorStops.Clear 
    End With 
    With Selection.Interior.Gradient.ColorStops.Add(0) 
    .Color = 2786997 
    .TintAndShade = 0 
    End With 
    With Selection.Interior.Gradient.ColorStops.Add(1) 
    .Color = 1447704 
    .TintAndShade = 0 
    End With 

ответ

1

A Ярлык не может иметь градиентный фон.

enter image description here

Если вы хотите установить градиент на кнопку, вы можете сделать это similar to before.

button.Gradient = 12 
+0

Какой облом. Ну, у меня есть способ обхода, я создал изображение, с градиентом, в котором я нуждался, превратил Видимый в «НЕТ» и включил изображение, когда нужно, через VBA. Я предполагаю, что это долгий путь для этого. Спасибо за ваше предложение! – Muhnamana

+1

Кнопка также может использоваться как ярлык так же хорошо, и она реагирует на изменения в вашей теме (если это происходит) и может быть легко изменена. Вам просто нужно убедиться, что цвета наведения/нажатия совпадают с нормальными цветами переднего/заднего фона, чтобы он не менял его внешний вид, когда кто-то взаимодействует с ним (потому что метки нет). У обоих есть текст, и у обоих есть события click (у кнопки просто много других событий) – Brad

+0

Невозможно изменить цвета градиента? Похож только на один градиент цвета. – Muhnamana

Смежные вопросы