Prikazi cijelu temu 01.10.2011 19:51
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Lokacija:Tuzla


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):
  1.  If Podatak <> PodatakPrije Then
  2.         If Format$(Trim(Podatak)) <> "" Then
  3.         Kolona = Kolona + 2
  4.         KolS(Kolona) = Podatak
  5.         ExcelSheet.Application.Cells(Red - 1, Kolona).Value = Podatak
  6.         PodatakPrije = Podatak
  7.         Podatak = "Kut"
  8.         ExcelSheet.Application.Cells(Red, Kolona).Value = Podatak
  9.         Podatak = "Pod"
  10.         ExcelSheet.Application.Cells(Red, Kolona + 1).Value = Podatak
  11.         End If
  12.      End If

Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.