Перейти к содержимому


Фотография

Генерация в Excel VBA файлов NC1


  • Авторизуйтесь для ответа в теме
Сообщений в теме: 9

#1 OFFLINE   S.Martynov

S.Martynov

    Бакалавр CNC

  • Продвинутый
  • PipPipPip
  • 265 сообщений
  • Пол:Мужчина
  • Интересы:FastReport, VBA
  • Из:Р

Отправлено 31 Июль 2021 - 08:54

Кста, тут замутил тему с генерацией в Excel VBA файлов NC1 прямоугольные заготовки, кто таким занимается, можно сделать табличку которая будет генерировать nc1 с нужными размерами и количеством и добавлять оптом в пронест, если будет нужно пишите сделаю


Сообщение отредактировал S.Martynov: 31 Июль 2021 - 08:57

  • 0

#2 OFFLINE   aspirindj

aspirindj

    Студент

  • Пользователи+
  • PipPip
  • 49 сообщений
  • Пол:Мужчина
  • Из:Tomsk

Отправлено 03 Август 2021 - 15:05

А можно подробнее?
если я правильно понял, макрос дергает из экселя поля с габаритами прямоугольников и втыкает их в пронест?
мне такое очень не помешало бы для предварительных расчетов необходимого для закупа металла
  • 0

#3 OFFLINE   S.Martynov

S.Martynov

    Бакалавр CNC

  • Продвинутый
  • PipPipPip
  • 265 сообщений
  • Пол:Мужчина
  • Интересы:FastReport, VBA
  • Из:Р

Отправлено 03 Август 2021 - 18:47

ну грубо говоря создаются nc1 файлы в которые уже зашиты размеры, количество и материал
 
 https://dropmefiles.com/LmC1v
 
Вы пришлите свою табличку а я сделаю
  • 0

#4 OFFLINE   tynex

tynex

    Абитуриент

  • Пользователи
  • Pip
  • 2 сообщений
  • Пол:Мужчина
  • Из:Украина

Отправлено 15 Ноябрь 2021 - 14:26

А можно и мне, такой файлик. 


  • 0

#5 OFFLINE   S.Martynov

S.Martynov

    Бакалавр CNC

  • Продвинутый
  • PipPipPip
  • 265 сообщений
  • Пол:Мужчина
  • Интересы:FastReport, VBA
  • Из:Р

Отправлено 15 Ноябрь 2021 - 22:09

А можно и мне, такой файлик. 

В ячейке A1 указываете ссылку к папке куда сохранять файлы, в файл NC1 записываются размеры, материал (нужно чтобы в базе материалов был такой-же материал что и в таблице) и количество заготовок. файлы с одинаковым именем суммируются

 

Настройках импорта можно поставить отображение всех типов файлов или с расширением .nc1

Выделяете все файлы (ctrl+A) и добавляете все сразу

В таблице можно сортировать уже импортированные детали к примеру (невидимые в фильтре импортироваться не будут)

Прикрепленные файлы

  • Прикрепленный файл  NC1.rar   19,14К   163 скачиваний

Сообщение отредактировал S.Martynov: 15 Ноябрь 2021 - 22:47

  • 0

#6 OFFLINE   tynex

tynex

    Абитуриент

  • Пользователи
  • Pip
  • 2 сообщений
  • Пол:Мужчина
  • Из:Украина

Отправлено 16 Ноябрь 2021 - 01:33

Огромное спасибо.  Ваш файл очень выручит..  Разобрался вроде.


Сообщение отредактировал tynex: 16 Ноябрь 2021 - 01:33

  • 0

#7 OFFLINE   srp

srp

    Абитуриент

  • Пользователи+
  • Pip
  • 9 сообщений
  • Пол:Мужчина
  • Из:Россия

Отправлено 26 Декабрь 2021 - 04:36

Здравствуйте.

Спасибо большое, работает.

Единственное несколько вопросов.

У меня файлу почему-то всегда присваивается имя 11.nc1, 12.nc1, 13.nc1 и т.д.

Вместо имени из столбца 1.

И второе, при формировании отчета, выводится некорректное количество. После первого раза в 2 раза больше. Если снова формировать список, ещё больше.

Подскажите пожалуйста, это у меня ошибка?


  • 0

#8 OFFLINE   S.Martynov

S.Martynov

    Бакалавр CNC

  • Продвинутый
  • PipPipPip
  • 265 сообщений
  • Пол:Мужчина
  • Интересы:FastReport, VBA
  • Из:Р

Отправлено 26 Декабрь 2021 - 15:21

Здравствуйте.

 

 

У меня файлу почему-то всегда присваивается имя 11.nc1, 12.nc1, 13.nc1 и т.д.

 

Здравствуйте.

 

Название и номер у меня разделяются пробелом, если у вас пробел в номере детали есть то часть до пробела отсекается:

 

dname = Split(VBA.Trim(Cells(r, 1).Value), " ")
dname2 = dname(UBound(dname))
 
если не нужно разделять название и номер можете
 
подредактировать код на:
 
dname = Split(VBA.Trim(Cells(r, 1).Value), " ")
dname2 = VBA.Trim(Cells(r, 1).Value
 
 

 

И второе, при формировании отчета, выводится некорректное количество. После первого раза в 2 раза больше. Если снова формировать список, ещё больше.

 

Если в списке есть одинаковые детали по названию, они суммируются, если в папке вывода уже есть такой файл то к нему прибавляется количество деталей по списку


Сообщение отредактировал S.Martynov: 26 Декабрь 2021 - 16:17

  • 0

#9 OFFLINE   srp

srp

    Абитуриент

  • Пользователи+
  • Pip
  • 9 сообщений
  • Пол:Мужчина
  • Из:Россия

Отправлено 26 Декабрь 2021 - 20:41

Я не много не об этом.
Предположим:
я переношу скаченный в файл в папку : D:\Пронест\Пробник, вставляю адрес, запускаю макрос и у меня файлы создаются в папке верхнего уровня, с названием той папки, в которой они должны были создаться.
Пробник1001.00.0001.nc1
Пробник1001.00.0002.nc1
и т.д.
  • 0

#10 OFFLINE   S.Martynov

S.Martynov

    Бакалавр CNC

  • Продвинутый
  • PipPipPip
  • 265 сообщений
  • Пол:Мужчина
  • Интересы:FastReport, VBA
  • Из:Р

Отправлено 26 Декабрь 2021 - 21:24

Куда вы переносите скаченный файл абсолютно неважно, Скорее всего вы не до конца указали адрес назначения,
в конце не указав косую черту "\"
D:\Пронест\Пробник - не правильно
D:\Пронест\Пробник\ - правильно


PS. Сделал без косой черты в конце адреса

Прикрепленные файлы

  • Прикрепленный файл  NC1.rar   19,32К   76 скачиваний

  • 0




Количество пользователей, читающих эту тему: 0

0 пользователей, 0 гостей, 0 анонимных