Avko 23.02.2016 10:13
Predmet:Re: excel VBA write to txt file sa drugim fontom

Citiraj Gjoreski:
Cekaj malku jas mislam deka ovde se raboti za Export od Excel vo Text dokument.
Kolku sto znam jas vo text dokument ne mozes da go steovas fontot tuku vo notepad se stelova fontot.
da radi se o snimanju txt datoteke iz VBA excel-a. Probao sam u notepad podesiti fontove ali mi izbrise i kodove za recimo drugi red pa kasnije citanje te datoteke ne ispadne dobro

zxz 23.02.2016 11:04
Predmet:Re: excel VBA write to txt file sa drugim fontom

Nemozes u txt datoteku zapisati neke osobine odnosno mozes zapisati ali txt editori to nece pokazati.
Postoji mogucnost da to ostampas tako jer imaju instrukcije kako stampacu zadati da nesto ispisuje na neki nacin.

Avko 23.02.2016 11:30
Predmet:Re: excel VBA write to txt file sa drugim fontom

Citiraj zxz:
Nemozes u txt datoteku zapisati neke osobine odnosno mozes zapisati ali txt editori to nece pokazati.
Postoji mogucnost da to ostampas tako jer imaju instrukcije kako stampacu zadati da nesto ispisuje na neki nacin.
dobro, mozda i nije do fonta. idem onda postaviti pitanje na drugom dijelu foruma jer sada vise nema veze sa excelom.

Gjoreski 22.02.2016 21:41
Predmet:Re: excel VBA write to txt file sa drugim fontom

Cekaj malku jas mislam deka ovde se raboti za Export od Excel vo Text dokument.
Kolku sto znam jas vo text dokument ne mozes da go steovas fontot tuku vo notepad se stelova fontot.

Avko 22.02.2016 13:13
Predmet:excel VBA write to txt file sa drugim fontom

dali mozemo utijecati na font koji cemo snimiti u izlaznu datoteku?
znaci, htio bi da je font u izlaznoj datoteci recimo Arial, 12 jer mi je listovima napisano u raznim fontovima i velicinama
moj kod:

PreuzmiIzvorni kôd (Visual Basic):
  1. Option Explicit
  2.  
  3. Type data
  4.         ime as String
  5.         prezime as String
  6.         jmbg as String
  7. end Type
  8. Public podaci as data
  9.  
  10. sub snimiFile()
  11.         Dim FF As Integer
  12.         Dim imeFile As String
  13.         FF = FreeFile()
  14.         imeFile = folderPath & "/" & "datoteka.txt"
  15.  
  16.         podaci.ime=Sheets(List1).Cellls(2,2).Value
  17.         podaci.ime=Sheets(List2).Cells(2,2).Value
  18.         podaci.jmbg=Sheets(List3).Cells(2,2).Value
  19.  
  20.         Open imeFile For Output As #FF
  21.                 Write #FF, podaci.ime, podaci.prezime,podaci.jmbg
  22.         Close #FF
  23. end sub

Gjoreski 22.02.2016 13:29
Predmet:Re: excel VBA write to txt file sa drugim fontom

Na ovaj nacin mislam dek ne mozes da go menuvas fontot.

zxz 22.02.2016 13:35
Predmet:Re: excel VBA write to txt file sa drugim fontom

Moras u mjesto free file stovati exel file pa izmijeniti na njemu font u celijama koje zelis mijenjati i zapisati pod drugim imenom.

Avko 22.02.2016 13:55
Predmet:Re: excel VBA write to txt file sa drugim fontom

aha, znaci izmjeniti u svim celijama fontove i velicinu i na svim listovima pa tek onda snimiti. I ako nisam zadovoljan sa fontom onda opet.
znaci nemogu prilikom hvatanja celije u string izmjeniti i font?

zxz 22.02.2016 15:03
Predmet:Re: excel VBA write to txt file sa drugim fontom

Mozes ali ja sam te razumio da hoces da dokument izvorni ostane kakav jeste a da snimis novi dokument sa izmijenjenim fontom.
To sam i opisao.

Avko 22.02.2016 15:39
Predmet:Re: excel VBA write to txt file sa drugim fontom

Citiraj zxz:
Mozes ali ja sam te razumio da hoces da dokument izvorni ostane kakav jeste a da snimis novi dokument sa izmijenjenim fontom.
To sam i opisao.

nisam razumio ovo:
Moras u mjesto free file stovati exel file pa izmijeniti na njemu font u celijama koje zelis mijenjati i zapisati pod drugim imenom.