- ©«¤l
- 354
- ¥DÃD
- 5
- ºëµØ
- 0
- ¿n¤À
- 387
- ÂI¦W
- 0
- §@·~¨t²Î
- windows7
- ³nÅ骩¥»
- vba,vb,excel2007
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2017-1-8
- ³Ì«áµn¿ý
- 2024-8-2
|
¦^´_ 4# §ÚªÎ¤H
¥Dn¬Ouserform1 ªºuserform_Initialize()
³o¬q¥X°ÝÃD µM«á¤S³Q¼u¦^¥huserform1.show ¦pªG§A¥Îf8¶] ¥i¯à´N¥i¥H¤F
ActiveSheet.Range("A:I").SpecialCells(xlCellTypeBlanks).Rows.Delete xlUp
»ª¦ü³o¬qÁ¿ªº¬O§R°£A:IÄ檺ªÅ¥Õ¦C¦ì?
³o´Nnª`·N´XÂI
1.¬O§_¶}±Òuserform«á userform¬°Âê©w¼Ò¦¡ (©ÎªÌ´ú¸Õ¤£nÂê©wuserform¬Ý¬Ý)
2.¬O§_¥X²{«DªÅ¥Õªº²§±`°ÝÃD
3.YÁÙ¬OµLªk¸Ñ¨M ´N§ï¥Î¨ä¥LºØªº§R°£»yªk
¥Ø«e§ÚÀH¾÷±q¤¤´¡¤J¤@¦CªÅ¥Õ ´N¯à¥¿±`¹B¦æ ¤]¤£¤j²M·¡¹ê»Úª¬ªp
¹ê»ÚnºCºC´ú¬Ý¬Ý |
|