鴻池です。

"Yoshiaki Kawajiri" <yoshiaki_kawajiri@toll.co.jp> wrote in message
news:3F3EC878.1050108@toll.co.jp...
> 川尻＠札幌です。
> Private Sub ファイルの読み込み_Click(tobook As Workbook, tosheet As
> Worksheet)
> の部分で
> コンパイルエラー：プロシージャの宣言が、イベントまたはプロシージャの定義
> と一致していません。
> とメッセージが出ます。

リーダだと変なところで改行が入ったりで，コピー貼り付けだけでは上手くいかない
場合があります。ＶＢのエディターでコードがすべてエラーなしか確認して見て下さ
い。まあ，エラーの内容をみると，これが原因とは思え難いのですが。バージョンの
違いかな。バージョンは何ですか？

それでも，エラーが出るようであれば強引ですが，次の２つのsubの変数を下記のよ
うにvariantにしてみる。

Private Sub ファイルの読み込み_Click(tobook As Workbook, tosheet As　
Worksheet)
を
Private Sub ファイルの読み込み_Click(tobook , tosheet)
と変更する。

Sub start_copysheet(tobook As Workbook, tosheet As Worksheet)
を
Sub start_copysheet(tobook, tosheet)
と変更する。

これでも，ダメならよく分かりません。見えないけど何か変なものが残っていると
か。それなら，全く新規のブックに書き直して見るとか。これくらいしか，今のとこ
ろ思いつきません。

-- 
******************************
   keizi kounoike
******************************