|
|
|
Правильный синтаксис в VBA
|
|||
|---|---|---|---|
|
#18+
Привет всем. Есть такой момент. Для документа Excel пишу макрос в VBA, что бы из него сделать XML. Весь код приводить не буду вот кусочек: мой объект a.writeline ("<?xml version=""1.0""?>") a.writeline ("<eExact xmlns:xsi=""http://www.w3.org/2001/XMLSchema-instance"" xsi:noNamespaceSchemaLocation=""eExact-Schema.xsd"">") a.writeline ("<GLEntries>") тут просто передача кода a.write ("<Costcenter code =""") a.write (Worksheets("RawData").Cells(5 + i, 8).Value) a.writeline (""">") a.writeline ("</Costcenter>") тут передача описания a.writeline ("<Description> </Description>") Так вот вопрос: в таком виде все работает отменно. И если в дескрипшен статику вписать a.writeline ("<Description> TEST </Description>") тоже все работает. Ну а если динамически зачитывать ячейку или a.writeline ("<Description> a.write (Worksheets("RawData").Cells(5 + i, 8).Value) </Description>") или a.writeline ("<Description>") a.write (Worksheets("RawData").Cells(5 + i, 8).Value) ("</Description>") или a.writeline ("<Description>") (Worksheets("RawData").Cells(5 + i, 8).Value) ("</Description>") Ошибка и все тут. Помогите плиз, как правильно написать. Спасибо ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.02.2008, 18:19 |
|
||
|
Правильный синтаксис в VBA
|
|||
|---|---|---|---|
|
#18+
Код: plaintext ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.02.2008, 18:23 |
|
||
|
Правильный синтаксис в VBA
|
|||
|---|---|---|---|
|
#18+
Спасибо заработало. Однако вылез другой бок, если тут тут просто передача кода a.write ("<Costcenter code =""") a.write (Worksheets("RawData").Cells(5 + i, 8).Value) a.writeline (""">") a.writeline ("</Costcenter>") из ячейки зачитываются цифры, то a.writeline "<Description>" & Worksheets("RawData").Cells(5 + i, 2).Value & "</Description>" сюда из ячейки Cells(5 + i, 2).Value должен зачитаться текст(varchar) И XML не формируется. Выкидывает ошибку An invalid character was found in text content. Error processing resource 'file:///D:/TEST.xml'. Line 9, Position 14 <Description> Помогите еще раз плиз :) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.02.2008, 18:35 |
|
||
|
|

start [/forum/topic.php?fid=60&tid=2162717]: |
0ms |
get settings: |
8ms |
get forum list: |
14ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
56ms |
get topic data: |
9ms |
get forum data: |
2ms |
get page messages: |
36ms |
get tp. blocked users: |
1ms |
| others: | 235ms |
| total: | 367ms |

| 0 / 0 |
