0

マクロ設定のについて エクセル２００７を使用して下記のマクロを作成しましたが、うまく動いてくれませんどこが誤りかご教示していただければ幸いです。
Sub Macro1()
'
' Macro1 Macro
'

'
Range("D39:ah405,aj39:aj405,al39:al405,an39:an405,ap39,ap405,ar39:ar405").Select
Range("at39:at405,av39:av405,ax39:ax405,az39:az405,bb39,bb405,bd39:bd405").Select
Range("bf39:bf405,bh39:bh405,bj39:bj405,bl39:bl405,bn39,bn405,bp39:bp405").Select
Range("br39:br405,bt39:bt405,bv39:bv405,bx39:bx405,bz39,bz405,cb39:cb405").Select
Range("cd39:cd405,cf39:cf405,ch39:ch405,cj39:cj405,cl39,cl405,cn39:cn405").Select
Range("cp39:cp405,cr39:cr405,ct39:ct405,cv39:cv405,cx39,cx405,cz39:cz405").Select
Range("db39:db405,dd39:dd405,df39:df405,dh39:dh405,dj39,dj405,dl39:dl405").Select
Range("dn39:dn405,dp39:dp405,dr39:dr405,dt39:dt405,dv39,dv405,dx39:dx405").Select
Range("dz39:dz405,eb39:eb405,ed39:ed405,ef39:ef405,eh39,er405,et39:et405").Select
Range("ev39:ev405,ex39:ex405,ez39:ez405,fb39:fb405,fd39,fd405,ff39:ff405").Select
Range("fh39:fh405,fj39:fj405,fl39:fl405,fn39:fn405,fp39,fp405,fr39:fr405").Select
Range("ft39:ft405,fv39:fv405,fx39:fx405,fz39:fz405,gb39,gb405,gd39:gd405").Select
Range("gf39:gf405,gh39:gh405,gj39:gj405,gl39:gl405,gn39,gn405,gp39:gp405").Select
Range("gr39:gr405,gt39:gt405,gv39:gv405,gx39:gx405,gz39,gz405,hb39:hb405").Select
Range("hd39:hd405,hf39:hf405,hh39:hh405,hj39:hj405,hl39,hl405,hn39:hn405").Select
Range("hp39:hp405,hr39:hr405,ht39:ht405,hv39:hv405,hx39,hx405,hz39:hz405").Select
Range("ib39:ib405,id39:id405,if39:if405,ih39:ih405,ij39,ij405,il39:il405").Select
Range("in39:in405,ip39:ip405,ir39:ir405,it39:it405,iv39,iv405,ix39:ix405").Select
Range("iz39:iz405").Select


Selection.ClearContents
End Sub

質問者が選んだベストソリューション

Yahoo!知恵袋 3602日前