Excel Text Alignment

1 отговора 66 прегледа
#1

Excel Text Alignment

Моля Ви, кажете как да определям alignment-а на съдържанието на клетките в Excel от VB?
и как да задавам стойността на една конкретна клетка да бъде пресметната по определена формула(функция)(Avarage примерно)?

Thanks a Lot !


Отговор
в отговор на Coso #2

Re: Excel Text Alignment

Може да има и по-добър начин, но ето един:

Dim ws1 As Worksheet
Set ws1 = Sheet1

' а взема мин(а1,а2)
а=WorksheetFunction.Min(A1, A2)
' центрира клетка (1,1)
ws1.Cells(1, 1).HorizontalAlignment = xlCenter


N
Отговор