[µo°Ý] ¦p¦ó¿z¿ï«á­±30µ§DATA

dragonbx

¤p§Ì§Ú¦³¤@¸ê®Æ¸g¿z¿ï¹L«á¦³¨Ç¸ê®Æ>80µ§
§Ú¸Ó¦p¦ó¼gVBA¦Û°Ê§ì«á­±30µ§DATA¦Ü«ü©wÄæ¦ì©O?

´ú¸Õ¤º®eA
1.154
1.152
1.148
1.156
1.16
1.19
1.154
1.154
1.15
1.155
1.1
1.155
1.15
1.155
1.157
1.15
1.143
1.142
1.152
1.152
1.15
1.144
1.18
1.142
1.15
1.14
1.14
1.148
1.047
1.145
1.143
1.149
1.141
1.144
1.146
1.146
1.141
1.142
1.146
1.145
1.144

Hsieh

¦^´_ 8# dragonbx
°µ­Ó²³æÀɮ׸ÑÄÀ§Y¥i

    ¿z¿ï«á30µ§.rar (13.24 KB)

¤U¸ü¦¸¼Æ: 12

2011-6-27 18:06

dragonbx

¿z¿ïµ²ªG¨ú³Ì«á30µ§¸ê®Æ¡A¦]¤½¥qµLªk¤W¶Ç¸ê®Æ!!
¤£¦n·N«ä!!

Hsieh

¬O­n¿z¿ï³Ì«á30µ§¸ê®Æ²Å¦X·Ç«hªº³¡¤À
ÁÙ¬O¿z¿ïµ²ªG¨ú³Ì«á30µ§¸ê®Æ?
½Ð¤W¶Çªþ¥ó»¡©ú

dragonbx

¥H¤U¬°§Úªº­ì©lµ{¦¡½X:
Hsieh ¤j§Ú´ú¸Õ¹L±z©Ò´£¨Ñ¤§µ{¦¡½X¡A¦ý¬O§Ú¤´µLªk¦Û°Ê¿z¿ï«á­±30µ§
¦]¬°¦³¨Ç>30µ§¦³¨Ç<30µ§¡A¤£ª¾¹D¸Ó¦p¦ó¿z¿ï©O

      Sheets("­ì©ldata").Select
    Selection.AutoFilter Field:=5, Criteria1:="Gel time  (171¢J)"
    Application.CutCopyMode = False
    Selection.Copy
    Sheets("½¦-Gel time").Select
    Range("B9").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=True
    Sheets("­ì©ldata").Select
    Rows("1:1").Select
    Application.CutCopyMode = False
    Selection.AutoFilter
    Sheets("½¦-Solid content").Select

Hsieh

¦^´_ 3# dragonbx
½d³ò½Æ»s»yªk½×¾Â¤W¤£¬O«Ü¦h¶Ü?
­n¦Û¤v¹Á¸Õ¬Ý¬Ý¤~·|¶i¨B

     [A65536].End(xlUp).Offset(-29, 0).Resize(30, 1).Copy Sheet2.[D1]

liu5201

­É¥Îª©¥D,
«ä¦Ò¨Ï¥Î¥¨¶°¤è¦¡,½d¨Ò¬Ý¬Ý¬O§_¤j¤j»Ý­n

dragonbx

¦pªG»¡§Ú¨º¤@¨Ç¸ê®Æ­n½Æ»s«á­±30µ§¨ìD1Äæ¦ìªº¸Ü¸Ó«ç»ò¼g©O?

Hsieh

Set A = [A65536].End(xlUp).Offset(-29, 0).Resize(30, 1)