hrb...@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.roga...@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+unsubscr...@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

Antwort per Email an