¦p¦ó¨ú±o¬YÓÀɮתºÀx¦s®æ¸ê®Æ¡H¡]ÀÉ®×ÀɦW¡A¼g¦b¦sÀx¦s®æ¤º¡^
- ©«¤l
- 79
- ¥DÃD
- 33
- ºëµØ
- 0
- ¿n¤À
- 123
- ÂI¦W
- 0
- §@·~¨t²Î
- win7
- ³nÅ骩¥»
- x64
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥xÆW
- µù¥U®É¶¡
- 2013-10-24
- ³Ì«áµn¿ý
- 2024-3-28
|
¦p¦ó¨ú±o¬YÓÀɮתºÀx¦s®æ¸ê®Æ¡H¡]ÀÉ®×ÀɦW¡A¼g¦b¦sÀx¦s®æ¤º¡^
¥»©«³Ì«á¥Ñ eigen ©ó 2013-11-6 14:52 ½s¿è
¦p¦ó¨ú±o¬YÓÀɮתºÀx¦s®æ¸ê®Æ¡H¡]ÀÉ®×ÀɦW¡A¼g¦b¦sÀx¦s®æ¤º¡^
¥Ø«e°µ¥X¨Óªº¡G
https://dl.dropboxusercontent.com/u/12575824/Book3.xls
§Ú°Ñ¦Ò http://forum.twbts.com/thread-6224-1-1.html §¹¦¨¤F ¶}±ÒÀÉ®×Ū¨úÀɦWªº¥\¯à¡C
²{¦b§Ú·Qnªº¬O°Ñ¦Ò³oÓÀx¦s®æ¡A°ÊºA§ì¨úÀɮפºªº¸ê®Æ¡C
쥻¼g¦ºªº¬O³o¼Ë A2 = 'D:\report\[20131106 ¾P³f.xls]Sheet4'!$E7
Setup!B1=D:\report\20131106 ¾P³f.xls
²{¦b§Ú§Æ±æ¬O A2 = Setup!B1 !Sheet4'!$E7
³o¼Ë¸Ó¥Î¤°»ò»yªk¨Ó°µ¡H
³Â·Ð¤j¼w«üÂI¡AÁÂÁÂ~~ |
|
|
|
|
|
|
- ©«¤l
- 835
- ¥DÃD
- 6
- ºëµØ
- 0
- ¿n¤À
- 915
- ÂI¦W
- 14
- §@·~¨t²Î
- Win 10,7
- ³nÅ骩¥»
- 2019,2013,2003
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2010-5-3
- ³Ì«áµn¿ý
- 2024-11-6
|
¥»©«³Ì«á¥Ñ luhpro ©ó 2013-11-7 21:57 ½s¿è
...
²{¦b¦³¨âÓ°ÝÃD
¤@¡Bindirect(ref_point&"A7",1) ·|Åã¥Ü #REF! ¡A°£«D±N D:\report\20131106 ¾P³f.xls ¶}±Ò
¤G¡Bindirect(ref_point&"A7",1) copy ¨ì¨ä¥¦Àx¦s®æ, a7¤£·|»¼¼W¦¨ a8 a9 a10 a11....
½Ð°ª¤âÀ°À°¦£¡A³o¨âÓ°ÝÃD«ç»ò§JªA¡AÁÂÁÂ:'(
eigen µoªí©ó 2013-11-7 12:09
¤@¡B ¼ÐªºÀÉ®×¥¼¶}±Òªºª¬ºA¤U§ì¤£¨ìÀx¦s®æ¤º®e¬O¥¿±`ªº.
Y·QnÁקK¨q¥X¿ù»~°T®§ªº¸Ü,
§Ú¸û±`¥Îªº¤è¦¡¬O¦b·|¥X²{ #REF! ªº¤½¦¡¤W®M¥Î :
=IF(ISERROR(줽¦¡),"",줽¦¡)
ªº§Î¦¡,
³o¼ËY¦³¿ù»~µo¥Í«hÅܦ¨¤£Åã¥Ü¥ô¦ó¤å¦r.
¤G¡B¥i¥H¥Î indirect(ref_point&"A"&ROW()+1,1)
¥H¤W°²³]¤½¦¡©ñ¦b ²Ä 6 ¦C¥ô¤@Àx¦s®æ¤W,
ROW() = 6 ¦A + 1 ´N¬O 7 ¤F,
¦Ü©ó¨ä¤U¤@¦C : ROW() = 7 ¦A + 1 ´N¬O 8 ¤F. (¥[´î¦h¤Ö¨Ì¤½¦¡©Ò¦bÀx¦s®æªº¦C¸¹¨Ó¨M©w) |
|
|
|
|
|
|
- ©«¤l
- 79
- ¥DÃD
- 33
- ºëµØ
- 0
- ¿n¤À
- 123
- ÂI¦W
- 0
- §@·~¨t²Î
- win7
- ³nÅ骩¥»
- x64
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥xÆW
- µù¥U®É¶¡
- 2013-10-24
- ³Ì«áµn¿ý
- 2024-3-28
|
¥»©«³Ì«á¥Ñ eigen ©ó 2013-11-7 12:11 ½s¿è
§Ú§ï¼g http://forum.twbts.com/thread-6224-1-1.html §ìÀɮתº¤è¦¡- Private Sub CommandButton1_Click()
- Dim file_Input As String
- Dim file_path As String
- Dim file_name As String
- Dim file_index As Integer
- file_Input = Application.GetOpenFilename("EXCEÀÉ(*.XLS),*xls")
-
- If file_Input <> "" Then
- file_index = InStrRev(file_Input, "\")
-
- file_path = Left(file_Input, InStrRev(file_Input, "\"))
- file_name = Right(file_Input, Len(file_Input) - InStrRev(file_Input, "\"))
-
- MsgBox "Reference " & file_Input
- 'Cells(1, 2) = file_path
- Range("B1").Value = file_path & "[" & file_name & "]"
-
- ' Range("B2").Value = file_path
- ' Range("B3").Value = file_name
- ' Range("B4").Value = file_Input
- End If
- End Sub
½Æ»s¥N½X Àx¦s®æªºÅã¥Ü´N§ï¦¨³o¼Ë
Setup!B1= D:\report\[20131106 ¾P³f.xls]
§Ú¤S¦b ¦WºÙ ©w¸q¤F ref_point ="'"&Setup!$B$1&Setup!$B$8&"'!"
¦pªG¦bÀx¦s®æª½±µ¶ñ¤J ref_point ='D:\report\[20131106 ¾P³f.xls]Sheet4'!
±µµÛ§Ú°Ñ¦Òªº luhpro ªº¼gªk Àx¦s®æ=indirect(ref_point&"A7",1) ²×©ó¥i¥H§ì¨ì¥t¤@ÓÀɮתº¸ê®Æ¤F
¥Ø«eªº¶i«×
https://dl.dropboxusercontent.com/u/12575824/Book3.xls
²{¦b¦³¨âÓ°ÝÃD
¤@¡Bindirect(ref_point&"A7",1) ·|Åã¥Ü #REF! ¡A°£«D±N D:\report\20131106 ¾P³f.xls ¶}±Ò
¤G¡Bindirect(ref_point&"A7",1) copy ¨ì¨ä¥¦Àx¦s®æ, a7¤£·|»¼¼W¦¨ a8 a9 a10 a11....
½Ð°ª¤âÀ°À°¦£¡A³o¨âÓ°ÝÃD«ç»ò§JªA¡AÁÂÁÂ:'( |
|
|
|
|
|
|
- ©«¤l
- 79
- ¥DÃD
- 33
- ºëµØ
- 0
- ¿n¤À
- 123
- ÂI¦W
- 0
- §@·~¨t²Î
- win7
- ³nÅ骩¥»
- x64
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥xÆW
- µù¥U®É¶¡
- 2013-10-24
- ³Ì«áµn¿ý
- 2024-3-28
|
A2=INDIRECT(CONCATENATE("'",LEFTB(CELL("filename",Setup!B1),FINDB("]",CELL("filename",Setup!B1), ...
luhpro µoªí©ó 2013-11-6 23:15
ÁÂÁÂ~~¤£¹L....cell §ì¨ìªº¥Ø«eÀɮתºfilename ¡A¦Ó§ÚnªºÀÉ®× filename ¤w¸g¼g¦b Setup!B1 |
|
|
|
|
|
|
- ©«¤l
- 835
- ¥DÃD
- 6
- ºëµØ
- 0
- ¿n¤À
- 915
- ÂI¦W
- 14
- §@·~¨t²Î
- Win 10,7
- ³nÅ骩¥»
- 2019,2013,2003
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2010-5-3
- ³Ì«áµn¿ý
- 2024-11-6
|
¦p¦ó¨ú±o¬YÓÀɮתºÀx¦s®æ¸ê®Æ¡H¡]ÀÉ®×ÀɦW¡A¼g¦b¦sÀx¦s®æ¤º¡^
¥Ø«e°µ¥X¨Óªº¡G
https://dl.dropboxus ...
eigen µoªí©ó 2013-11-6 14:50
A2=INDIRECT(CONCATENATE("'",LEFTB(CELL("filename",Setup!B1),FINDB("]",CELL("filename",Setup!B1),1)),"Sheet4","'","!E7"),1) |
|
|
|
|
|
|