é¦å
ï¼æ建äºä¸ä¸ªæ¼ç¤ºç¤ºä¾ãæ¬æè¦éè¿å®å®ç°çåè½æ¯å°Aåä¸","å·ä¹åçæåæååºæ¥.
å¨Sheet1å³é®ï¼éæ©æ¥ç代ç
å¼¹åºVBAç¼è¾é¡µé¢
å¨Sheet1代ç ç¼è¾é¡µé¢è¾å
¥ä»£ç ï¼
Sub test()Dim i As IntegerFor i = 1 To 50 Step 1 Range("B" & i).Select ActiveCell.FormulaR1C1 = "=LEFT(RC[-1],FIND("","",RC[-1])-1)"Next
End Sub
è¾å
¥å®æç¹å»ä¿åï¼å¨å¼¹åºç对è¯æ¡ä¸ç¹å»æ¯ã
æ¥çåå¼¹åºä¸ä¸ªå¯¹è¯æ¡ï¼ç¹ç¡®å®å¾ä¸èµ°ãå
¶å®è¿ä¸¤æ¥å¯ä»¥éè¿ä¸äºè®¾ç½®æ¥é¿å
å¼¹åºæ示çï¼æå°ä¼å¨ä»¥åçç»éªä¸ä¸å¤§å®¶å享ã
ç¶åç¹å»è§å¾-å®
éæ©æ¥çå®
å¨å®å表ä¸éæ©è¦æ§è¡çå®ï¼ç¹å»æ§è¡ã
excelå·¥ä½è¡¨ä¸ç«é©¬æäºååï¼æ们å¯ä»¥ç以Båä¸å®ç¾æ¾ç¤ºäºAåä¸âï¼âä¹å对åºçå
容ï¼éè¿è°ç¨å®ï¼æ们å®ç°äºé¢å®çåè½ã
温馨提示:答案为网友推荐,仅供参考