Predmet:Re: export podataka iz pivot access u excel tabelu
Mozes ti napraviti ovo ali ti dobijas prazne kolone zbog loseg SQL upita.
Bolje bi to bilo u upitu popraviti.
dio koda:
PreuzmiIzvorni kôd (Visual Basic): If Podatak <> PodatakPrije Then
If Format$(Trim(Podatak)) <> "" Then
Kolona = Kolona + 2
KolS(Kolona) = Podatak
ExcelSheet.Application.Cells(Red - 1, Kolona).Value = Podatak
PodatakPrije = Podatak
Podatak = "Kut"
ExcelSheet.Application.Cells(Red, Kolona).Value = Podatak
Podatak = "Pod"
ExcelSheet.Application.Cells(Red, Kolona + 1).Value = Podatak
End If
End If
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.