KSIva, Maks_K, я бы бросил вам файл по адресу, который укажите...буду признателен
KSIva, Maks_K, я бы бросил вам файл по адресу, который укажите...буду признателен
dikar:Vitalik, на вскидку 2 варианта:
1. к массиву применен фильтр. отмените действие фильтра и все заработает.
точно, автофильтр был включен! Спасибо!
KSIva, он же Сергей Иванович, огромное Вам спасибо:super:- впервые получил помощь из нета, осталось вручную внести индексы
офлайн
Неизвестный кот
Senior Member
|
|
64817 |
18 лет на сайте Город:
|
Кто подскажет, где что сделать в Excel, чтоб при сохранении файла в ячейку помещался весь текст, к примеру 2000 и более символов... А то помещается сотня-другая и все
eminsk, открываем справку и смотрим Технические характеристики и ограничения Microsoft Excel
Длина записи для содержимого ячеек (текст) 32767 знаков. В ячейке отображаются только 1024 знака; все 32767 знаков отображаются в строке формул.
Длина записи для формулы 1024 знака
Т.е. для начала желательно было бы установить текстовый формат для ячейки.
офлайн
Неизвестный кот
Senior Member
|
|
64817 |
18 лет на сайте Город:
|
Сформулирую вопрос корректнее и не совсем, может быть, связанным с Excel. Если это проблема чисто 1С, не пинайте.
В 1С, при формированиии прайса, кол-во знаков в ячейке нормальное (достаточное для любых нужд), но при сохранении в файл Excel в итоге получаем файлик с ограниченным кол-вом знаков. Прикольно смотрится, когда описание товара заканчивается полусловом.
офлайн
Неизвестный кот
Senior Member
|
|
64817 |
18 лет на сайте Город:
|
Т.е. вы открываете прайс в 1C - и сохраняете его в формате икселя и открыв в икселе видите обрезанные тексты? Иксел тут не причем.
Подскажите плиз по такому вопросу.
Нужно в тексте, записанном в ячейку, заменить "неразрывные пробелы", находящиеся в ячейке, обычными пробелами. Порыскав в Интернете, нашел кое-какую инфу и понял, что это можно сделать через формулу "=ПОДСТАВИТЬ(RC[-2];СИМВОЛ(160);СИМВОЛ(32))", т.е.
Замена всех знаков неразрывного пробела (значение Юникода 160) знаком пробела (значение ASCII 32) с помощью функции ПОДСТАВИТЬ.
(с) Майкрософт
Но мне нужно интегрировать это в макрос, который бы искал эти неразрывные пробелы на странице и менял на обычные. К сожалению, своих знаний для этого не хватает. Может кто подскажет какие нить идеи?
офлайн
Неизвестный кот
Senior Member
|
|
64817 |
18 лет на сайте Город:
|
Yuri K.:Т.е. вы открываете прайс в 1C - и сохраняете его в формате икселя и открыв в икселе видите обрезанные тексты? Иксел тут не причем.
Делаю прайс в 1С, сохраняю его в формате .xls, на выходе получаем обрывки слов (если в ячейке написано много).
.... в .mxl и .txt прайс выгружается нормально.
eminsk,
если не ошибаюсь в exel ограничение длинны ячейки в 255 символов (при импорте в него - у меня так было - сильно ковыряться небыло настроения просто разбил на несколько столбцов )
DimetriX,
сделай по рабоче крестьянски: есть функция "запись макроса" запускаешь ее и делаешь следующее в меню "найти и заменить" пишешь что на что менять , ставишь опцию поиск по всей книге , нажимаешь заменить
потом конец записи макроса - все у тебя есть готовый макрос - вешаешь его на кнопку
Maks_K, спасибо огромное. Что-то сразу не догадался так сделать. Конечно пришлось немного помучиться, но в итоге все получилось.
вставляю из "интернетовской" таблицы значение "11-17" в ячейку excel, так он мне заменяет на "дек.17". Достало. Данных много, и менять все руками надоело. Где эту автозамену отключить?
Zwalker:-aa-, Ctrl-a, Ctrl-1 и ставишь формат "текстовый"
плевал на это excel. пришлось отключить использование системных разделителей.
плевал на это excel
может ты текстовое форматирование применяешь ПОСЛЕ вставки данных?
Только что проверил. Если выбираешь "текстовый" формат и потом вставляешь данные - все OK.
p.s. ms excel 2003
Zwalker:Цитата:
плевал на это excelможет ты текстовое форматирование применяешь ПОСЛЕ вставки данных? Только что проверил. Если выбираешь "текстовый" формат и потом вставляешь данные - все OK. p.s. ms excel 2003
я так сначала делал. не помогало. все-равно перебивал формат. ладно. все сделал вручную. спасибо.
офлайн
Неизвестный кот
Senior Member
|
|
2865 |
20 лет на сайте Город:
|
Yanina, на днях был у вас в академ книге. Достаточно много различных учебников.
Помогите, плиз.
есть классный совет, как расширить стандартную функцию ВПР (vlookup)
http://www.planetaexcel.ru/tip.php?aid=62
Function VLOOKUP2(Table As Range, SearchColumnNum As Integer, SearchValue As Variant, _
N As Integer, ResultColumnNum As Integer)
Dim i As Integer
Dim iCount As IntegerFor i = 1 To Table.Rows.Count
If Table.Cells(i, SearchColumnNum) = SearchValue Then
iCount = iCount + 1
End If
If iCount = N Then
VLOOKUP2 = Table.Cells(i, ResultColumnNum)
Exit For
End If
Next i
End Function
вопрос в следующем: как сделать, что бы искались не только ячейки, которые равны искомой, но и те, в которых содержится искомая?
т.е. что бы было: If Table.Cells(i, SearchColumnNum) содержит SearchValue Then
Всем спасибо, написал сам:
If InStr(1, Table.Cells(i, SearchColumnNum), SearchValue, vbBinaryCompare) > 0 Then