|    | 
     ▼INA さん: 
>どのようなコードで、どの行でエラーが発生しますか? 
 
もう一度試してみたら、エラーは出なくなったのですが、以下のようになり、やっぱり出来ませんでした。 
マクロの自動記録をして得たコード(以下) 
' 
' 値のクリア Macro 
' マクロ記録日 : 2003/12/10 ユーザー名 : P021020e 
' 
 
' 
  ActiveWindow.SmallScroll Down:=-3 
  Application.Goto Reference:="値のクリア" 
これを、コマンドボタンのクリックイベントにコピペしたのですが、コマンドボタンをクリックすると、Module2のコードが出てきて、そこに 
Sub 値のクリア() 
' 
' 値のクリア Macro 
' マクロ記録日 : 2003/12/10 ユーザー名 : P021020e 
' 
 
' 
  ActiveWindow.SmallScroll Down:=-3 
  Application.Goto Reference:="値のクリア" 
  ActiveSheet.Shapes("CommandButton4").Select 
  ActiveSheet.Shapes("CommandButton4").Select 
  ActiveWindow.SmallScroll Down:=1 
End Sub 
というのが出てきてしまいました…。 
 | 
     
    
   |