|
|
|
Код из макроса в Excel перевести в VFP9
|
|||
|---|---|---|---|
|
#18+
Код на Visual Basic Rows("5:17").Select Selection.Sort Key1:=Range("H5"), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal Range("B2").Select Нужно перевести в код VFP9 P.S.: сортировка в Excel код взят из макроса написанного на VB должен выполнятся средствами VFP9 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.01.2006, 10:56 |
|
||
|
Код из макроса в Excel перевести в VFP9
|
|||
|---|---|---|---|
|
#18+
Тут почитай ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.01.2006, 11:23 |
|
||
|
Код из макроса в Excel перевести в VFP9
|
|||
|---|---|---|---|
|
#18+
Hi Vitalь! Посмотри в хелпе по VBA синтаксис данного метода - там указан не только "именованный" (который не поддерживается фоксом), но и "порядковый" синтаксис вызова любого метода. В частности для Sort это будет: (Key1, Order1, Key2, Type, Order2, Key3, Order3, Header, OrderCustom, MatchCase, Orientation, SortMethod, DataOption1, DataOption2, DataOption3) Соответственно из фокса синтаксис вызова метода для твоего примера такой: m.loSheet.Rows("5:17").Sort(m.loSheet.Cells(5, 8),1,,,,,,0,1,.F.,1,,0) Если у тебя есть файл констант Excel-я, и он будет подключен через #INCLUDE то вместо числовых значений констант можно оставить их символьные имена (те что xl*) Работать с Selection я бы не советовал - всегда есть возможность напрямую указывать в каком диапазоне должен работать тот или иной метод (как я и показал выше). Единственное полезное применение метода Select() - это в самом конце формирования листа установить текущую (выделенную) ячейку - и то если это реально необходимо. Posted via ActualForum NNTP Server 1.3 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.01.2006, 21:46 |
|
||
|
|

start [/forum/topic.php?fid=41&msg=33478303&tid=1592618]: |
0ms |
get settings: |
6ms |
get forum list: |
14ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
177ms |
get topic data: |
8ms |
get forum data: |
2ms |
get page messages: |
38ms |
get tp. blocked users: |
1ms |
| others: | 218ms |
| total: | 468ms |

| 0 / 0 |
