https://youtu.be/8-LPSfKi0yw

 

반응형

'나눔 > VBA' 카테고리의 다른 글

가볍게 배우는 엑셀 VBA 01  (0) 2026.08.08
combobox 사용예(2)  (0) 2018.03.24
combobox 사용예(1)  (0) 2018.03.10
combobox 사용예  (0) 2018.03.04

https://youtu.be/d_8wtANsXns

 

반응형

'기타 > 알루미늄 압출' 카테고리의 다른 글

알루미늄 압출 공식  (0) 2026.08.28
알루미늄 빌렛 계산02  (0) 2026.08.28
알루미늄 빌렛 계산 01  (0) 2026.08.27
알루미늄 압출결함 및 원인 정리본  (2) 2018.07.01

1 알루미늄 단중 계산

1.1 공식

1.1.1 빌렛 반지름( r ; 단위 : mm ) = (  billet size  x 25.4) / 2

1.1.2 빌렛 단면적( Ac ) = Pi x r^2

1.1.3 밀도( D ) = ( 재질별 밀도 ) / 1,000,000

1.1.4 단중( Wc ) = Ac x D

 

예 ) 재질 A6063, 밀도 2.7, 크기 7Inch인 경우

      r = ( 7x25.4) /2 = 88.9mm

     Ac = 3.14 x 88.9^2 = 24816

     D = 2.7 /1,000,000 

     Wc = 24816 x ( 2.7 / 1,000,000 )

           = 0.067 ( kg/mm )

 

2 Runout 에 따른 Billet 계산

2.1 기본적인 구성

[ 구성표 ]

 

2.2 공식 = [ (  Runout  x (  제품단중[kg/m]  /  1000 ) ) / Wc ] + Butt   단위 : kg / mm

 

예)  제품 단중( 1 kg/m ), 홀수( 1EA ) , Runout( 32,000 mm), Butt( 20mm)

      필요 Billet 길이(Le) = [ (32,000 x 1 / 1,000 ) / 0.067 ] + 20

                                    =  498 mm

 

3 압출비( ER; Extrusion Ratio ) 계산

3.1 공식 : ER = Ac / (Ae x n)

                Ac : 콘테이너 단면적, Ae :  제품 단면적, n : 금형 압출 홀수

 

 

4 압출 속도( Ve )

4.1 공식 : Ve = Vr x ER

             Vr : ram 속도,  ER : 압출비

 

 

반응형

'기타 > 알루미늄 압출' 카테고리의 다른 글

알루미늄 빌렛 계산03  (0) 2026.08.31
알루미늄 빌렛 계산02  (0) 2026.08.28
알루미늄 빌렛 계산 01  (0) 2026.08.27
알루미늄 압출결함 및 원인 정리본  (2) 2018.07.01

 

https://www.youtube.com/watch?v=gZfCln77T5E

 

절단.xlsx
0.01MB

반응형

'기타 > 알루미늄 압출' 카테고리의 다른 글

알루미늄 빌렛 계산03  (0) 2026.08.31
알루미늄 압출 공식  (0) 2026.08.28
알루미늄 빌렛 계산 01  (0) 2026.08.27
알루미늄 압출결함 및 원인 정리본  (2) 2018.07.01

https://www.youtube.com/watch?v=zir0gzWr8Nw&t=469s

[ 알루미늄 압출 빌렛 계산 프로그램 ]

[ 런아웃 구성 ]

반응형

'기타 > 알루미늄 압출' 카테고리의 다른 글

알루미늄 빌렛 계산03  (0) 2026.08.31
알루미늄 압출 공식  (0) 2026.08.28
알루미늄 빌렛 계산02  (0) 2026.08.28
알루미늄 압출결함 및 원인 정리본  (2) 2018.07.01

https://www.youtube.com/watch?v=wVAO2jybFlk

 

 

name 속성 용도 비고
Userform1 caption = "과일 가격 보기"    
Label1 caption = "과일" 대분류  
Label2 caption=' ' 소분류  
Label3 caption=' ' 단위표시  
Textbox1 text = 0 단위가격표시  
CommandButton1 caption = "사과"    
CommandButton2 caption = "바나나"    

 

[ 초기 실행 화면 ]

 

1 '사과' 버튼

1.1 클릭할 경우

Private Sub CommandButton1_Click()
    
    Me.TextBox1.Text = 2000
    Me.Lable2.Caption = "사과"
    Me.Lable3.Caption = "원/개"

End Sub

- Me = UserForm1과 같은 의미

  [풀이]  Me.TextBox1.Text = 2000  :  UserForm1에 있는 TextBox1에 '2000'이라는 텍스트를 넣어라.

1.2 결과

 

2 '바나나' 버튼

2.1 클릭할 경우

Private Sub CommandButton2_Click()
    
    Me.TextBox1.Text = 1000
    Me.Lable2.Caption = "바나나"
    Me.Lable3.Caption = "원/송이"

End Sub

2.2 결과

반응형

'나눔 > VBA' 카테고리의 다른 글

가볍게 배우는 엑셀VBA_02  (0) 2026.09.01
combobox 사용예(2)  (0) 2018.03.24
combobox 사용예(1)  (0) 2018.03.10
combobox 사용예  (0) 2018.03.04

+ Recent posts