Lemur zaprasza
Strona: [ > ] z 1 Autor Temat: tekst odzielony znakami tabulacji anonim Typ: Nie zarejestrowany tekst odzielony znakami tabulacji Witam mam nastepujacy problemik jezeli w excelu zapiszemy arkusz jako tekst rozdzielony znakami tabulaji to przegladajac stworzony w ten sposob pliczek tekstowy w notatniku mamy wyrazny podzial (odsetpy) tabulacjami natomiast jezeli zspisujemy do pliku przy pomocy vba to tekst owszem jest rozdzielony ale kilkoma spacjami oto przylkad kodu: Option Explicit Sub zapis() Const strNazwaPliku As String = "c:\tescik.txt" Dim Data Open strNazwaPliku For Output As #1 Print #1, "Test" Print #1, Tab; "test"; Tab; "test" Print #1, Tab(9); "test" Data = "test" Print #1, Tab; Data; Tab; Data; Close #1 End Sub prosze o pomoc darek 13-04-2005 11:06 karolinavb Typ: neutral Postów: 467 Zarejestrowany: Jan 2003 Pewnie dlatego, że Tab(9) - 9 kolumn, Tab użyte bez argumentu to przesunięcie do pocz±tku nastepnego obszaru wydruku, a jak mówi help obszary wydruku zaczynaj± się co 14- kolumn (print zone) Used to position the insertion point to an absolute column number, where n is the column number. Use Tab with no argument to position the insertion point at the beginning of the next print zone. Print zones begin every 14 columns. The width of each column is an average of the width of all characters in the point size for the selected font. _____________________________________________ Karolina 13-04-2005 13:29 anonim Typ: Nie zarejestrowany dokladnie jest tak jak to opisujesz - chyba zle sformulowalem pytanie jak w takim razie zapisac do pliku tekst i oddzielic do tabulacjami (a nie 14 lub 9 spacjami), czyli tak jak zapisujem akrusz excela poprzez plik zapisz jako - tekst oddzielony znakami tabulacji (wiem ze mozna zarejestrowac makro, ale ja chcialbym zapisywac bezposrednio do pliku) dziekuje i pozdrawiam darek 13-04-2005 14:48 anonim Typ: Nie zarejestrowany znalazlem rozwiazanie Print #1, "test"; Chr(9); "test" Chr(9) - to znak tabulacji i juz jest ok 13-04-2005 16:05 Wszystkich odpowiedzi: 3 :: Maxymalnie na stronę: 20 Strona: [ > ] z 1 |