Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


61015 / 76732 ←次へ | 前へ→

【20344】Re:同一フォルダ内に保存しているファイルをEXCELシートに追加読み込み
回答  Hirofumi  - 04/12/6(月) 19:15 -

引用なし
パスワード
   >途中で止まってしまうのですが、どうしたら良いですか?
>
>'ファイルを開くダイアログを表示してファイル名を取得
>  Do While GetReadFile(vntFileNames, ThisWorkbook.Path, True)
>の、GetReadFileのところで。
>subまたはfunctionが定義されていません。のメッセージが出ます。。
>
>全くの初心者なもので、見当違いな質問でしたらごめんなさい。
>ゼロからのご指導で申し訳ありませんが、何卒お願いします。

これは、GetReadFileと言うプロシージャが無い事により起こります

【20329】Re:同一フォルダ内に保存しているファイ...   
Hirofumi - 04/12/5(日) 17:27 - 

の私のレスで、以下の様な、四つのプロシージャが有った筈です

Public Sub ReadRle()
 ・
End Sub

Private Sub CSVRead(ByVal strFileName As String,・・)
 ・
End Sub

Private Function SplitCsv(ByVal strLine As String,・・) As Variant
 ・
End Function

Private Function GetReadFile(vntFileNames As Variant, ・・) As Boolean
 ・  
End Function

此れを全て、同じ標準モジュールに記述して下さい
そして、その中の、

Public Sub ReadRle()
 ・
End Sub

Private Sub CSVRead(ByVal strFileName As String,・・)
 ・
End Sub

上記2つのプロシージャを、
 
【20330】Re:同一フォルダ内に保存しているファイ...   
Hirofumi - 04/12/5(日) 21:50 - 

のレスで書いている、

Public Sub ReadRle()
 ・
End Sub

Private Sub CSVRead(ByVal strFileName As String,・・)
 ・
End Sub

のプロシージャと入れ替えて(書き換えて)下さい
また、同じ標準モジュールに、

【20330】Re:同一フォルダ内に保存しているファイ...   
Hirofumi - 04/12/5(日) 21:50 - 

で書いた、

Private Function NameLetter(ByVal strName As String) As String
 ・  
End Function

のプロシージャを追加して下さい
0 hits

【20321】同一フォルダ内に保存しているファイルをEXCELシートに追加読み込み ムシキング 04/12/5(日) 14:40 質問
【20324】Re:同一フォルダ内に保存しているファイル... [名前なし] 04/12/5(日) 15:01 発言
【20326】Re:同一フォルダ内に保存しているファイル... ムシキング 04/12/5(日) 15:27 発言
【20328】Re:同一フォルダ内に保存しているファイル... [名前なし] 04/12/5(日) 16:33 回答
【20329】Re:同一フォルダ内に保存しているファイル... Hirofumi 04/12/5(日) 17:27 回答
【20330】Re:同一フォルダ内に保存しているファイル... Hirofumi 04/12/5(日) 21:50 回答
【20331】Re:同一フォルダ内に保存しているファイル... ムシキング 04/12/5(日) 23:22 発言
【20344】Re:同一フォルダ内に保存しているファイル... Hirofumi 04/12/6(月) 19:15 回答
【20345】Re:同一フォルダ内に保存しているファイル... Hirofumi 04/12/6(月) 19:22 回答
【20346】Re:同一フォルダ内に保存しているファイル... Hirofumi 04/12/6(月) 19:40 回答
【20348】Re:同一フォルダ内に保存しているファイル... ムシキング 04/12/6(月) 22:41 質問
【20382】Re:同一フォルダ内に保存しているファイル... Hirofumi 04/12/7(火) 19:26 回答
【20477】Re:同一フォルダ内に保存しているファイル... ムシキング 04/12/9(木) 23:01 発言
【20515】Re:同一フォルダ内に保存しているファイル... Hirofumi 04/12/10(金) 21:04 回答
【20676】Re:同一フォルダ内に保存しているファイル... ムシキング 04/12/14(火) 20:39 お礼
【20677】Re:同一フォルダ内に保存しているファイル... Hirofumi 04/12/14(火) 21:17 回答

61015 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free