ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

½Ð°Ý¹Ïªí¦p¦ó¨Ì¿z¿ï±ø¥ó¨ÃÅã¥Ü³Ì·snµ§¸ê®Æ

½Ð°Ý¹Ïªí¦p¦ó¨Ì¿z¿ï±ø¥ó¨ÃÅã¥Ü³Ì·snµ§¸ê®Æ

2022-07-12_052255.png
2022-7-12 05:24

D1.zip (12.8 KB)

¦¹©«¤W½×¾Â¼öÂIÅý«á¾ÇÊØÊפ£¦w
1.¦b±`ºA¤À¥¬¹Ïªº¾Ç²ß¹Lµ{»~¥H¬°³W«hªº¥­·Æ§é½u¹Ï´N¬O±`ºA¤À¥¬¹Ï(°ª´µ¤À¥¬¹Ï),
   µM¦Ó±`ºA¤À¥¬¹Ï¬O ²Õ¬É¡B¥­§¡­È»P¼Ð·Ç®t¦³Ãö¥H NORMDIST ¨ç¼Æ°µ¥­§¡¤À°tªº
   ¼Æ¦C§Î¦¨ªº¦±½u,ÁöµM¹Ï«¬¤]¬O¥Î¥­·Æ§é½u¹Ï! ¦ý¼Æ¦C¬O¸g¹L¥­§¡¤À°tªº¡C
   ²×¨s³o¿ù»~¾Ç²ß¹Lµ{ªº­ì¦]¬O ¤£¨D¬Æ¸Ñ ¨S¦³¯u¥¿¤F¸Ñ±`ºA¤À¥¬ªº·N¸q!
   ´NéµÛÀY°µ¦Û°Ê¤Æ,   Åý¦U¦ì«e½ú¬Ý¯º¸Ü¤F! ¦pªG½d¨ÒÀÉÁÙ¦³»Ý§ï¥¿ªº³¡¤À,
   ¤]½Ð¦U¦ì«e½ú«ü¥¿!
2.«á¾Ç»{¬°«e¬q©Ò»s§@ªº¥­·Æ§é½u¹ÏÁöµM¤£¬O¥¿©vªº±`ºA¤À¥¬¹Ï,¦ý¬O¯à§e²{¹ê»Úªº
   ¼Æ¾Ú¤À¥¬!¤]¨ã²Î­p°Ñ¦Ò»ù­È!¯Á©Ê´N§â¨âºØªí¾ã¦X¦b¦P¤@½d¨ÒÀɮ׸Ì,¨Ï¥ÎªÌµø»Ý¨D¿ï¥Î

2022-08-19_144825.JPG
2022-8-19 15:10

2022-08-19_144857.JPG
2022-8-19 15:11

2022-08-19_150244.JPG
2022-8-19 15:11

D1_20220819.zip (357.5 KB)

TOP

¹B¥ÎNORMDIST¨ç¼Æ_±`ºA¤À¥¬(°ª´µ¤À¥¬)
¹B¥ÎNORMDIST¨ç¼Æ_±`ºA¤À¥¬(°ª´µ¤À¥¬).JPG
2022-8-9 11:54


D1_20220809-3.zip (358.91 KB)

TOP

ÁÂÁ¤À¨É¡A­ì¨ÓÁÙ¥i¥H³o¼Ë³]­p¡A¼W¥[¨£ÃÑ

TOP

²Õ¬É¼Æ¥i¥H­×§ï

²Õ¬É¼Æ7
²Õ¬É¼Æ7.JPG
2022-8-9 08:49


²Õ¬É¼Æ3
²Õ¬É¼Æ3.JPG
2022-8-9 08:51


D1_20220809.zip (362.17 KB)

TOP

¥»©«³Ì«á¥Ñ Andy2483 ©ó 2022-8-8 16:48 ½s¿è

1.ª©­±µy§@½Õ¾ã
2.¼W¥[ªø±ø¹Ï¤ñ¨Ò
3.¼W¥[ 6£m
4.¼W¥[¾Þ§@°µ»¡©ú¦bÀx¦s®æµù¸Ñ¤¤
Cpk=0.64»sµ{¯à¤O¤£¨¬
Cpk=0.64»sµ{¯à¤O¤£¨¬.JPG
2022-8-8 16:37


Cpk=1.38»sµ{¯à¤O¨¬°÷
Cpk=1.38»sµ{¯à¤O¨¬°÷.JPG
2022-8-8 16:39


Cpk=1.99»sµ{¯à¤O¨¬°÷
Cpk=1.99»sµ{¯à¤O¨¬°÷.JPG
2022-8-8 16:39


Cpk=3.5»sµ{¯à¤O«Ü¨¬°÷
Cpk=3.5»sµ{¯à¤O«Ü¨¬°÷.JPG
2022-8-8 16:40


³æ¦V¤½®t»sµ{¯à¤O«Ü¨¬°÷
³æ¦V¤½®t»sµ{¯à¤O«Ü¨¬°÷.JPG
2022-8-8 16:41


³æ¦V¤½®t»sµ{¯à¤O¤£¨¬_ºë«×Áö°ª¦ý·Ç«×®t
³æ¦V¤½®t»sµ{¯à¤O¤£¨¬_ºë«×Áö°ª¦ý·Ç«×®t.JPG
2022-8-8 16:41


¤£¹ïºÙ¤½®t»sµ{¯à¤O«Ü¨¬°÷
¤£¹ïºÙ¤½®t»sµ{¯à¤O«Ü¨¬°÷.JPG
2022-8-8 16:42


¤£¹ïºÙ¤½®t»sµ{¯à¤O¤£¨¬_ºë«×Áö°ª¦ý·Ç«×®t

¤£¹ïºÙ¤½®t»sµ{¯à¤O¤£¨¬_ºë«×Áö°ª¦ý·Ç«×®t

¤£¹ïºÙ¤½®t»sµ{¯à¤O¤£¨¬_ºë«×Áö°ª¦ý·Ç«×®t.JPG
2022-8-8 16:42

TOP

¦^´_ 18# Andy2483


    Ãö©ó¹ÏªíÃD§÷²ß±oCa,Cp,Cpk....µ¥ª¾ÃÑ
»sµ{¯à¤O¤ÀªR³øªí.png
2022-7-25 14:00


ªþ¥ó½Ð°Ñ¦Ò!
½Ð¦U¦ì«e½ú¤£§[«ü¥¿!

D1_20220725.zip (426.08 KB)

ÁÂÁ¦U¦ì«e½ú!

TOP

¦^´_ 17# 074063


    ÁÂÁ«e½ú´£¥X¦UºØ»Ý¨D!«á¾ÇÂǦ¹²ß±o¦hºØ§Þ¥©!ÁÂÁÂ!
¤µ¤é²ß±o ¤å¦r¥i¥H¤ñ¤j¤p,¨ä³W«h¦p±Æ§Ç!
²M³æ¥i±Æ§Çªº¤è¦¡­×§ï¦p¤U:

Sub TEST_4()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Application.EnableCancelKey = xlDisabled
Application.EnableEvents = False
Dim Vrr, C1V, C2V, i&, Spc1rr, Spc2rr, x&
With Sheets("data")
   Vrr = .Range(.[A2], .Cells(.Cells(.Rows.Count, "B").End(xlUp).Row, "B"))
End With
C1V = [data!A2] & ","
C2V = [data!B2] & ","
For i = 1 To UBound(Vrr)
   If InStr(C1V, Vrr(i, 1) & ",") = 0 Then
      Spc1rr = Split(C1V, ",")
      For x = 0 To UBound(Spc1rr)
         If Vrr(i, 1) < Spc1rr(x) Then '
            Spc1rr(x) = Vrr(i, 1) & "," & Spc1rr(x)
            C1V = Join(Spc1rr, ",")
            Exit For
            ElseIf Vrr(i, 1) > Spc1rr(x) And Vrr(i, 1) < Spc1rr(x + 1) Then
               Spc1rr(x) = Spc1rr(x) & "," & Vrr(i, 1)
               C1V = Join(Spc1rr, ",")
               Exit For
            ElseIf Spc1rr(x + 1) = "" Then
               Spc1rr(x) = Vrr(i, 1)
               C1V = Join(Spc1rr, ",")
               Exit For
         End If
      Next
   End If
   If InStr(C2V, Vrr(i, 2) & ",") = 0 Then
      Spc2rr = Split(C2V, ",")
      For x = 0 To UBound(Spc2rr)
         If Vrr(i, 2) < Spc2rr(x) Then '
            Spc2rr(x) = Vrr(i, 2) & "," & Spc2rr(x)
            C2V = Join(Spc2rr, ",")
            Exit For
            ElseIf Vrr(i, 2) > Spc2rr(x) And Vrr(i, 2) < Spc2rr(x + 1) Then
               Spc2rr(x) = Spc2rr(x) & "," & Vrr(i, 2)
               C2V = Join(Spc2rr, ",")
               Exit For
            ElseIf Spc2rr(x + 1) = "" Then
               Spc2rr(x) = Vrr(i, 2)
               C2V = Join(Spc2rr, ",")
               Exit For
         End If
      Next
   End If
Next
If [list!I1] = "¤j¦Ü¤p±Æ§Ç" Then
   Spc1rr = Split(C1V, ",")
   C1V = ""
   For i = UBound(Spc1rr) - 1 To 0 Step -1
      C1V = C1V & "," & Spc1rr(i)
   Next
   
   Spc2rr = Split(C2V, ",")
   C2V = ""
   For i = UBound(Spc2rr) - 1 To 0 Step -1
      C2V = C2V & "," & Spc2rr(i)
   Next
End If
C1V = "¥þ³¡¾÷¥x," & C1V
With Sheets("chart").[C1].Validation
    .Delete
    .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
    xlBetween, Formula1:=C1V
End With
With Sheets("chart").[C2].Validation
    .Delete
    .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
    xlBetween, Formula1:=C2V
End With
Application.EnableEvents = True
Set Vrr = Nothing
Set Spc1rr = Nothing
Set Spc2rr = Nothing
End Sub

«ùÄò¾Ç²ß¤¤! ½Ð¦U¦ì«e½ú¤£§[«ü¥¿! ÁÂÁÂ!

TOP

¦^´_ 16# Andy2483


    Andy2483 ¤j¤j, ½Ð°Ý¤U©Ô²M³æ¥h­«½Æ«á¥i¥H±Æ§Ç¶Ü

TOP

¦^´_ 15# 074063


    ¸Õ¸Õ¬Ý!

D1_20220722.zip (414.7 KB)

TOP

        ÀR«ä¦Û¦b : ­n§åµû§O¤H®É¡A¥ý·Q·Q¦Û¤v¬O§_§¹¬üµL¯Ê¡C
ªð¦^¦Cªí ¤W¤@¥DÃD