OpenOffice.info

sub join_to_ColA()
with thisComponent.sheets(0) '1.Tabelenblatt

for i = 0 to  999  ' zeilenindex anpassen
    data = .getCellRangeByPosition(0, i, 11, i).getDataArray()
    sstring = join( data(0), ";")
    .getCellByPosition(0, i).string = sstring
next
end with
end sub

Hallo

[code]sub join_to_ColA()
with thisComponent.sheets(0) '1.Tabelenblatt

for i = 0 to 999 ' zeilenindex anpassen
data = .getCellRangeByPosition(0, i, 11, i).getDataArray()
sstring = join( data(0), ";")
.getCellByPosition(0, i).string = sstring
next
end with
end sub[/code]

Wozu brauchst du das ??

Karo

Hallo,

warum Makro?
Das geht doch über
- Datei
- Speichern unter
- Dateityp: Text CSV (.csv)
-- Filtereinstellungen bearbeiten = Häkchen rein
- Speichern

Im erscheinenden Fenster den Feldtrenner auf Semikolon ; einstellen.
Fertig.



Gruß
balu