Die Suche ergab 222 Treffer

von bst
Fr, 09.01.2015 11:19
Forum: Calc
Thema: [gelöst] summewenn /Wert ausserhalb des gewünschten Bereichs
Antworten: 2
Zugriffe: 1697

Re: summewenn / Werte ausserhalb des gewünschten Bereichs

Hi, im 1. Parameter von Summewenn gibst Du den Bereich an in dem gesucht wird. Das darf bei Dir nur die Spalte A sein. Ansonsten findest Du den Code 10000 auch in den Einnahmen in Spalte B. B6: =SUMMEWENN(eingabetabelle.$A$7:$A$33;$A6;eingabetabelle.$B$7:$B$33) C6: =SUMMEWENN(eingabetabelle.$A$7:$A$...
von bst
Fr, 14.11.2014 11:39
Forum: Calc
Thema: Formel für Teilsummen
Antworten: 2
Zugriffe: 2480

Re: Formel für Teilsummen

Hi Wolfgang,

Code: Alles auswählen

C2: =WENN(A2="";"";SUMME(B$1:B2)-SUMME(C$1:C1))
nach unten kopieren.

cu, Bernd
von bst
Mi, 23.10.2013 10:05
Forum: Calc
Thema: Wert nach letztem Unterstrich
Antworten: 3
Zugriffe: 899

Re: Wert nach letztem Unterstrich

Morgen Martin,

aktiviere in Optionen Calc Berechnen Reguläre Ausdrücke und nimm:

Code: Alles auswählen

=TEIL(A2;SUCHEN("[^_]*$";A2);99)
cu, Bernd
von bst
Fr, 05.07.2013 08:59
Forum: Makros und allgemeine Programmierung
Thema: [gelöst] Zellen innerhalb einer CellRange indizieren
Antworten: 8
Zugriffe: 2430

Re: Zellen innerhalb einer CellRange indizieren

Hi,

versuche das mal so.

cu, Bernd
--

Code: Alles auswählen

Sub Main
   oSheet = ThisComponent.currentController.ActiveSheet
   For i = 0 To 7
      For j = 0 To 4
         oSheet.GetCellByPosition(j,i).String = "Z" & i+1 & " S" & j+1
      Next
   Next
End Sub
von bst
Mo, 10.06.2013 17:35
Forum: Makros und allgemeine Programmierung
Thema: Mehrere Dateien zusammenfügen
Antworten: 23
Zugriffe: 10227

Re: Mehrere Dateien zusammenfügen

Hi,

das funktioniert wohl so wie in Excel, die gerade aktive Tabelle wird exportiert. Es scheint also auszureichen diese nach dem Öffnen zu wechseln.

Code: Alles auswählen

         oSheet = oWorkbook.Sheets.getByIndex(0)
         oWorkbook.getCurrentController.setActiveSheet(oSheet)
HTH, Bernd
von bst
Fr, 17.05.2013 13:42
Forum: Makros und allgemeine Programmierung
Thema: Mehrere Dateien zusammenfügen
Antworten: 23
Zugriffe: 10227

Re: Mehrere Dateien zusammenfügen

Hi,

Lasse mal den cmd /c weg, warum auch immer?

Code: Alles auswählen

shell "e:\test\test.bat"
funktioniert hier. Oder nimm ShellExecute.

Siehe: http://forum.openoffice.org/en/forum/vi ... 20&t=14220

cu, Bernd
von bst
Fr, 17.05.2013 12:52
Forum: Makros und allgemeine Programmierung
Thema: Mehrere Dateien zusammenfügen
Antworten: 23
Zugriffe: 10227

Re: Mehrere Dateien zusammenfügen

Hi,

versuche das mal mit shell, ggf. mit Shell("cmd /c PfadUndNameDerBatch")

Und ebenfalls ein schönes Wochenende,

Bernd
von bst
Do, 16.05.2013 10:20
Forum: Makros und allgemeine Programmierung
Thema: Mehrere Dateien zusammenfügen
Antworten: 23
Zugriffe: 10227

Re: Mehrere Dateien zusammenfügen

Hi, und bitteschön, gerne. Lies mal das erste Thema hier im Forum, Stephan's "Informationen zur StarBasic-Programmierung", da findest Du viele Hinweise. Ich lese außerdem in Foren mit und habe mir das Buch Makros in OpenOffice.org 3 von Thomas Krumbein zugelegt. http://www.amazon.de/Makros...
von bst
Do, 16.05.2013 08:50
Forum: Makros und allgemeine Programmierung
Thema: Mehrere Dateien zusammenfügen
Antworten: 23
Zugriffe: 10227

Re: Mehrere Dateien zusammenfügen

Morgen, Ich habe das mit der Startzeile nicht probiert. Möglicherweise betrifft das nur das Einlesen einer CSV-Datei. Zur Auswahl eines Verzeichnisses versuche mal so etwas. cu, Bernd -- Sub TestIt Dim sFolder As String sFolder = PickFolder("c:\") if len(sFolder) > 0 then Print sFolder end...
von bst
Mi, 15.05.2013 13:49
Forum: Makros und allgemeine Programmierung
Thema: Mehrere Dateien zusammenfügen
Antworten: 23
Zugriffe: 10227

Re: Mehrere Dateien zusammenfügen

Hi, nimm mal für alle.csv ein anderes Verzeichnis. Möglicherweise wird alle.csv denn sonst vom for %%i in (*.csv) ebenfalls 'erwischt'. Und, um alle CSV-Dateien untereinander zu kopieren sollte M.E. eigentlich auch ein einfaches: TYPE *.csv > ..\alle.csv ausreichen. Beachte dass die Zieldatei (bei g...
von bst
Mi, 15.05.2013 12:20
Forum: Makros und allgemeine Programmierung
Thema: Mehrere Dateien zusammenfügen
Antworten: 23
Zugriffe: 10227

Re: Mehrere Dateien zusammenfügen

Nochmals Hi, versuche das mal so. HTH, Bernd -- REM ***** BASIC ***** Sub Main Dim oSFA As Object, oWorkbook As Object Dim sSrcURL As String, sName As String, sDstURL As String Dim aListe(), Arg() Dim arFilter(1) As New com.sun.star.beans.PropertyValue sSrcURL = convertToURL("e:\test\ooo\"...
von bst
Di, 14.05.2013 16:50
Forum: Makros und allgemeine Programmierung
Thema: Mehrere Dateien zusammenfügen
Antworten: 23
Zugriffe: 10227

Re: Mehrere Dateien zusammenfügen

Hi, das ist ein Basic Macro. Tue das in irgendeine (andere) ODS-Datei in ein normales Modul und starte es dann von dort. "e:\test\ooo\" ist der Pfad in dem alle Deine zu wandelnden Dateien liegen müssen, die Ausgabe erfolgt ebenfalls dorthin. Die Datei mit dem Makro sollte besser in einem ...
von bst
Di, 14.05.2013 10:01
Forum: Makros und allgemeine Programmierung
Thema: Mehrere Dateien zusammenfügen
Antworten: 23
Zugriffe: 10227

Re: Mehrere Dateien zusammenfügen

Morgen, dieses konvertiert alle Dateien eines Verzeichnisses von ODS in CSV. Diese kannst Du dann auf einer Kommandozeile via "type *.csv > ..\alle.csv" bzw. "cat *.csv > ../alle.csv" zusammen fassen. Reicht Dir das? cu, Bernd -- REM ***** BASIC ***** Sub Main Dim oSFA As Object,...
von bst
Di, 07.05.2013 10:37
Forum: Calc
Thema: Verkettung weiter bearbeiten
Antworten: 5
Zugriffe: 1346

Re: Verkettung weiter bearbeiten

Hi,

Code: Alles auswählen

=INDIREKT(VERKETTEN(A1&B1))
cu, Bernd
von bst
Do, 02.05.2013 13:43
Forum: Calc
Thema: Buchstaben als Ziffern erkennen
Antworten: 1
Zugriffe: 833

Re: Buchstaben als Ziffern erkennen

Hi,

meinst Du das so?

Code: Alles auswählen

=DEZIMAL("A1Z";36)
liefert hier 13031, d.h. 10 * 36^2 + 1 * 36^1 + 35 * 36^0

cu, Bernd