å 为工ä½è¡¨ç¼å·sheet2ã3ã4顺åºæåï¼åä¸ä¸ªåå æ ¼éè¦å¡«å ¥sheet1Aå第1ã2ã3è¡çå 容ãé®é¢çå ³é®æ¯å°ä¸è¿°ç2ã3ã4转æ¢ä¸º1ã2ã3ãå ·ä½æ¹æ³å¦ä¸ï¼
1ãåå»Sheet2åï¼æä½é®çä¸çShifté®ä¸æ¾ï¼ååå»æåä¸ä¸ªå·¥ä½æ ç¾ï¼æ¤æ¶åæ¶éæ©å¤ä¸ªå·¥ä½è¡¨ï¼æå·¥ä½è¡¨ç»ï¼å·¥ä½è¡¨ç»å¯ä»¥åæ¶è¿è¡ç¼è¾ãå¦ä¸å¾æ示ï¼å¤ä¸ªå·¥ä½è¡¨æ ç¾åç½ã
2ãåå»éæ©A1åå
æ ¼ï¼è¾å
¥å
¬å¼ï¼
=INDEX(Sheet1!A:A,RIGHT(CELL("filename",B1),LEN(CELL("filename",B1))-FIND("Sheet",CELL("filename",B1))-4)-1)
3ãåæºsheet1å·¥ä½è¡¨æ ç¾ï¼åæ¶å·¥ä½è¡¨ç»å³å¯ãåæ¶å·¥ä½è¡¨ç»åä» æä¸ä¸ªå·¥ä½è¡¨æ ç¾ä¸ºç½è²ï¼å ¶ä»å·¥ä½è¡¨æ ç¾å为ç°è²ï¼å¦ä¸æ示ã
å½æ°è§£éï¼
aï¼CELL("filename",B1) ãåå¾å½åå·¥ä½è¡¨ä¸B1åå æ ¼çæ件å称ï¼ä¾å¦ï¼ C:\Users\hbx\Desktop\baidu\[å·¥ä½ç°¿2.xlsx]Sheet2
bï¼RIGHT(...ï¼ãå°å·¥ä½è¡¨å称ä¸çç¼å·æååºæ¥ï¼å¹¶è¿è¡è½¬æ¢ï¼ä½¿å ¶ä¸sheet1Aå第1ã2ã3è¡é¡ºåºä¸è´ã
cï¼INDEX(Sheet1!A:A,...)ãä»sheet1表ä¸çAåï¼é¡ºåºåå¾æ°æ®ã
一般来说,就是设置sheet2、sheet3、sheet4的A1单元格分别等于sheet1!A1、sheet1!A2、sheet1!A3,如果这不是你所希望的,那就只有用VBA来做了。
Sub t()