Predmet:Re: VBA Excel snimi matricu - VB6 ucitaj matricu
PreuzmiIzvorni kôd (Visual Basic):option Explicit
private type data
uzorak1 as string
uzorak2 as string
uzorak3 as integer
uzorak4 as integer
end Type
Private Sub Command1_Click()
Open "c:\imeFajla" For Binary Access Read As #1
Dim podaci As data
Do While Not EOF(1)
Get #1, , podaci
With podaci
Debug.Print .uzorak1
Debug.Print .uzorak2
Debug.Print .uzorak3
Debug.Print .uzorak4
End With
Loop
Close #1
End Sub
u imediate prozoru vidim da mi nisu svi podaci ucitani. Pogledam edit fajla i vidim da je snimljeno sve iz Excela, dakle datoteka je u redu.
mozda bi trebao zaboraviti na snimanje u binary modu, mozda bi trebao uzeti klasicno Input-Output, ali mi je onda fajl puno veci.
uglavnom, ovo meni ne radi, ha jos cu malo istrazivati pa ako ne uspijem vraticu se nazad na klasicno snimanje fajla.
zivot je moja domovina.