Kan man på något sätt komma förbi, att behöva använda CommonDialogen
CommonDialog
Svara
för att öppna & spara filen
With cd
.Filter = "Lista|Lista.hex"
.fileName = "Lista"
.ShowOpen
fileName = .fileName
loadFile fileData, fileName
Text1 = getBytes(fileData, 0, 386, 1)
End With
Likaså när man vill sparar filen...
.Filter = "Lista|Lista.hex"
.fileName = "Lista.hex"
.ShowSave
fileName = .fileName
F = Mid(Text1, 1, 386)
setBytes fileData, 0, F, 1
saveFile fileData, fileName
Close
End With
Sören