| |
▼VBA初心者 さん：
ponpon です｡
手元に.dbcファイルなるものが手元になく､
私には､お手上げです｡
後は､常連さんの登場を待ちましょう｡
ただ単に.dbcファイルをコピーして拡張子を変えるだけなら
Sub test()
Dim oldFile As String
Dim newFile As String
oldFile = Application.GetOpenFilename( _
FileFilter:="DBCファイル,*.dbc,すべてのファイル,*.*")
If oldFile = "False" Then Exit Sub
newFile = Replace(oldFile, Right(oldFile, 3), "txt")
FileCopy oldFile, newFile
End Sub
>textファイルの読み方は分かっているので、
>任意のDBCファイルを選択したら、同一フォルダ内にDBCファイルをコピーして、
>拡張子を".DBC"から".TXT"に変換したファイルを作成したいのですが、
>出来ますでしょうか？
>つまり、同じファイル名の拡張子違いのファイルが2つある状態にしたいのです。
|
|
![[未読]](./data/excel/image/read_icon.gif){kind=icon}
