Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » whitemanehorsey
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1 2 След.
Как реализовать массовую вставку картинок в прайс-лист в соответствии с артикулами и с сохранением пропорций
 
#
10.10.2018 19:28:11
Ігор Гончаренко, спасибо!
 
Перейти    
Как реализовать массовую вставку картинок в прайс-лист в соответствии с артикулами и с сохранением пропорций
 
#
10.10.2018 15:06:03
Ігор Гончаренко, круть, спасибо! Исправил ".jpeg" на ".jpg" и заработало! А можно пару уточнений?
Код
 Dim r&, fn$:  r = 7
Я правильно понял, что r = 7 - это стартовая ячейка? Можно ее как-то сделать переменной, чтобы начинало с той ячейки, куда установлен курсор?

И возможно ли как-то уйти от расширения? Это скорее гипотетический вопрос, т.к. кроме джипегов пока ничего не присылали.
 
Перейти    
Как реализовать массовую вставку картинок в прайс-лист в соответствии с артикулами и с сохранением пропорций
 
#
10.10.2018 02:05:42
Ігор Гончаренко, спасибо, но почему-то не работает, выдает ошибку:


Куда мне нужно поставить курсор перед запуском?

ivanok_v2, Интересный метод, спасибо, но нужно вставить изображения именно в ячейки, а не в комментарии, чтобы получилось что-то типа:
 
Изменено: whitemanehorsey - 10.10.2018 02:10:17
 
Перейти    
Как реализовать массовую вставку картинок в прайс-лист в соответствии с артикулами и с сохранением пропорций
 
#
09.10.2018 23:08:16
Ігор Гончаренко, размер задается один на весь прайс. Пусть будет 100 по высоте с сохранением пропорций по ширине.
Изменено: whitemanehorsey - 09.10.2018 23:09:45
 
Перейти    
Как реализовать массовую вставку картинок в прайс-лист в соответствии с артикулами и с сохранением пропорций
 
#
09.10.2018 23:00:19
Здравствуйте, уважаемые эксперты! С учетом всех замечаний позвольте мне исправиться. Помогите пожалуйста решить такую задачу:
Есть файл (во вложении price.xls). Это прайс-лист. В нем, в графе "ITEM NO." указаны артикулы товаров. Также в комплекте с этим прайсом идет папка с фотографиями (пример во вложении pict.zip). Имена файлов изображений в этой папке соответствуют артикулам товаров. Размеры у изображений разные. Нужно вставить изображения из этой папки в прайс-лист в графу "Item Photos" в соответствии с артикулами в графе "ITEM NO.", при этом уменьшив эти изображения до приемлемого для прайс-листа размера 100 по высоте с сохранением пропорций по ширине и подогнав высоту строки под высоту этих изображений.
Изменено: whitemanehorsey - 10.10.2018 15:06:44
 
Перейти    
Метод Shapes.AddPicture (Excel) - как сохранить пропорции изображения?
 
#
03.09.2018 22:02:02
Юрий М, тогда тем более извините  :oops:  
 
Перейти    
Метод Shapes.AddPicture (Excel) - как сохранить пропорции изображения?
 
#
03.09.2018 21:54:23
Юрий М, извините, я больше не буду  :oops:  Нет возможности объединить темы?
 
Перейти    
Метод Shapes.AddPicture (Excel) - как сохранить пропорции изображения?
 
#
03.09.2018 21:42:06
Юрий М, создал новую, дабы отделить мух от котлет. Там в самой теме я пошел по неверному пути и просто всех запутал. Скрипт в теме рабочий был, просто назначение у него другое. Именно поэтому в той теме уже пошел флуд по поводу возможности редактирования вместо разбора вопроса. Да и вопрос был сформирован не очень корректно, что резко снижало вероятность получить ответ. Зато стоило мне переформулировать вопрос, как мне тут же указали на мою ошибку и итогом стал рабочий скрипт, за что я очень всем благодарен, особенно Андрею VG . Если я что-то нарушил, то прошу прощения.
 
Перейти    
Метод Shapes.AddPicture (Excel) - как сохранить пропорции изображения?
 
#
03.09.2018 21:01:07
Андрей VG, Спасибище! Заработало! Так и думал, что что-то упускаю из виду  :)

Вот рабочий код:
Код
Sub InsertPictures()
'Особая благодарность форуму www.planetaexcel.ru и его участникам, особенно Андрею VG
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)
xColIndex = Application.ActiveCell.Column
If IsArray(PicList) Then
    xRowIndex = Application.ActiveCell.Row
    For lLoop = LBound(PicList) To UBound(PicList)
        Set Rng = Cells(xRowIndex, xColIndex)
        Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, -1, -1)
        ratio = Rng.Height / sShape.Height
        sShape.ScaleHeight ratio, msoFalse
        'Для масштабирования по ширине меняем Height на Width
        xRowIndex = xRowIndex + 1
        'Для распределения по строке, а не по столбцу меняем xRowIndex = xRowIndex + 1 на xColIndex = xColIndex + 1
    Next
End If
End Sub
Изменено: whitemanehorsey - 03.09.2018 21:01:21
 
Перейти    
Метод Shapes.AddPicture (Excel) - как сохранить пропорции изображения?
 
#
03.09.2018 20:31:39
Спасибо, но...  Не работает... Или я не туда ставлю? Ставил в разные места - никак. После чего вписать эту строку надо?
 
Перейти    
Метод Shapes.AddPicture (Excel) - как сохранить пропорции изображения?
 
#
03.09.2018 19:42:22
Андрей VG, логично. Но разве нельзя эти значения вычислить? Например вот тут ктулху предлагает довольно интересный метод решения. Я пытаюсь его адаптировать для своих нужд, пропорции сохраняются, но картинки получаются очень маленькими не пойму почему. Чего я не учел?

Вот код:
Код
Sub InsertPictures()
'Update 20140513
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)
xColIndex = Application.ActiveCell.Column
If IsArray(PicList) Then
    xRowIndex = Application.ActiveCell.Row
    For lLoop = LBound(PicList) To UBound(PicList)
        Set Rng = Cells(xRowIndex, xColIndex)
        Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, -1, -1)
        ratio = Rng.Width / sShape.Width
        sShape.ScaleWidth ratio, msoFalse
        sShape.ScaleHeight ratio, msoFalse
        xRowIndex = xRowIndex + 1
    Next
End If
End Sub
Изменено: whitemanehorsey - 03.09.2018 19:42:39
 
Перейти    
Метод Shapes.AddPicture (Excel) - как сохранить пропорции изображения?
 
#
03.09.2018 18:28:46
Снова здравствуйте, дорогие эксперты!
Предыдущую тему я и назвал неверно, и сформулировал расплывчато, за что прошу прощения и конкретизирую вопрос:
Как при использовании метода Shapes.AddPicture сохранить пропорции изображения при его уменьшении?

Пример строки:      
Код
  Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)

Пример скрипта:
Код
Sub InsertPictures()
'Update 20140513
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)
xColIndex = Application.ActiveCell.Column
If IsArray(PicList) Then
    xRowIndex = Application.ActiveCell.Row
    For lLoop = LBound(PicList) To UBound(PicList)
        Set Rng = Cells(xRowIndex, xColIndex)
        Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
        xRowIndex = xRowIndex + 1
    Next
End If
End Sub
 
Перейти    
Excel 2016 не открывает штрих-коды, Проблема со штрих-кодами в Excel
 
#
26.07.2018 20:10:53
sokol92, здравствуйте! Спасибо за рекомендации!

Цитата
sokol92 написал:
суффикс .zip
Увы, но файлы, получившиеся таким образом из исходных, не открываются. Это работает только с примерами в #37. Только их мне как раз таким способом и удалось разложить. Но где искать понял, еще раз спасибо!

Цитата
sokol92 написал:
Я имел в виду гипотетического почтового робота
Пардон, я думал, Вы имеете в виду какую-либо софтину или php-модуль, коих полно, но найти рабочий не всегда получается.

Так-то, думаю, решается это строкой типа:
Код
    ActiveWorkbook.SaveAs Filename:="G:\2013\Infos\Liste Multi.xlsx", FileFormat:=xlExcel12

    ActiveWorkbook.Close SaveChanges:=False
Жаль, что нельзя вставить это на каждом компе
Изменено: whitemanehorsey - 26.07.2018 20:11:49 (код кривой был)
 
Перейти    
Excel 2016 не открывает штрих-коды, Проблема со штрих-кодами в Excel
 
#
26.07.2018 19:33:39
Цитата
sokol92 написал:
Так что и при сохранении в .xlsx надо все тщательно тестировать на всех версиях.
Полностью согласен. Другой поставщик использует систему на Access, так как адаптировать 1С под периодику было довольно сложной задачей. Так вот с тех машин где установлен Office 2007 и свежее файлы в office 2003 просто перестали открываться, а в более новых версиях открываются с ошибкой, т.к. сама структура файла не соответствует расширению. Лечили исправлением расширения. Потом программисты это поправили.
 
Перейти    
Excel 2016 не открывает штрих-коды, Проблема со штрих-кодами в Excel
 
#
26.07.2018 19:26:51
sokol92, большое спасибо! К сожалению, данный вариант не поможет, т.к. файлы приходят напрямую на целевые компьютеры, разбросанные, зачастую, по Матушке России. Как вариант, пока рассматриваю возможность создания "пограничного поста" между поставщиком и конечным получателем. Конечно, проще будет, если Билли и его друзья по жалобе внесут какие-то изменения в свой новейший офисный продукт, но если не внесут, то буду думать. На этот случай и для общего моего развития уточните пожалуйста:

Цитата
sokol92 написал:
см. атрибут lang в xl\drawings\drawing1.xml
это где именно?

Цитата
sokol92 написал:
Рекомендации по лечению - все получаемые файлы конвертировать роботом на одной из машин с Excel 2003-2007 в .xlsx
Какого робота Вы бы порекомендовали?
 
Перейти    
Excel 2016 не открывает штрих-коды, Проблема со штрих-кодами в Excel
 
#
25.07.2018 14:11:43
Dark1589, не помогает( Оно, кстати, и так сохранялось в 1251 по умолчанию. Странно то, откуда в структуре UTF8. Хотя это может быть как раз только для структуры
 
Перейти    
Excel 2016 не открывает штрих-коды, Проблема со штрих-кодами в Excel
 
#
25.07.2018 13:42:52
Цитата
Dark1589 написал:
Не сисадмин, но поменял кодировку на Windows-1251 и всё заработало
А с этого момента можно поподробнее: где именно и каким образом?
 
Перейти    
Excel 2016 не открывает штрих-коды, Проблема со штрих-кодами в Excel
 
#
25.07.2018 01:47:48
А вот удалось получить структураы файла открывающегося корректно и некорректно. У меня возник вопрос: а почему
Код
 <a:t>Сдал ______________________ Принял _____________________</a:t>
 вместо
Код
<a:t>B344023449065407425494560560@</a:t>
что на это влияет?
Вот структура рабочего файла qwerty - копия :
Код
 <?xml  version="1.0" encoding="UTF-8" standalone="yes" ?> 
 
 - <xdr:anchor  xmlns:xdr="http://schemas.openxmlformats.org/drawingml/2006/spreadsheetDrawing">
   - <xdr:twoCellAnchor>
   - <xdr:from>
     <xdr:col>1</xdr:col> 

    <xdr:colOff>76200</xdr:colOff> 

    <xdr:row>2</xdr:row> 

    <xdr:rowOff>133350</xdr:rowOff> 

   </xdr:from>


  - <xdr:to>
     <xdr:col>2</xdr:col> 

    <xdr:colOff>647700</xdr:colOff> 

    <xdr:row>4</xdr:row> 

    <xdr:rowOff>85725</xdr:rowOff> 

   </xdr:to>


  - <xdr:sp macro=""  textlink="" fLocksText="0">
   - <xdr:nvSpPr>
     <xdr:cNvPr id="1025"  name="Rectangle 1" /> 

  - <xdr:cNvSpPr>
     <a:spLocks xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main" noChangeArrowheads="1" />  

   </xdr:cNvSpPr>


   </xdr:nvSpPr>


  - <xdr:spPr  bwMode="auto">
   - <a:xfrm  xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main">
     <a:off x="295275" y="419100" />  

    <a:ext cx="1209675"  cy="247650" /> 

   </a:xfrm>


  - <a:prstGeom  xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main" prst="rect">
     <a:avLst />  

   </a:prstGeom>


  + <a:solidFill  xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main">
 
  - <a:ln xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main">
     <a:noFill />  

   </a:ln>


  - <a:extLst  xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main">
   - <a:ext uri="{91240B29-F687-4F45-9708-019B960494DF}">
   - <a14:hiddenLine  xmlns:a14="http://schemas.microsoft.com/office/drawing/2010/main" w="9525">
   - <a:solidFill>
     <a:srgbClr val="FFFFFF"  xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006" mc:Ignorable="a14"  a14:legacySpreadsheetColorIndex="65" /> 

   </a:solidFill>


    <a:prstDash val="dot" />  

    <a:miter lim="800000" />  

    <a:headEnd />  

    <a:tailEnd />  

   </a14:hiddenLine>


   </a:ext>


   </a:extLst>


   </xdr:spPr>


  - <xdr:txBody>
     <a:bodyPr xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main" vertOverflow="clip"  wrap="square" lIns="0" tIns="0" rIns="0" bIns="0" anchor="ctr" /> 

    <a:lstStyle xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main" /> 

  - <a:p xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main">
   - <a:pPr algn="r" rtl="0">
     <a:defRPr sz="1000" />  

   </a:pPr>


  - <a:r>
   - <a:rPr lang="ru-RU" sz="1600" b="0" i="0" u="none"  strike="noStrike" baseline="0">
   - <a:solidFill>
     <a:srgbClr val="000000" />  

   </a:solidFill>


    <a:latin typeface="Barcode" /> 

   </a:rPr>


    <a:t>B344023449065407425494560560@</a:t> 

   </a:r>


   </a:p>


   </xdr:txBody>


   </xdr:sp>


    <xdr:clientData /> 

   </xdr:twoCellAnchor>


   </xdr:anchor>

А вот нерабочего qwerty - копия (222)

Код
<?xml  version="1.0" encoding="UTF-8" standalone="yes" ?> 
 
 - <xdr:anchor  xmlns:xdr="http://schemas.openxmlformats.org/drawingml/2006/spreadsheetDrawing">
   - <xdr:twoCellAnchor>
   - <xdr:from>
     <xdr:col>0</xdr:col> 

    <xdr:colOff>0</xdr:colOff> 

    <xdr:row>9</xdr:row> 

    <xdr:rowOff>28575</xdr:rowOff> 

   </xdr:from>


  - <xdr:to>
     <xdr:col>0</xdr:col> 

    <xdr:colOff>0</xdr:colOff> 

    <xdr:row>10</xdr:row> 

    <xdr:rowOff>0</xdr:rowOff> 

   </xdr:to>


  - <xdr:sp macro=""  textlink="" fLocksText="0">
   - <xdr:nvSpPr>
     <xdr:cNvPr id="1027"  name="Rectangle 3" /> 

  - <xdr:cNvSpPr>
     <a:spLocks xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main" noChangeArrowheads="1" />  

   </xdr:cNvSpPr>


   </xdr:nvSpPr>


  - <xdr:spPr  bwMode="auto">
   - <a:xfrm  xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main">
     <a:off x="0" y="1628775" />  

    <a:ext cx="0" cy="142875" />  

   </a:xfrm>


  - <a:prstGeom  xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main" prst="rect">
     <a:avLst />  

   </a:prstGeom>


  - <a:solidFill  xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main">
   - <a:srgbClr val="FFFFFF">
     <a:alpha val="0" />  

   </a:srgbClr>


   </a:solidFill>


  - <a:ln xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main">
     <a:noFill />  

   </a:ln>


  - <a:extLst  xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main">
   - <a:ext uri="{91240B29-F687-4F45-9708-019B960494DF}">
   - <a14:hiddenLine  xmlns:a14="http://schemas.microsoft.com/office/drawing/2010/main" w="9525">
   - <a:solidFill>
     <a:srgbClr val="FFFFFF"  xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006" mc:Ignorable="a14"  a14:legacySpreadsheetColorIndex="65" /> 

   </a:solidFill>


    <a:prstDash val="dot" />  

    <a:miter lim="800000" />  

    <a:headEnd />  

    <a:tailEnd />  

   </a14:hiddenLine>


   </a:ext>


   </a:extLst>


   </xdr:spPr>


  - <xdr:txBody>
     <a:bodyPr xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main" vertOverflow="clip"  wrap="square" lIns="0" tIns="0" rIns="0" bIns="0" anchor="ctr" /> 

    <a:lstStyle xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main" /> 

  - <a:p xmlns:a="http://schemas.openxmlformats.org/drawingml/2006/main">
   - <a:pPr algn="l" rtl="0">
     <a:defRPr sz="1000" />  

   </a:pPr>


  - <a:r>
   - <a:rPr lang="ru-RU" sz="600" b="0" i="0" u="none"  strike="noStrike" baseline="0">
   - <a:solidFill>
     <a:srgbClr val="000000" />  

   </a:solidFill>


    <a:latin typeface="Arial" /> 

    <a:cs typeface="Arial" />  

   </a:rPr>


    <a:t>Сдал ______________________ Принял _____________________</a:t>  

   </a:r>


   </a:p>


   </xdr:txBody>


   </xdr:sp>


    <xdr:clientData /> 

   </xdr:twoCellAnchor>


   </xdr:anchor>
Может это какая-то автозамена?
Изменено: whitemanehorsey - 25.07.2018 01:56:12
 
Перейти    
Excel 2016 не открывает штрих-коды, Проблема со штрих-кодами в Excel
 
#
25.07.2018 01:37:48
В пользу того,что это какой-то глюк.В приложении файлы, которы я я либо просто почистил, либо просто покопировал-повставлял и все заработало. Причем,работает через раз. Выловить закономерность пока не могу. Влезть в структуру почему-то тоже — пишет, что файл поврежден в некоторых случаях. Опять же без закономерности. В альтернативном PlanMaker все работает.
 
Перейти    
Excel 2016 не открывает штрих-коды, Проблема со штрих-кодами в Excel
 
#
25.07.2018 00:58:05
Цитата
sokol92 написал:
Михаил, может быть он не берет те шрифты, которые не поддерживают кодовую страницу по умолчанию? В barcode русских букв точно нет.
Самое интересное, что при той же конфигурации, на той же машине, под офисом 2003 все работает.
 
Перейти    
Excel 2016 не открывает штрих-коды, Проблема со штрих-кодами в Excel
 
#
25.07.2018 00:56:29
Цитата
RAN написал:
А может такой код в персонал?
Спасибо! Завтра попробую. Уже не на работе, а домой таскать не хочу.
Цитата
БМВ написал:
Заявить о том что не работает решение стабильно нужно уже сегодня.  
К сожалению, специфика умирающей отрасли газетных киосков такова. Чуть ли не 90% клиентов просят присылать им эти документы в бумажном виде, чтобы заполнять от руки. Это каменный век, но... Загляните как-нибудь в газетный киоск, посмотрите... Они так работали и 30 лет назад, и 20, и 10. Не изменилось ничего и вряд ли изменится. Отрасли осталось отсилы лет 10. Никто ни копейки не вложит, ИМХО на основе 3х лет работы в отрасли. Мы же стараемся максимально автоматизировать и ускорить все процессы с целью снижения расходов. Извините за оффтоп.
 
Перейти    
Excel 2016 не открывает штрих-коды, Проблема со штрих-кодами в Excel
 
#
24.07.2018 20:11:20
Дмитрий(The_Prist) Щербаков, огромное спасибо за код! Это решение может помочь, если придется менять маршрутизацию накладных.

А можно ли этот код использовать вне среды Excel? Например, в Outlook?
Изменено: whitemanehorsey - 24.07.2018 20:30:12 (дополнил)
 
Перейти    
Excel 2016 не открывает штрих-коды, Проблема со штрих-кодами в Excel
 
#
24.07.2018 20:07:17
Цитата
Дмитрий(The_Prist) Щербаков написал:
Чисто теоретически, можно написать код, который будет перебирать все файлы
Файлы в динамике и приходят ежедневно в течение дня. То есть код должен будет работать постоянно на всех машинах, где есть этот глюк. Организовать это нереально, т.к. придется менять структуру работы многих и многих...

Цитата
Hugo написал:
А может проще поставить 2003 и открывать в нём?
Увы, как я писал выше, нет. На новые машины куплены лицензии на офис 2016. На офис 2003 лицензии сейчас не продают. А объяснить даунгрейд, что платили за 2016, а пользуются 2003-м сами понимаете...


Резюмирую:
Где-то в нас (я и руководство компании) трепыхалась надежда, что проблема решается проще, по принципу "Зайдите в настройки и снимите галочку...". Но, судя по всему, это не так. Любые сложные решения невыполнимы в силу специфики отрасли. Тот же скрипт я не смогу внедрить человеку, который находится удаленно и даже не знает как запустить тимвьювер. В общем, похоже придется писать в майкрософт и ждать ответа от них. Большое всем спасибо за консультации. Если найду решение — отпишу.

Цитата
Hugo написал:
Событие - открытие или активация листа с такими объектами, или с такой формой, или вообще любого после включения "крыжика" где как придумаете.Код берёт объект, генерит по данным штрихкод, делает из этого картинку, ставит куда нужно, сохраняет файл в нужном месте в нужном виде.Есть вариант кода, который просто рисует набор линий, тоже можно использовать как вариант решения.А можно просто не мудрить, а обработать указанный каталог и всё.
Если есть ссылки на примеры кода - буду благодарен. Возможно, придется пересматривать маршрутизацию накладных, если майкрософт ничего не ответит, а количество новых компов будет расти.
 
Перейти    
Excel 2016 не открывает штрих-коды, Проблема со штрих-кодами в Excel
 
#
24.07.2018 19:44:55
Дмитрий(The_Prist) Щербаков, про косяк выгрузки представители поставщика отвечают, что у них все работает. А у них офис 2003 у всех. На 2003-м действительно работает без проблем. Вот потому я тему тут и создал - ищу решение проблемы, возможно, с их косяком, но как я писал выше, поставщик очень крупный и все подстраиваются как могут.
 
Перейти    
Excel 2016 не открывает штрих-коды, Проблема со штрих-кодами в Excel
 
#
24.07.2018 19:36:49
Hugo, правее нельзя, у поставщика автоматизированная обработка при получении с распознаванием рукописного ввода. Поэтому штрих-код, его размеры и расположение здесь основное. А вот про картинку вопрос интересный... Вот только что считать событием и как извлечь данные из этой автофигуры?
 
Перейти    
Excel 2016 не открывает штрих-коды, Проблема со штрих-кодами в Excel
 
#
24.07.2018 19:26:53
Дмитрий(The_Prist) Щербаков, хотя да, приношу свои извинения, не работает только если скопировать из исходного файла. Если набивать с нуля, то работает. Мне начинает казаться, что глюк может скрываться или в @ на конце штрих-кода, или в самом процессе выгрузки этих накладных из 1С, которая любит сыпать всякими метаданными и псевдообъектами... Может ли быть такое, что типы данных объектов "Надпись" в структуре файла в 2003-м и в 2016-м экселях разные?

Про запрос к мелкомягким уже на втором форуме советуют... Наверное все-таки придется. Хотя мне кажется, что они на 1С валить начнут...
Изменено: whitemanehorsey - 24.07.2018 19:29:00 (дополнил)
 
Перейти    
Excel 2016 не открывает штрих-коды, Проблема со штрих-кодами в Excel
 
#
24.07.2018 19:08:56
Дмитрий(The_Prist) Щербаков, данные файлы выгружаются массово (несколько десятков тысяч в день). Если каждый открывать и править, то рабочего дня не хватит. А многие конечные получатели с экселем на Вы, а то и просто печатают и от руки заполняют. Потом присылают обратно в бумажном виде, а поставщик отказывается принимать из-за отсутствия штрих-кода. И тут проблема не в файле. Можете попробовать создать новый документ, в нем вставить "Надпись" и попробовать применить этот шрифт или другие нестандартные — результат тот же - не применяет, по крайней мере у меня. Мне больше интересно, почему Эксель 2003 спокойно применяет шрифт к фигуре, а 2016-й наотрез отказывается? Может эту функцию можно как-то включить?
 
Перейти    
Excel 2016 не открывает штрих-коды, Проблема со штрих-кодами в Excel
 
#
24.07.2018 18:03:31
sokol92, у нас разрядность офиса - 32 бита, язык - русский Win7 и Win10 x64. В остальном все так же.Вы никакие дополнительные настройки после установки офиса не производили?
 
Перейти    
Файл эксель "заболел" без видимой причины
 
#
24.07.2018 17:57:06
Honey, бывало такое. Это случилось в менеджерских "талмудах" - так называли некое подобие клиентской базы и базы заказов в одном файле Excel. Проблема была в псевдоэлементах, появившихся при экспорте формы талмуда из одной популярной бухгалтерской программы в самом начале его существования. Талмудам на тот момент было по 5-10 лет. Эти элементы похожи на невидимые автофигуры. Появлялись они в произвольных местах, а увидеть их можно было только случайно кликнув по ним. При каждом копировании определенных ячеек их количество росло в геометрической прогрессии. Файлы стали весить более 300 Мб, что по современным меркам немного, но для файла экселя оказалось тогда весьма чувствительно. Пока открывался такой файл менеджеры успевали приготовить кофе. И все жутко тормозило. Посмотрите, если у Вас есть такие элементы, то цитирую решение, подсказанное мне одним умным человеком с ником Kay 6 лет назад:

"Это объекты которые появляются когда данные попадают в вашу таблицу из внешних источников, типа 1С или еще из какой программы.
Чтобы их увидеть можете зайти в меню "найти-выделить"-"выбор объектов". Указатель мыши изменится на стрелочку, выделяете область, где пасутся ваши скрытые объекты и удаляете их.
Можно по другому поступить, скопировать данную таблицу и вставить в новый документ через спецвставку, т. е. отдельно вставляем форматы, значения и формулы. При этом файл станет весить намного меньше.
Удачи. "

P.S. Не забудьте сделать копию файла и все эксперименты сначала произвести над ней.
 
Перейти    
Excel 2016 не открывает штрих-коды, Проблема со штрих-кодами в Excel
 
#
24.07.2018 17:17:32
БМВ, в шапке. Скрин прилагаю.  
 
Перейти    
Страницы: 1 2 След.
Loading...