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

[µo°Ý] EXCEL VBAªº°}¦C¦b°j°é¤¤«ç»ò³]©w¥¦¬OÅܰʪº

[µo°Ý] EXCEL VBAªº°}¦C¦b°j°é¤¤«ç»ò³]©w¥¦¬OÅܰʪº

¦U¦ì¤j¤j,
¤pªº¬Q¤Ñ¨º­Ó°ÝÃD¤§«á¤S¥X²{¤@­Ó·sªº°ÝÃD,
¥Ñ©ó¬O§ï²{¦æªºµ{¦¡©Ò¥H¦³³\¦hªº°j°é¦b¹B§@,
³Â·Ð¦U¦ì¤j¤j¤F,
ÁÂÁÂ!!!

°ÝÃD¨Ó¤F:°}¦C«ç»ò¦b°j°é¤¤³]©w©O??

for i=1 to x
°}¦C=(??,??)<--³o­Ó­n«ç»ò¥h³]©w¥¦©O?
next
ALK

¦^´_ 2# kimbal
¤j¤j¦A©M±z½Ð±Ð¤@­Ó°ÝÃD(¬Q¤Ñµo°Ýªº)
¦p¤U................................................
¤pªº¥Ø«e¦b½m²ß°}¦Cªº¹B¥Î,
¥Ñ©ó¬O§â²{¦æ¤â¤Wªºµ{¦¡®³¨Ó­×§ï,
©Ò¥H¦³¨Ç¦a¤è¤£²M·¡­n«ç»ò­×§ï,
½Ð¦U¦ì¤j¤j«ü¾É,
ÁÂÁÂ!!!

³o­Ó¬O§Ú§â¤@±iªí¥á¤W¦Û©wªº°}¦C¤¤
TBOMcl = Sheets("ªí1").Range("a1").End(xlToRight).Column
TBOMro = Sheets("ªí1").Range("a65535").End(xlUp).Row     

¦b¸g¹L¤@¨t¦Cªº¹Bºâ«á,§Ú­n§â°}¦C¤¤ªº¤@Äæ¨ú¥X°µSUMIFªº¹Bºâ
Set rg7po = Range(Sheets("ªí1").[q2], Sheets("ªí1").[q65535].End(xlUp)) [³o¦æ¬O§Ú­ì¥»©w¸q°µSUMIF¯Á¤Þ­Èªº]
¤pªºªº°ÝÃD¨Ó¤F
Set rg7po = Range(Sheets("ªí1").[q2], Sheets("ªí1").[t65535].End(xlUp))
«ç»ò©w¸q=«á­±ªº³o­Ó³¡¥÷-¬õ¦â¦rªº³¡¥÷(³o­Ó¦b¥H«e¦b¤pªºÀɮפW¬O¤@­ÓSHEET,¥Ø«e¤v§â³o­ÓSHEETŪ¶i°}¦C¤¤)
ALK

TOP

¦^´_ 2# kimbal
¤j¤j,
©M±z½Ð±Ð¤@­Ó°ÝÃD,
±zªº³o­Ó°}¦C¬OÅܰʪº¤j¤p¶Ü?
¤pªº¥i¯à¨S¦³»¡²M·¡,
¤pªº¬O·Q­n¤@­ÓÀHµÛ°j°é¦ÓÅÜ°Ê°}¦C½d³ò¤j¤p,
¦A³Â·Ð¤j¤j±z¤F,
ÁÂÁÂ!!!
ALK

TOP

¦^´_ 1# alexlkklin


    1ºû:
for i=1 to x
°}¦C(i)= ­È
next

   2ºû:
for i=1 to x
for j = 1 to y
°}¦C(i,j)= ­È
next
next
À´±oµo°Ý,µª®×´N·|¦b¨ä¤¤

¤µ¤éの¤@¬íは  ©ú¤éにない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

TOP

        ÀR«ä¦Û¦b : ¤f»¡¤@¥y¦n¸Ü¡A¦p¤f¥X½¬ªá¡F¤f»¡¤@¥yÃa¸Ü¦p¤f¦R¬r³D¡C
ªð¦^¦Cªí ¤W¤@¥DÃD