- ©«¤l
- 2035
- ¥DÃD
- 24
- ºëµØ
- 0
- ¿n¤À
- 2031
- ÂI¦W
- 0
- §@·~¨t²Î
- Win7
- ³nÅ骩¥»
- Office2010
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2012-3-22
- ³Ì«áµn¿ý
- 2024-2-1
|
¦^´_ 6# aer
¬O¤£¬O³o¼Ë¡H- Sub Ex()
- Dim xi As Long
-
- With Worksheets("Invoice")
- .Activate
- Sheets("summary").Range("D" & .Range("A6").Value + 1 & ":G" & .Range("A10").Value + 1).Copy _
- Destination:=.[C6]
- ' .PrintOut
- .PrintOut from:=1, To:=1, copies:=1
- End With
- End Sub
½Æ»s¥N½X |
|