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

[µo°Ý] ½Ð±ÐA1ªº®æ¦¡µ¥©óB1ªº®æ¦¡»yªk¬°??

[µo°Ý] ½Ð±ÐA1ªº®æ¦¡µ¥©óB1ªº®æ¦¡»yªk¬°??

½Ð±ÐA1ªº®æ¦¡µ¥©óB1ªº®æ¦¡»yªk¬°??

¥»©«³Ì«á¥Ñ lcctno ©ó 2015-8-28 08:17 ½s¿è

³o¬O¨Ï¥Î¿ý»s¥¨¶°ªº¤è¦¡±o¨ìªº
½Æ»sB1 µM«á¿ï¾Ü©Ê¶K¤W®æ¦¡©óA1  ¨ä¹ê¹³§Ú¬Oªì¾ÇªÌ §Ú¤j³¡¤À¬O¨Ï¥Î¿ý»sªº¤è¦¡ µM«á¦A¹Á¸ÕÁYµuµ{¦¡½X

Sub Macro1()
'
'
' 2015/08/28 ¿ý»sªº¥¨¶°
'

'
    Selection.Copy
    Range("B1").Select
    Application.CutCopyMode = False
    Selection.Copy
    Range("A1").Select
    Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False
End Sub

TOP

¦^´_ 1# t8899


    ¸Õ¸Õ¬Ý¡G
cells(1,2).Copy cells(1,1)

TOP

¥»©«³Ì«á¥Ñ t8899 ©ó 2015-8-28 08:40 ½s¿è
¦^´_  t8899
    ¸Õ¸Õ¬Ý¡G
cells(1,2).Copy cells(1,1)
Scott090 µoªí©ó 2015-8-28 08:29

§Ú¬O¤£·Q¥Î¨ìcopy ªº«ü¥O!
¦]¬°§Úªº¥¨¶°¨C10¬í´N·|°µ¤@¦¸«þ®æ¦¡ªº°Ê§@¡A³o·|¼vÅT§Ú¦b¨ä¥Lµ{¦¡¨Ï¥Îcopy ªº°Ê§@

TOP

¦^´_ 4# t8899


    ¤@­ÓRangeªº²Õ¦¨¦³«Ü¦h"®æ¦¡:¤Î"ª«¥ó"©Ò²Õ¦¨¡A¤]«ÜÃø¥ÎCopy´N¥i¥H§¹¥þ½Æ»s¹L¥h¡C°£«D¡I½Æ»s¾ã±i¤u§@ªí¡C
©Ò¥H«ÜÃø¥Î¤@¥y¨ç¼Æ©ÎªÌ»yªk´N¥i¥H§¹¦¨¡AÁÙ­n¬Ý§A­n­þºØ"®æ¦¡"¤Î"ª«¥ó"­n¬Û¦P¡I½Ð°Ñ¦ÒRange»¡©ú

TOP

        ÀR«ä¦Û¦b : ¤f»¡¦n¸Ü¡B¤ß·Q¦n·N¡B¨­¦æ¦n¨Æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD