All Forums
 Категория Visio
 Форум Вопросы и ответы
 Type mismatch error
Author Previous Topic Topic Next Topic  

bdfy

Belarus
267 Posts
Posted - 03/27/2009 :  18:20:23
не могу понять в чем дело.
у мастер-шейпа задано свойство prop.otv1 тип string
значение читаю из ячейки екселя. тип ячейки текстовый.
sh.Cells("Prop.otv1") = "0"
пишется нормально. но в екселе тектовая строка несколько сложнее. попробовал написать значение.
sh.Cells("Prop.otv1") = "+10.64%" - выдает ошибку.
т.е знак процентов почему то не пишется. хотя вбить его напрямую в ячейку шейпа можно. в чем дело ?
аналогично с другой ячейкой.
sh.Cells("Prop.Sn") = "10" -- пишется нормально.
sh.Cells("Prop.Sn") = "10-j6" - выдает ошибку.
чего я не понимаю ?

Tumanov

Russia
1198 Posts
Posted - 03/27/2009 :  20:00:36
String пишется в формулу и с лишней кавычкой.
sh.Cells("Prop.Sn").Formula = Chr(34) & "+10.64%" & Chr(34)
или
sh.Cells("Prop.Sn").Formula = """+10.64%"""
А при чтении лишние кавычки должны вычищаться.
Go to Top of Page

bdfy

Belarus
267 Posts
Posted - 03/28/2009 :  05:52:27
ни в какую. упорно спотыкается макрос сколько бы кавычек я не добавлял
выкладываю собственно мастер-шейп.
попробуйте ему скриптом прописать, что-то такого типа
sh.Cells("Prop.otv1") = "+10.64%"
sh.Cells("Prop.Sn") = "10-j6"
http://rapidshare.de/files/46388070/testPS.vsd.html
еще проценты можно легкой обойти - просто в смартшейпе формировать надпись, но вторую хотелось бы именно одной строкой видеть.
http://rapidshare.de/files/46388070/testPS.vsd.html
Go to Top of Page

Tumanov

Russia
1198 Posts
Posted - 03/28/2009 :  07:20:18
.Formula!!!!
Go to Top of Page

bdfy

Belarus
267 Posts
Posted - 03/28/2009 :  08:09:32
в точку. 
sh.Cells("Prop.otv1").Formula = Chr(34) & otv1 & Chr(34)

вот так работает нормально.
Go to Top of Page
  Previous Topic Topic Next Topic  
Данный сайт является архивом форума visio.artberg.ru, который был закрыт в связи с переходом на новую платформу visio.getbb.ru
Все материалы доступны только для чтения! Если у вас появились вопросы, или вы хотите что-то обсудить, связанное с Visio, обращайтесь на новый форум!
Архив был создан благодаря совместным усилиям Генадия Туманова @Tumanov (visio.artberg.ru), Александра ака @Surrogate (visio.getbb.ru), и Николая Белых @nbelyh (unmanagedvisio.com)