|
|
|
Версия MS Excel
|
|||
|---|---|---|---|
|
#18+
Есть ли фукция VBA, которая определяет версию русская/английская excel. Хочется чтобы код вида работал на всех компах i = 0 For D = d1 To d2 - 1 sh_to.Cells(i + RowHeaderOffest, 1).Value = d1 + i sh_to.Cells(i + RowHeaderOffest, 2).FormulaR1C1 = "=VLOOKUP(RC[-1],eur!C1:C2,2)" sh_to.Cells(i + RowHeaderOffest, 3).FormulaR1C1 = "=VLOOKUP(RC[-2],usd!C1:C2,2)" sh_to.Cells(i + RowHeaderOffest, 7).FormulaR1C1 = "=SUM(RC[-3],RC[-1]/RC[-4],RC[-2]*RC[-5]/RC[-4])" i = i + 1 Next D или есть более красивый вариант вывода формул на лист через VBA?? Заранее спасибо! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 03.05.2006, 16:02:27 |
|
||
|
Версия MS Excel
|
|||
|---|---|---|---|
|
#18+
По-моему, для этого достаточно использовать свойства .FormulaLocal .FormulaR1C1Local Т.е. код Код: plaintext ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 03.05.2006, 17:06:12 |
|
||
|
|

start [/forum/topic.php?fid=61&msg=33704509&tid=2184914]: |
0ms |
get settings: |
5ms |
get forum list: |
9ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
361ms |
get topic data: |
8ms |
get forum data: |
2ms |
get page messages: |
36ms |
get tp. blocked users: |
1ms |
| others: | 201ms |
| total: | 629ms |

| 0 / 0 |
