ÀRºAÅܼƪº¨Ï¥Î

gogotony

½Ð±Ð¦U¦ì°ª¤â
§Úªºµ{¦¡½X¦p¤U

sub ½Æ»s()
x=cells(1,1)
end sub

sub ¶K¤W()
cells(2,2) = x
end sub

·Q½Ð°ÝÀRºAÅܼÆÀ³¸Ó­n¦b­þÃä«Å§i,ÅܼÆx¤~¯à¦b¨â­Ó¥¨¶°¶¡¶Ç»¼?

GBKEE

¦^´_ 1# gogotony
¦b¼Ò²Õ ªº³»­B ³]¥ß     ¤½¥ÎÅÜ¼Æ ->  Public   x    ©Î  ¨p¥ÎÅܼÆ->  Dim   x     
¼Ò²Õ¤ºªºµ{§Ç³£¥i©I¥s , ¼Ò²Õ¥~ªºµ{§Ç¥u¥i©I¥s ¤½¥ÎÅÜ¼Æ (Public)
«D¤@¯ë¼Ò²Õ(Module)¤ºªº¤½¥ÎÅܼÆ,¦b©I¥s®É »Ý«ü©ú ª«¥ó¼Ò²Õªº¦WºÙ ¦p Sheet2.x
sub Ex()
Dim x   ->µ{¦¡¤ºªº ¨p¥ÎÅܼƠ ¥u¥i¦bµ{¦¡¤º¨Ï¥Î
End Sub

kimbal

GBKEE ¤j»¡ªº¤j·§¬O³o¼Ë:
§â«Å§i©ñ¦b¥~­±,

public x as integer

sub ½Æ»s()
x=cells(1,1)
end sub

sub ¶K¤W()
cells(2,2) = x
end sub

sub ¹B§@()
   call ½Æ»s()
   call ¶K¤W()
end sub

oobird

ÀRºAÅܼƥu¦b³æ¤@¼Ò²Õ¤º¨Ï¥Î
¥HStatic«Å§i
¦p¥H¤U¡G
Sub test()
Static x%
x = x + 1
[a65536].End(3)(2) = x
End Sub
µ{¦¡­«½Æ°õ¦æ®ÉÅܼƷ|¤@ª½«O«ù°O¾Ð¡Aª½¨ìÀÉ®×Ãö³¬
­n¦b¨â­Ó¥¨¶°¶¡¶Ç»¼«h¥Î¤½¦@ÅܼÆpublic«Å§i¡A¦p¼Ó¤W©Ò¥Ü¡C

apolloooo

§Ú¥ý«e³£¬O§Q¥Î Àx¦s®æ¨Ó§@¡C
sub ½Æ»s()
cells(3,3)=cells(1,1)
end sub

sub ¶K¤W()
cells(2,2) = cells(3,3)
end sub