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

[µo°Ý]§âExcel¸ê®Æ¬YÄæ¸ê®Æ¦s¨ì¥t¤@­Ó Txt ÀÉ®×

[µo°Ý]§âExcel¸ê®Æ¬YÄæ¸ê®Æ¦s¨ì¥t¤@­Ó Txt ÀÉ®×

¥»©«³Ì«á¥Ñ cr123a ©ó 2011-9-21 11:25 ½s¿è

§Ú·Q§â  sheet1 DÄæ¤º D1  ¨ì D23000
©T©w¨C20­Ó¤@²Õ ©Î 25­Ó¤@²Õªº¸ê®Æ¦s¤J¤å¥óÀÉ
¤£ª¾¸Ó¦p¦ó¾Þ§@ ¦p  D1 ~D20   ¦s¦¨  HABC-001.tex
                          D21 ~D40   ¦s¦¨  HABC-002.tex
                          D41 ~D60   ¦s¦¨  HABC-003.tex
                          D61 ~D80   ¦s¦¨  HABC-004.tex
                            ...................
ÁÂÁ¤j®a   ¯¬¦w

¦^´_ 2# GBKEE

¦n¹³§Ö¦¨¥\¤F  ¦ý¬O ¬O°õ¦æ¥X¬°
HABC-001.tex
¤º®e
#REF!
#REF!
#REF!
#REF!
#REF!
#REF!
#REF!
#REF!
#REF!
#REF!
#REF!
??
§Ú¤£ª¾¦p¦ó§ï    §Ú·QÀ³¸Ó¬O Äæ¤º  copy ¥X«á À³§ï¦¨¦s¬°¤å¦rÀÉ

TOP

ÀɮפӤj¤£ª¾¦p¦ó¶Ç­C
§Ú·QÀ³¸Ó ¬O§â
  With Workbooks.Add(1)
             Rng.Copy .Sheets(1).Range("A1")
             .SaveAs Filename:="D:\test\HABC-00" & i & ".tex",
§ï¦¨  ©Ò­nªºÄæ  ½Æ»s ¦A¶K¤W ·sªºAÄæ  ¦ý­n"¿ï¾Ü©Ê¶K¤W" ...¦A¿ï "­È"
¦ý§Ú¤£·|¼g  ¸Õ¤F¦n¦h¦¸ÁÙ¬O¿ù
ÁÂÁÂ

TOP

¥»©«³Ì«á¥Ñ cr123a ©ó 2011-9-9 12:00 ½s¿è

¦^´_ 6# GBKEE
okÁÂÁ§A §Ú¶Ç¤W¨Ó¤F
¦ý§A¤W¶ÇªºªFªF §ÚµLªk¤U¸ü
§ÚÁÙ¬O¥®¨à

NAMETEL.rar (51.61 KB)

TOP

¥»©«³Ì«á¥Ñ cr123a ©ó 2011-9-10 09:53 ½s¿è

¤Ó¯«©_¤F
ÁÂÁ§Aªº±Ð¾É
¦n¼F®`!±j!

TOP

³Ìªñ¦b¨Ï¥Î¤W¥X²{¤F¤@¨Ç°ÝÃD
·Q§â¤å¥ó §ï¦¨  big 5½s½X ªº¤å¥óÀÉ
§ä©_«Ü¦h®Ñ³£¨S¼g¨ì³o­Ó
FileFormat:=xlUnicodeText, CreateBackup:=False
                   ~~~~~~~~~
³o­Ó¤£ª¾¸Óª¾¦ó§ï
¦AÀ°¤@¤U§a  ÁÂÁÂ

TOP

        ÀR«ä¦Û¦b : ®É®É¦n¤ß´N¬O®É®É¦n¤é¡C
ªð¦^¦Cªí ¤W¤@¥DÃD