Á~¸ê©î¤ÀÀɮ׫á¡A¦p¦ó¥[¤W¶}±Ò±K½X
- ©«¤l
- 163
- ¥DÃD
- 1
- ºëµØ
- 0
- ¿n¤À
- 170
- ÂI¦W
- 0
- §@·~¨t²Î
- Window 7
- ³nÅ骩¥»
- Office 2007
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2010-9-5
- ³Ì«áµn¿ý
- 2022-7-20
|
|
|
|
|
|
|
- ©«¤l
- 163
- ¥DÃD
- 1
- ºëµØ
- 0
- ¿n¤À
- 170
- ÂI¦W
- 0
- §@·~¨t²Î
- Window 7
- ³nÅ骩¥»
- Office 2007
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2010-9-5
- ³Ì«áµn¿ý
- 2022-7-20
|
¦^´_ 9# jsc0518
1.¥ý§â J Ä檺±K½X¦s¤J pw ÅܼƤ¤¡C
pw = Sheets("Sheet1").Cells(r, 10).Value
2.±N§@¥Î¤¤ªº¬¡¶Ã¯¦sÀÉ¡A¦P®É§âpw±K½X©ñ¤J¨ì«á±ªºPassword°Ñ¼Æ¤¤¡A¥H«á¶}±Ò¦¹¬¡¶Ã¯¥²¶·n¿é¤J±K½X¤~¯à¶}±Ò¡C
ActiveWorkbook.SaveAs mypath & myfilename & ".xlsx", Password:=pw |
|
|
|
|
|
|