Excel ÂI¿ï¥ô¤@Àx¦s®æ¡A¥H«ö¶s¿z¿ïµ²ªG
- ©«¤l
- 4
- ¥DÃD
- 3
- ºëµØ
- 0
- ¿n¤À
- 12
- ÂI¦W
- 0
- §@·~¨t²Î
- W7
- ³nÅ骩¥»
- office2007
- ¾\ŪÅv
- 10
- µù¥U®É¶¡
- 2011-8-6
- ³Ì«áµn¿ý
- 2011-8-29
|
Excel ÂI¿ï¥ô¤@Àx¦s®æ¡A¥H«ö¶s¿z¿ïµ²ªG
¥»©«³Ì«á¥Ñ oobird ©ó 2011-8-15 13:11 ½s¿è
[attach]7460[/attach] |
-
-
sheet2.png
(63.67 KB)
|
|
|
|
|
|
- ©«¤l
- 1572
- ¥DÃD
- 16
- ºëµØ
- 2
- ¿n¤À
- 1521
- ÂI¦W
- 0
- §@·~¨t²Î
- xp
- ³nÅ骩¥»
- office 2003
- ¾\ŪÅv
- 150
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2010-5-1
- ³Ì«áµn¿ý
- 2016-1-13
|
- Private Sub CommandButton1_Click()
- If Cells.SpecialCells(12).Rows.Count = 65536 Then
- Set Rng = Range([a2], [f65536].End(3)).ColumnDifferences(Selection)
- Rng.EntireRow.Hidden = True
- Else
- Cells.EntireRow.Hidden = False
- End If
- End Sub
½Æ»s¥N½X
|
|
|
|
|
|
|
¡@¼ÊºÙ: ªü¦N ¡@ÀY»Î: ¤£®¢¤U°Ý,¤£Â_¾Ç²ß,¤~·|¶i¨B
ª©¥D
- ©«¤l
- 647
- ¥DÃD
- 190
- ºëµØ
- 24
- ¿n¤À
- 1037
- ÂI¦W
- 0
- §@·~¨t²Î
- windows7
- ³nÅ骩¥»
- Office 2010 ; OOO3.0 ; Google
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¦Ë«n
- µù¥U®É¶¡
- 2010-5-2
- ³Ì«áµn¿ý
- 2022-6-24
|
¬O¤@ӫܦnªº³Ð·N
¥i¥H°µ¦¨¼W¯q¶°¤u¨ãªº¤@³¡¥÷ ´N·|§ó¦n¤F |
|
|
|
|
|
|
- ©«¤l
- 56
- ¥DÃD
- 8
- ºëµØ
- 0
- ¿n¤À
- 81
- ÂI¦W
- 0
- §@·~¨t²Î
- Window7
- ³nÅ骩¥»
- OFFICE2010
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2011-6-25
- ³Ì«áµn¿ý
- 2016-1-17
|
¦^´_ 2# oobird
½Ð°Ý SpecialCells(12) ªº 12 §t¸q¬°¦ó
¨ä¥L¬ÛÃöªº¼Æ¦r¦³µL¸ê®Æ¥i°Ñ¦Ò- XlCellType ¥i¥H¬O³o¨Ç XlCellType ±`¼Æ¤§¤@¡C
- xlCellTypeAllFormatConditions¡C ¥ô¦ó®æ¦¡ªºÀx¦s®æ
- xlCellTypeAllValidation¡C¨ã¦³ÅçÃÒ·Ç«hªºÀx¦s®æ
- xlCellTypeBlanks¡CªÅÀx¦s®æ
- xlCellTypeComments¡C¥]§tµù¸ÑªºÀx¦s®æ
- xlCellTypeConstants¡C¥]§t±`¼ÆªºÀx¦s®æ
- xlCellTypeFormulas¡C¥]§t¤½¦¡ªºÀx¦s®æ
- xlCellTypeLastCell¡C¤w¥Î½d³òªº³Ì«á¤@ÓÀx¦s®æ
- xlCellTypeSameFormatConditions¡C ¦³¬Û¦P®æ¦¡ªºÀx¦s®æ
- xlCellTypeSameValidation¡C ¦³¬Û¦PÅçÃÒ·Ç«hªºÀx¦s®æ
- xlCellTypeVisible¡C©Ò¦³¥i¨£Àx¦s®æ
½Æ»s¥N½X |
|
100 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X
|
|
|
|
|