word

Язык Visual Basic на платформе .NET.

Модераторы: Ramzes, Sebas

Dmitriy Solomnikov
Постоялец
Постоялец
 
Сообщения: 407
Зарегистрирован: 10.11.2004 (Ср) 13:04
Откуда: Москва

word

Сообщение Dmitriy Solomnikov » 19.05.2005 (Чт) 15:59

в word усть таблица, изх нее считываю содержимое(число):
val = table.Cell(i, 6).Range.Text

при считывании считывается (вместе с числом) еще какая-то абра-катабра. Как ее пропустить?

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 19.05.2005 (Чт) 16:20

Сие есть символ конца ячейки.
Функцию Left примени :)
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

Dmitriy Solomnikov
Постоялец
Постоялец
 
Сообщения: 407
Зарегистрирован: 10.11.2004 (Ср) 13:04
Откуда: Москва

Сообщение Dmitriy Solomnikov » 19.05.2005 (Чт) 16:22

скорее конца строки, потому что там не только числа, но и строки записаны и эти символы там посередине появляются

Dmitriy Solomnikov
Постоялец
Постоялец
 
Сообщения: 407
Зарегистрирован: 10.11.2004 (Ср) 13:04
Откуда: Москва

Сообщение Dmitriy Solomnikov » 19.05.2005 (Чт) 16:30

Да,действительно это символ конца ячейки. Но что делать, когда в ячейке текст занимает несколько строк?

val
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 168
Зарегистрирован: 14.11.2002 (Чт) 1:14

Сообщение val » 19.05.2005 (Чт) 19:45

Тогда это уже будет не конец ячейки, а vbCr (user нажал Enter)

Если же user дошёл до конца ячейки и cursor сам перепрыгнул на следующую строку, тогда у тебя не должно быть ничего лишнего между строк.
Только останится  в конце ячейки.

Использовать функцию Replace чтобы убрать vbCr
Dim s as string
s = Replace(table.Cell(i, 6).Range.Text, vbCr,"")

Затем как GSerg посоветовал, Left

Dmitriy Solomnikov
Постоялец
Постоялец
 
Сообщения: 407
Зарегистрирован: 10.11.2004 (Ср) 13:04
Откуда: Москва

Сообщение Dmitriy Solomnikov » 20.05.2005 (Пт) 13:45

А как от этого квадратика избавиться? Просто если Left, то я не знаю какие аргументы передевать (строки-то разной длинны получаются)

PS: там везде стоят по 2 таких квадратика. А что они означают?

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 20.05.2005 (Пт) 13:51

Извращенцы :)

left$(s, len(s)-2)
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

Dmitriy Solomnikov
Постоялец
Постоялец
 
Сообщения: 407
Зарегистрирован: 10.11.2004 (Ср) 13:04
Откуда: Москва

Сообщение Dmitriy Solomnikov » 20.05.2005 (Пт) 13:57

точно!!!

Так что это за квадратю-то (аж 2 сразу).

PS: все работает


Вернуться в Visual Basic .NET

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 19

    TopList