메크로 오작동 문의드립니다.
VBA
작성자
향기
작성일
2023-11-14 11:16
조회
185
안녕하세요
size meterail Sch 별로 나눠지게 메크로를 만들어놨어어요 잘쓰고 있다가
3년정도 지난 지금 갑자기 재료를 나누질 못하네요.. 뭐가 문제인지 봐주실수 있는 능력자분 계신가요
123시트에서 값을 입력후에 버튼을 누르면 시트를 새로 만들어서 사이즈 재료 두깨 별로 다 나눠주는 기능을 넣어놨습니다.
전체 13,385
번호 | 카테고리 | 제목 | 작성자 | 작성일 | 추천 | 조회 |
[📚교재 출간 안내] 「진짜쓰는 실무엑셀」 , 드디어 출간되었습니다! (237)
![]() ![]() |
![]() ![]() |
2022.02.03 | 515 | 262054 | ||
공지사항 | 문서서식 |
⭐ [더 나은 커뮤니티 문화를 위한 Q&A 글 작성 규칙] ⭐
(197)
오빠두엑셀
|
2021.10.28
|
추천 280
|
조회 18373
|
![]() ![]() |
2021.10.28 | 280 | 18373 |
64616 | 기능/도구 |
New 컨쉬엘 단축키 설명 부분 질문
![]() |
![]() |
2023.12.06 | - | 17 |
64614 | 기능/도구 |
New 틀고정 단축기 관련 질문
![]() |
![]() |
2023.12.06 | - | 22 |
64613 | 피벗테이블 |
New 피벗테이블 새로고침하면 값 사라짐 현상
(1)
![]() ![]() |
![]() ![]() |
2023.12.06 | - | 22 |
64611 | 함수/공식 |
New if 비교문 같은값인데 다른값으로 인식
![]() ![]() |
![]() |
2023.12.06 | - | 19 |
64610 | 함수/공식 |
New (왕초보 질문) 천원단위로 절사 또는 절상하고 싶으면 어떤 함수를 써야할까요?
(1)
![]() |
![]() |
2023.12.06 | - | 18 |
64603 | 함수/공식 |
New 불규칙한 텍스트에서 공통된 일부 텍스트 추출하는 방법이 있을까요?
![]() ![]() |
![]() |
2023.12.06 | - | 35 |
64591 | 함수/공식 |
New today함수 이용하면서 문구를 같이 넣을 수 있나요?
(2)
![]() |
![]() |
2023.12.06 | - | 43 |
64590 | VBA |
New 인코딩 관련 오류 문의사항입니다
![]() ![]() |
![]() |
2023.12.06 | - | 36 |
64589 | 함수/공식 |
New Transpose / Unique 함수 질문
![]() ![]() ![]() |
![]() |
2023.12.06 | - | 42 |
64584 | 문서서식 |
New 엑셀 인쇄 미리보기 화면과 출력내용이 다른 이유는 뭘까요?
(1)
![]() |
![]() |
2023.12.06 | - | 28 |
64581 | 함수/공식 |
New 합격 불합격 자동으로 나타내고 싶습니다.
![]() ![]() ![]() |
![]() |
2023.12.06 | - | 43 |
64579 | 차트/그래프 |
New 차트의 범례 순서 변경
![]() ![]() |
![]() |
2023.12.06 | - | 32 |
64575 | 함수/공식 |
New 두 개의 셀에서 중복값만 추출하고 싶습니다.
![]() ![]() |
![]() |
2023.12.06 | - | 52 |
64574 | 함수/공식 |
New 인덱스, 매치 정확한 단어 말고 포함된 단어로 불러오기
(3)
![]() |
![]() |
2023.12.05 | - | 38 |
64569 | VBA |
New vba 행 추가 매크로에서 마지막 행 자동으로 찾는 방법 문의 합니다.
(3)
![]() |
![]() |
2023.12.05 | - | 40 |
64568 | 문서서식 |
New 엑셀 띄워쓰기 없애기가 안될때 방법 좀
(2)
![]() |
![]() |
2023.12.05 | - | 45 |
64567 | 함수/공식 |
New Gantt 달력 양식의 표에서 해당되는 날짜 추출하는 방법
(3)
![]() |
![]() |
2023.12.05 | - | 48 |
64565 | 함수/공식 |
New 엑셀에서 순서정하기
(7)
![]() |
![]() |
2023.12.05 | - | 51 |
64563 | 함수/공식 |
New SUMIFS 함수 문의
![]() ![]() |
![]() |
2023.12.05 | - | 43 |
64558 | 기능/도구 |
New 값만 붙여넣기 (기본기능으로요)
(4)
답변완료
![]() |
![]() |
2023.12.05 | - | 57 |
64557 | VBA |
New 검색 매크로를 만들고 싶습니다ㅜㅜ
![]() ![]() ![]() |
![]() |
2023.12.05 | - | 63 |
64555 | 피벗테이블 |
New 행/열 바꿈
![]() ![]() |
![]() |
2023.12.05 | - | 47 |
64554 | 함수/공식 |
New sumifs 로 누계합 구하기 짋문
![]() ![]() |
![]() |
2023.12.05 | - | 44 |
64551 | 함수/공식 |
New countif 중복값 관련 문의드립니다.
![]() ![]() |
![]() |
2023.12.05 | - | 40 |
64549 | 함수/공식 |
New 숫자에 천단위 쉼표 표시하고 싶습니다.
![]() ![]() |
![]() |
2023.12.05 | - | 49 |
64546 | 대시보드 |
New 슬라이서에서 영문월 정렬 방법 문의
![]() ![]() |
![]() |
2023.12.05 | - | 33 |
64545 | 함수/공식 |
New Sort,Filter 함수에서 Offset을 사용한 동적범위 적용 가능할까요?
![]() ![]() |
![]() |
2023.12.05 | - | 34 |
64542 | 함수/공식 |
New 합계를 구하는 수식을 알고 싶습니다.
![]() ![]() ![]() |
![]() |
2023.12.05 | - | 46 |
64541 | 함수/공식 |
New 엑셀 3가지 단어가 들어간 내용 찾아내기
(5)
답변완료
![]() |
![]() |
2023.12.05 | - | 54 |
64540 | 함수/공식 |
New 여러손님이 몇번째 방문했는지 어떻게 수식을 짜면 될까요?
(2)
답변완료
![]() |
![]() |
2023.12.05 | - | 40 |
@향기 님 우선 2023-11-14 21:49에 올린 62729 답글 보세요.
@김재규 님 아앗 감사합니다 ! 저거 보고 시트 합쳐진거 하나로 풀고 이래저래 조절하며 대입해보고있습니다 !
@향기 님 첨부 파일 검토바랍니다. 기존파일을 참고로 새로운 VBA FILE 작성.
*PIPE NUM의 산정 방식을 알려주면 보완할 예정*
*매크로 버튼 클릭-->시트 [123] 제외 모든 시트 삭제-->工事名 시트(예:asdf) 생성
첨부파일 : CUTTING-LIST-New-Draft.xlsm
@김재규 님 어떻게 감사를 드려야 할지 모르겠습니다...
PIPE NUM는 간단히 설명드리면
基本 配管長 에 적혀있는 4004 를 토대로 한봉을 계산하게 되는데요
커팅을 할때 커팅 톱날의 두께가 3미리를 계산해서 커팅이 한번있을때마다 3을 플러스 하게되며
총합이 4004 를 넘어갈시에 다음 새로운 파이프를
커팅할수있게 2번으로 넘어가게 합니다.
예를들어 총 2봉을 사용하게 될시에 1번 으로 최대한으로 소모가 적게 계산하여
cutting 이 1000 1000 500 500 500 400 450 이 있다고 가정했을시에
1000 1000 500 500 500 450 뒤엔 PIPE NUM 1이 붙게되고
((400보다 450을 사용했을시에 1번 파이프의 나머지가 적기에..450를 가져옴)
1000+1000+500+500+500+450+3*5= 3965
1000+1000+500+500+500+400+3*5= 3915)
마지막 400 뒤에 PIPE NUM 2 가 붙게되는거죠
우선적으로 사용해야되는 파이프가 있어서..
殘餘 材質란에 있는 파이프를 우선적으로 사용하여 쓰게
되어있었어요..
※정리를 하면 Size Material Sch 가 같은 파이프에 한하여 基本 配管長에 적힌 길이에 맞춰서
남는 재료가 최대한 적게 PIPE NUM 으로 정렬을 합니다.
基本 配管長에 적힌 길이를 초과할시에 2, 3 식으로 다음 번호를 부여합니다.
전에 사용하다 남은 파이프가 있는경우가 있어서
殘餘 材質란에 적혀있는 파이프를 우선적으로 사용하여야 합니다.
이경우엔 너무 복잡해 지기에 재질을 적용시키지 않았었습니다.
SPOOL No.
PCS No.
管端1
管端2
는 저희쪽 관리번호, 처리 방법이라서 그냥 그행 그대로 가져오기를 해주시면 됩니다.
자세히 설명을 해드려야 할것같아서 너무 많이 글을 적어버렸습니다 ㅠㅠ 죄송합니다.
@향기 님 殘餘 材質은 아직 반영못했어요.
파일 검토 요망
첨부파일 : CUTTING-LIST-New-Draft-v2.xlsm
@김재규 님 감사합니다 ! SIZE Sch 별로 잘 나눠져있네요

METERIAL 부분에 다른 재료가 들어있는데 이부분은 수정 힘드실까요 ?
@향기 님 첨부 참조
첨부파일 : CUTTING-LIST-New-Draft-v3.xlsm
M365에서만 작동!
殘餘 材質 반영한 파일
초기 화면
첨부파일 : CUTTING-LIST-New-Draft-v4.xlsm
@향기 님 업무상 필수 프로그램인 것 같은데,,,
별도로 전문 개발자에게 문의해 보시는 게 어떨까요?
@원조백수 님 네..혼자 해결해보려고 몇일끙끙앓고 있네요 ㅠㅠ