- ©«¤l
- 323
- ¥DÃD
- 79
- ºëµØ
- 0
- ¿n¤À
- 407
- ÂI¦W
- 0
- §@·~¨t²Î
- win7
- ³nÅ骩¥»
- office 2003
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2017-10-22
- ³Ì«áµn¿ý
- 2022-1-18
|
¥»©«³Ì«á¥Ñ papaya ©ó 2017-11-24 07:41 ½s¿è
¦^´_ 12# GBKEE
"¤£À´ªºVBAµ{¦¡½X,¥i±N¤£À´ªº¨ç¼Æ,¤èªk,¦bVBA»¡©ú¤W¬d¬Ý¦p Application,©Î Rows"
GBKEE ¶W¯Åª©¥D:±z¦n!
·PÁ±zªº´£¿ô~«·s¦A¬d¾\¤@¦¸¡FÁöµM¨S¦³°¨¤W»â·|¡A¦ý¸g¹L¤@¦A®M¨Ò¤l´ú¸Õ¡A²×©óÀ´±o¦p¦ó¹B¥Î^^
µ{¦¡½X«D±`µu§Y¥i- Private Sub CommandButton1_Click()
- Range("DK7:DM" & [DM65536].End(xlUp).Row).Interior.ColorIndex = -4142
- Range("DK" & Application.Match(Range("DK4"), Range("DK7:DK" & Sheets("Sheet1").[DK65536].End(xlUp).Row), 0) + 6).Resize(1, 3).Interior.ColorIndex = 8
- End Sub
½Æ»s¥N½X
TEST-2A.rar (13.51 KB)
|
|