2016-06-30 2 views
0

Можно ли определить верхний регистр с функцией?Vba Excel Могу ли я перейти на верхний регистр с помощью функции?

Я попробовал несколько вариантов, но ни один не работает:

With Worksheets("CONTROL SCHEDULE").Range("A7:N7") 
    .Font.FontStyle = "Bold" 
    .Value = UCase(.Value) 
End With 
+0

Я хочу диапазон A7: N7 - буквы верхнего регистра. Было надеяться, что это можно было определить в функции «С», поэтому я могу легко добавить его в несколько мест в моем коде. Похоже, мне лучше сделать отдельную строку кода. – Ida

ответ

1

UCase не будет работать на массиве, как это. Вы можете использовать Evaluate:

With Worksheets("CONTROL SCHEDULE").Range("A7:N7") 
    .Font.FontStyle = "Bold" 
    .Value = .Worksheet.Evaluate("INDEX(UPPER(" & .address & "),)") 
End With 
+0

Спасибо. Этот код только добавил текст «ВЕРХНИЙ» в ячейке N7. Как я могу изменить всю строку? – Ida

+0

Этот код мог бы сделать только это, если бы у N7 уже было слово «верхний». – Rory

+0

У меня был еще один код, который менял обратно. БЛАГОДАРЯ :) – Ida