作者查詢 / paul60209
作者 paul60209 在 PTT [ Visual_Basic ] 看板的留言(推文), 共64則
限定看板:Visual_Basic
看板排序:
全部NightLife257Salary69Gossiping68Visual_Basic64Tobacco46Militarylife36sex32Wanted20Suit_Style19AllTogether18MapleStory16Sijhih16WomenTalk16joke14Beauty10ServiceInfo10Boy-Girl9Cocktail9Drum9FuMouDiscuss9HardwareSale9StupidClown9VAPE8guitar7MobileComm7job6ClassicRock5Key_Mou_Pad5MP3-player5HomeTeach4LSSH4NIHONGO4CCSH_86_3123GFonGuard3iOS3KoreaStar3NDHU_ACC_8th3Office3RockMetal3C_Chat2car2CSMU-AIS982Facebook2Headphone2Instant_Mess2movie2Music2682NDHU_ACC_12t2NDHU_OECLab2Seal_Online2SWhite2BA_baseball1Baseball1BLEACH1CFantasy1CS95Lien1CS_TEACHER1CSMU-D881CSMU-OP941Della1DNF1FCU_EE97B1Hotel1India-movie1KS94-3091KS98-3021Management1MCU_Talk1Mix_Match1nb-shopping1NCCU08_JAPAN1NTTU_CSIE991NTUphy961NTUphy971ONE_OK_ROCK1Palmar_Drama1SMSlife1Sorry_Youth1SSSH-16th-Fk1VictoryYouth1WorkinChina1<< 收起看板(81)
1F噓: 你只擷取部分程式碼來問,是希望大家會通靈嗎?09/15 12:57
1F推: 建議用"複製格式"的方式去執行應該可以達到你要的效果09/10 11:08
2F→: Range("A1").Copy09/10 11:08
3F→: 我重發一篇好了09/10 11:50
5F→: 可以在xWs.Copy前加上xWs.Activate試試看09/06 09:46
4F噓: 高中數學家教? 這年頭專業都變廉價了...09/01 10:18
5F→: 而且這種通常說半天搞定,到最後都超複雜,09/01 10:19
6F→: 甚至需要用API或其他語言才能完成09/01 10:19
1F→: Dim RightColumn as Intenger08/06 08:58
2F→: RightColumn = cells(2,"XFD").End(xlToLeft).Column+108/06 09:00
3F→: RightColumn會動態的去找出最新的空白欄08/06 09:01
4F→: 所以你貼上的時候語法要改用RightColumn來貼,例如08/06 09:01
5F→: Workbooks("A").sheets(1).Range("A2:A100").Copy08/06 09:03
6F→: _ Workbooks("B").sheets(1).Cells(2,RightColumn)08/06 09:04
9F→: 私信你了,有問題在跟我聯絡08/08 10:25
3F→: XDD 有時候這東西就是這樣,明明知道有但就是找不到08/06 09:05
2F推: Cells(i,4)=CLng(Cells(i,2).Value)^b06/26 12:14
3F→: 試試看,因為不清楚你數字到底放到多大06/26 12:14
4F→: Cells(i,4)=CDec(Cells(i,2).Value)^CDec(b)06/26 12:17
2F→: 關鍵字:合併列印06/04 17:41
4F→: ADO05/29 17:44
1F→: 試試看用msgbox(bb.address)看看bb裡面到底包括到哪05/17 17:55