Enter в клетката
2 отговора
157 прегледа
Enter в клетката
Имам следния проблем - експортирам от Oracle-ска база данни в Access и после експортирам в Excеl.
В клетката в ексел ми вкарва някакъв символ, заместващ Enterр демек нов ред, които не мога да replace-на с нищо.
Как да го махна този Enter от клетката?
Благодаря ви.
В клетката в ексел ми вкарва някакъв символ, заместващ Enterр демек нов ред, които не мога да replace-на с нищо.
Как да го махна този Enter от клетката?
Благодаря ви.
Re: Enter в клетката
Не зная как точно използваш данните и в какъв вид трябва да ги имаш, но това е което успях да сътворя, дано да свърши работа. Функцията се избира от UserDefined Function
Public Function clear1(string1 As Variant)
Dim textt
textt = string1
textt = Replace(textt, (Chr(10)), " ")
clear1 = textt
End Function
.xls
Public Function clear1(string1 As Variant)
Dim textt
textt = string1
textt = Replace(textt, (Chr(10)), " ")
clear1 = textt
End Function
.xls
Re: Enter в клетката
аз понеже не ги разбирам много тия UserDefined Function ще ти предложа нещо по-простичко - Data->Text to columns->Delimited и на Delimiters слагаш отметка на Тab.
Другият вариант е, ако в колона А ти са данните с ентъра в колона В да въведеш следната формула
=LEFT(A1;FIND(RIGHT(A1;1);A1;1)-1)
Неприятното и в двата варианта е, че трябва да го правиш колона по колона
Другият вариант е, ако в колона А ти са данните с ентъра в колона В да въведеш следната формула
=LEFT(A1;FIND(RIGHT(A1;1);A1;1)-1)
Неприятното и в двата варианта е, че трябва да го правиш колона по колона