ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] ¦A¦¸½Ð¯q¦¬¶O³æªº©µ¦ù°ÝÃD

¦^´_ 3# Andy2483

  .Names.Add Name:="PrintArea", RefersTo:=Range(.[A1], xR(0, 28))
>>> Range(.[A1], xR(0, 28)).name = "'" & .Name & "'!Print_Area" .... ª½±µ©w¸q¦WºÙ¬°¡e¦C¦L½d³ò¡f¡A¥B©w¸q¦WºÙ³Ì¦n«a¤W¤u§@ªí¦WºÙ
>>> .PageSetup.PrintArea = "PrintArea"  .... ¦³¤F¤W¤@¦æ, ³o¦æ¥i¬Ù²¤, PageSetup·|©ìºC³t«×, «D¥²­n¤Ö¥Î

TOP

        ÀR«ä¦Û¦b : ¦n¨Æ­n´£±o°_¡A¬O«D­n©ñ±o¤U¡A¦¨´N§O¤H§Y¬O¦¨´N¦Û¤v¡C
ªð¦^¦Cªí ¤W¤@¥DÃD