|
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
1. 엑셀 버전(95,97,2000,2002):
2. 윈도우즈의 버전(win95,win98,winME,winNT,win2000,winXP):
3. CPU (486,PentiumI/II/III/IV...):
4. RAM (32,64,128,256,512MB,1G...):
* 아래줄에 질문을 작성하세요 >>
다음과 같은 코드를 작성, 계산을 하여
시트에 작성하는 방식을 하고 있습니다.
Private Sub CommandButton1_Click()
Dim a1, a, b, c, e, f, g, h, j, k, l As Double
a1 = Val(TextBox4.Text)
a = Val(TextBox3.Text)
b = Val(TextBox5.Text)
c = Val(TextBox6.Text)
d = Val(TextBox7.Text)
e = Val(TextBox8.Text)
f = Val(TextBox9.Text)
g = a * b
TextBox10.Text = g
h = a * c
TextBox11.Text = h
j = a * d
TextBox12.Text = j
k = a * e
TextBox13.Text = k
l = a * f
TextBox14.Text = l
End Sub
시트상에서는 133.333 이나 133.666이라고 되어있는 숫자를 유저폼 텍스트박스에서 불러올때
133.333은 133으로 133.666은 134로 나오게 하려고 합니다.
|
|