Re: [de-users] Sortieren in Calc

hrbrgr@t-online.de schrieb am 10.09.2016 um 12:06:
> Hallo Irmhild,
>
>
>
> -----Original-Nachricht-----
> Betreff: Re: [de-users] Sortieren in Calc
> Datum: 2016-09-10T10:13:22+0200
> Von: "Irmhild Rogalla" <irmhild.rogalla@institut-pi.de>
> An: "users@de.libreoffice.org" <users@de.libreoffice.org>
>
> Hi,
>
> [...].
>
> .......... (das hatte wir schon öfter, dass
> nachträgliches Formatieren nicht richtig wirkt).
>
> Wenn ich es richtig sehe, wird die einzelen Zelle schon richtig formatiert (Prüfung über 
> Format|Zellen|Kategorie), aber eine eingegebene Ziffer als Text bleibt halt Text. Man sieht dies 
> auch an der Eingabezeile, Formatierte Zelle als Text zeigt z.B. -1- und eine formatierte Zelle 
> als Zahl zeigt -'1- (natürlich ohne Bindestriche). Ob das richtig ist, mag ich nicht beurteilen.
>
> Viele Grüße
>       Irmhild
>
>
> 

Ja, und eine Lösung gibts auch schon sehr lange...

Calc_Tools_CT.oxt von Thomas Krumbein


Ausschnitt:
------8<-------------

'/** Calc_TexteZuWerten()
'*************************************************************************.
'* @kurztext konvertiert Zelltexte zu Zellwerten
'* Diese Funktion  konvertiert Zelltexte zu Zellwerten
'*************************************************************************
'*/
sub Calc_TexteZuWerten()
  dim aZellen()   'Liste der Zellen
  dim Zelle()     'ein Zellarray
  dim oZelle as variant  'Zelle als Objekt
  dim s as string, i as long

  if NOT Helper.CheckCalcDokument(ThisComponent) then exit sub
  aZellen = Helper.getCellListeSelektion(thisComponent.getCurrentSelection())
  for i = 0 to UBound(aZellen)
    Zelle = aZellen(i)
    oZelle =
thisComponent.getSheets().getByIndex(Zelle(0)).getCellByPosition(Zelle(1),
Zelle(2))
    if oZelle.getType() = 2 then 'nur bei Wertezellen
      s = oZelle.string
      oZelle.FormulaLocal = s
    end if
  next
end sub


------8<-------------

<http://www.heise.de/ct/ftp/10/10/174/>



-- 
Gruss
  Bernd

-- 
Liste abmelden mit E-Mail an: users+unsubscribe@de.libreoffice.org
Probleme? http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps 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