½Ð°Ý¤@¤U¡A¦p¦ó¦b2010excel¤¤¡A¤£±NsheetÁôÂáA¦ý¬On¬Ý®É»Ýn¿é¤J±K½X
- ©«¤l
- 2
- ¥DÃD
- 1
- ºëµØ
- 0
- ¿n¤À
- 3
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- OFFICE2010
- ¾\ŪÅv
- 10
- ©Ê§O
- ¤k
- µù¥U®É¶¡
- 2012-9-28
- ³Ì«áµn¿ý
- 2012-9-28
|
½Ð°Ý¤@¤U¡A¦p¦ó¦b2010excel¤¤¡A¤£±NsheetÁôÂáA¦ý¬On¬Ý®É»Ýn¿é¤J±K½X
1¡B§Úªºª©¥»¬°2010¡A¤½¥q¥Îexcel¥²¶·¨î§@Á~¸ê¬ÛÃö¸ê®Æ¡A¦ý¬°¤F½s¿è®É¤è¦¡
¤£·Q±N¨ã«O±K©Êªº¦hÓsheetÁôÂáA¦ý¥i¯à¦³¨Çsheet¬O»Ý»P¥t¤@¦W¾û¦@¦P
¤S¤£·Q¨C¦¸³£ÁôÂæA¥´¶}¡A¤]©È·|§Ñ°O¦AÁôÂáA¬G¤£ª¾¬O§_¦³sheet¸s²Õªº·§©À¡A
©Î·í¥t¤@¦WÂI¨ì¨ã«O±K©Êªºsheet®É¡A¯à¨Æ¥ý´£¥Ün¿é¤J±K½X¡A¤~¯àÆ[¬Ý¡C
2¡BY¦³¤è¦¡¥i¥Î¡A¬O§_¤]¾A¥Î¦b2010Âà¨ì§ó§Cª©¥»ªºexcel¤W°õ¦æ?¡]¥t¤@¦W¾ûªºexcelª©¥»¬°xlsª©¡^
·PÁ°ª¤â! |
|
|
|
|
|
|
- ©«¤l
- 2
- ¥DÃD
- 1
- ºëµØ
- 0
- ¿n¤À
- 3
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- OFFICE2010
- ¾\ŪÅv
- 10
- ©Ê§O
- ¤k
- µù¥U®É¶¡
- 2012-9-28
- ³Ì«áµn¿ý
- 2012-9-28
|
±z¦n¡G
§Únªº¥\¯à¤£¬O±N¤u§@ªí¡uÁôÂáv¡A¦Ó¬On·Æ¹«ÂI¨ì¬YÓ¤u§@ªí¡]sheet¡^®É¡A¬Y¨Ç¤H¬O»Ýn¿é¤J±K½X
¤~¯à¬Ý¡C¦b¾ãÓexcel¬¡¶Ã¯¸Ì¡A¨CÓ¤H³£¬Ýªº¨ì¦³´XÓsheet
¨Ò¦p¾ãÓ¬¡¶Ã¯¸Ì¡A¦@¦³1~10Ósheet¡A§Ú»Ýn±±ºÞ¬YÓsheet¥i¥Î©Î¥iÂI¿ï¬ÝªºÅv¤Hû¡C
¦ý¬O§Ú¤£nÁôÂìYÓsheet¡C©Ò¥HÀ³¸Ó¬O·í¬Y¤H¥´¶}¡A¥i¥Hª¾¹D¦@¥Î10Ósheet¦b¡A¦ý·í¥LnÂI¿ï¨ì
¦³±K½X±±ºÞªºsheet®É¡A·|³Qn¨D¿é¤J±K½X¡A¤~¯àÂI¶i¥h¡A¯à¤£¯à½s¿è¬O¥Ñ«OÅ@¥\¯à´N¯à¤ä«ù¤F¡C |
|
|
|
|
|
|
¡@¼ÊºÙ: ÀH·ÄÆ¿ºªº¦Ð¤ò ¡@ÀY»Î: [±s¥Î]¼ç¤ô¸¥
°ª¤¤¥Í
- ©«¤l
- 852
- ¥DÃD
- 79
- ºëµØ
- 0
- ¿n¤À
- 918
- ÂI¦W
- 0
- §@·~¨t²Î
- Windows 7 , XP
- ³nÅ骩¥»
- Office 2007, Office 2003,Office 2010,YoZo Office
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¦t©z
- µù¥U®É¶¡
- 2011-4-8
- ³Ì«áµn¿ý
- 2024-2-21
|
¥»©«³Ì«á¥Ñ mark15jill ©ó 2012-9-28 14:17 ½s¿è
¦^´_ 1# bibi
1010928.rar (14.96 KB)
- Private Sub Workbook_Open()
- If Sheets("¤u§@ªí2").Visible = True Then
- Sheets("¤u§@ªí2").Select
- ActiveWindow.SelectedSheets.Visible = False
- End If
- If Sheets("¤u§@ªí3").Visible = True Then
- Sheets("¤u§@ªí3").Select
- ActiveWindow.SelectedSheets.Visible = False
- End If
- Cells.Select
- Selection.EntireColumn.Hidden = True
- Selection.EntireRow.Hidden = True
- UserForm1.Show
- End Sub
½Æ»s¥N½X- Private Sub TextBox2_Change()
- If TextBox1.Text <> "" And TextBox2.Text <> "" Then
- ss1 = TextBox1.Text
- ss2 = TextBox2.Text
- If ss1 = "test" And ss2 = "test" Then
- Cells.Select
- Selection.EntireColumn.Hidden = False
- Selection.EntireRow.Hidden = False
- End If
- End If
- End Sub
½Æ»s¥N½X |
|
¦h°µ¦h·Q¦h¾Ç²ß¡A¤Ö¬Ý¤Ö¿ù¤Ö°g³~
¦h°µ=¦h¦h½m²ß¡A¦h¦h½s¼g¡C
¦h·Q=·Q·Q¬°¤°»ò¤H®aµ{¦¡n¨º¼Ë¼g¡A¦pªG´«¦¨¦Û¤v¡A¤S·|«ç¼g¡C
¦h¾Ç²ß=¾Ç²ß¤H®aªºµo°Ý¨Ã¸Ñµª¡A¾Ç²ß¤H®aªº¼gªk
¤Ö¬Ý=¥u¬Ý¤£°µ¤]ªPµM
|
|
|
|
|