Am 23.10.2011 13:02, schrieb gooly:
Hi,
es ist für mich ein bisschen verwirrend, dass die Funktionen im
'deutschen' LO eingedeutscht sind, wenn ich die in ein Makro
übertragen will und im OO-Makro-PDF von Pitonyak.
1.)
Bsp: Zur Auswahl der zu sortierenden Spalte soll man (auch) den
Spaltenbuchstaben eingeben können.
Das habe ich mir dazu 'ausgedacht' aber das scheitert schon allein
daran, dass ich keinen String aus dem sheet in eine Variable einlesen
kann - Integer-Werte schon?
...
dim v as Variant
dim s as String
dim sorColumn as Integer
v=AnylseSheet.getCellByPosition(1,1).value 'in B2 steht L => v=0??
' Alternativ-Versuch:
s=AnylseSheet.getCellByPosition(1,1).value 'B2 mit L => s="0"??
Das Muss so heißen.
s=AnylseSheet.getCellByPosition(1,1).String
' so wollte ich das Konvertieren:
If IsNumeric(v) Then
sortColumn = v
Else
sortColumn = ASC(UCase(v))-ASC("A")
End If
Umrechnung eines Buchstaben in die Spaltennummer in einem LO-Sheet:
=CODE(GROSS(B2))-CODE("A")
Gross(), Code() und Typ() gibt es offenbar nicht in der engl. Version,
also wie heißen die jetzt?
a) Es gibt ASC(): lt. Pitonyak:
ASC(str) Return the integer ASCII value of the first character in the
string. This supports 16-bit Unicode
values as well.
Im Sheet aber ergibt die Funktion =ASC("l") => l ??
Danke schon mal,
Gooly
Erst einmal sind die Funktionen im den Tabellen etwas ganz anderes als
die Basic Funktionen in den Makros.
Ich empfehle dir deshalb erst einmal das Basic Tutorial. durchzulesen,
bevor du anfängst Makros zu Programmieren.
hier der Link zum Tutotial:
http://wiki.services.openoffice.org/wiki/DE/Makro_Basic_Tutorial
Gruß
frieder
--
Informationen zum Abmelden: E-Mail an [email protected]
Tips zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert
