wieder was gelernt^^Es gibt keine if-Schleifen, da ist nur eine do....loop-schleife.
Die Suche ergab 33 Treffer
- Fr, 29.04.2011 15:47
- Forum: Makros und allgemeine Programmierung
- Thema: makro in externen docs?[erledigt]
- Antworten: 9
- Zugriffe: 896
Re: makro in externen docs?[erledigt]
- Do, 21.04.2011 08:01
- Forum: Makros und allgemeine Programmierung
- Thema: makro in externen docs?[erledigt]
- Antworten: 9
- Zugriffe: 896
Re: makro in externen docs?[erledigt]
weil ich ich zuerst prügeln gelesen habe, und weil die if-schleife voll brutal für mein hirn ist...aber es klappt =)
- Mi, 20.04.2011 15:52
- Forum: Makros und allgemeine Programmierung
- Thema: makro in externen docs?[erledigt]
- Antworten: 9
- Zugriffe: 896
Re: makro in externen docs? [erledigt]
lachkrampf xDDu mußt aus allen aktuell existierenden Elementen von Stardesktop, die geöffneten Dokumente auf den gewünschten Namen der Datei prügfen
danke für die antwort ^^ werds versuchen
- Mi, 20.04.2011 15:48
- Forum: Makros und allgemeine Programmierung
- Thema: Arztbrief
- Antworten: 13
- Zugriffe: 2065
Re: Arztbrief
also das makro .. ob es läuft kannst du im edior testen (play button drücken oben) wenn alles funzt dann kanns du im OO bei extras > anpassen deine buttons für die makros setzen (auf hinzufügen gehen pfad des makros wählen , button vergeben, fertig) so viel zum thema ereignisse mit der tastatur ...
- Mi, 20.04.2011 14:23
- Forum: Makros und allgemeine Programmierung
- Thema: makro in externen docs?[erledigt]
- Antworten: 9
- Zugriffe: 896
Re: makro in externen docs?
ich will einfach nur das zweite dokument ansprechen können
mit dem aktiven(jetzigen) macht man das ja mit
Sub dokument_ansprechen
dim oDoc as Object
dim oSheet as abject
odoc = ThisComponent
oSheet = oDoc.Sheets.getByIndex(0)
end sub
damit würde ich doc1.ods ansprechen7als aktiv festlegen ...
mit dem aktiven(jetzigen) macht man das ja mit
Sub dokument_ansprechen
dim oDoc as Object
dim oSheet as abject
odoc = ThisComponent
oSheet = oDoc.Sheets.getByIndex(0)
end sub
damit würde ich doc1.ods ansprechen7als aktiv festlegen ...
- Mi, 20.04.2011 14:06
- Forum: Makros und allgemeine Programmierung
- Thema: makro in externen docs?[erledigt]
- Antworten: 9
- Zugriffe: 896
Re: makro in externen docs?
hallo karo
habe ich schon probiert
leider nein..das dokument öffnet sich ja und jedes mal wenn ich das makro ausführe kommt ein neues doc auf..das doc 2 ist aber schon offen..dort soll mitels makro was gemacht werden
trotzdem danke für die mühe
gruß schnubber
habe ich schon probiert
leider nein..das dokument öffnet sich ja und jedes mal wenn ich das makro ausführe kommt ein neues doc auf..das doc 2 ist aber schon offen..dort soll mitels makro was gemacht werden
trotzdem danke für die mühe
gruß schnubber
- Mi, 20.04.2011 13:41
- Forum: Makros und allgemeine Programmierung
- Thema: makro in externen docs?[erledigt]
- Antworten: 9
- Zugriffe: 896
makro in externen docs?[erledigt]
hi
mich würde interessieren ob man ein makro in einer externen daei auführen kann
die Zutaten: ein funktionierendes makro , und 2 offene dokumente gespeichert unter doc1.ods und doc2.ods
im makro werden bestimmte aktionen im doc2.ods ausgeführt , dazu müsste ich es aber ansprechen
wie?
macht man es ...
mich würde interessieren ob man ein makro in einer externen daei auführen kann
die Zutaten: ein funktionierendes makro , und 2 offene dokumente gespeichert unter doc1.ods und doc2.ods
im makro werden bestimmte aktionen im doc2.ods ausgeführt , dazu müsste ich es aber ansprechen
wie?
macht man es ...
- Do, 14.04.2011 08:23
- Forum: Makros und allgemeine Programmierung
- Thema: mit MsgBox fehleranzahl/ergebnissanzahl ausgeben lassen?
- Antworten: 2
- Zugriffe: 551
Re: mit MsgBox fehleranzahl/ergebnissanzahl ausgeben lassen?
das ist ne fake liste , die adressen gibts net wirklich...außerdem sinds nich meine kollegen sondern ich habe die adressen selber gesucht die sind im netz öffentlich(wikipedia) und die logins hab ich mir ausgedacht keine sorge, die daten stehen bei den banken im impressum=) Die adressen sind von ...
- Do, 14.04.2011 07:51
- Forum: Makros und allgemeine Programmierung
- Thema: mit MsgBox fehleranzahl/ergebnissanzahl ausgeben lassen?
- Antworten: 2
- Zugriffe: 551
mit MsgBox fehleranzahl/ergebnissanzahl ausgeben lassen?
hey leute,
langsamm werde ich fast zum spammer, aber ein mal traue ich noch ein thread und zwar:
ich habe ein makro dass mir mittels searchdescriptor "rechtschreibfehler" sucht und markiert
kann man irgendwie mit msgbox die fehler zählen lassen dass am ende ein popp-up kommt "es wurden so und so ...
langsamm werde ich fast zum spammer, aber ein mal traue ich noch ein thread und zwar:
ich habe ein makro dass mir mittels searchdescriptor "rechtschreibfehler" sucht und markiert
kann man irgendwie mit msgbox die fehler zählen lassen dass am ende ein popp-up kommt "es wurden so und so ...
- Do, 07.04.2011 15:46
- Forum: Makros und allgemeine Programmierung
- Thema: alle leeren zellen finden und markieren
- Antworten: 10
- Zugriffe: 1350
Re: alle leeren zellen finden und markieren
angenommen ich würde nich im markierten bereicharbeiten wollen sondern in einer kompletten spalte und die leerzellen sollen nur bis zur letzt verwendeten zelle in der spalte markiert werden, sprich die leerzellen die nach der zuletzt verwendeten zelle kommen werden weiss gelassen. was müsste man ...
- Do, 07.04.2011 14:54
- Forum: Makros und allgemeine Programmierung
- Thema: alle leeren zellen finden und markieren
- Antworten: 10
- Zugriffe: 1350
Re: alle leeren zellen finden und markieren[fertig]
jetz klappts =),karo
- Do, 07.04.2011 14:08
- Forum: Makros und allgemeine Programmierung
- Thema: alle leeren zellen finden und markieren
- Antworten: 10
- Zugriffe: 1350
Re: alle leeren zellen finden und markieren[fertig]
Hallo
Oder so?
sub color_BlankCells
orange = thiscomponent.currentselection
onew = orange.queryEmptyCells
onew.cellbackcolor = rgb(250,250,0)
end sub
Karo
karo, bei deinem vorschlag kommt error es ist eine excepion aufgetreten com.sun.star.uno....den script den ich habe hab ich von dir ...
Oder so?
sub color_BlankCells
orange = thiscomponent.currentselection
onew = orange.queryEmptyCells
onew.cellbackcolor = rgb(250,250,0)
end sub
Karo
karo, bei deinem vorschlag kommt error es ist eine excepion aufgetreten com.sun.star.uno....den script den ich habe hab ich von dir ...
- Do, 07.04.2011 14:03
- Forum: Makros und allgemeine Programmierung
- Thema: alle leeren zellen finden und markieren
- Antworten: 10
- Zugriffe: 1350
Re: alle leeren zellen finden und markieren[fertig]
ja woah nice ,dankeich such die ganze zeit schon nach solchen tutorials
hab eigentlich gerade erst angefangen mit programmieren und so, bin da voll der noob drin, aber im betrieb werden bei mir schon volle makros verlangt und so kommts dass ich das buch bei seite 100 angefangen habe zu lesen =(
ich ...
hab eigentlich gerade erst angefangen mit programmieren und so, bin da voll der noob drin, aber im betrieb werden bei mir schon volle makros verlangt und so kommts dass ich das buch bei seite 100 angefangen habe zu lesen =(
ich ...
- Do, 07.04.2011 13:47
- Forum: Makros und allgemeine Programmierung
- Thema: alle leeren zellen finden und markieren
- Antworten: 10
- Zugriffe: 1350
Re: alle leeren zellen finden und markieren[fertig]
an welchem part genau? ....is net direkt mein eigener script xd ...der is halb geklaut ^^DPunch hat geschrieben:Aloha
Damit durchsuchst Du natürlich nur den markierten Bereich.schnubber hat geschrieben:selber rausbekommen =)
Wie Du die Zeile der letzten gefüllten Zelle herausfindest, steht in Deinem eigenen Code, und zwar Hier.
- Do, 07.04.2011 13:27
- Forum: Makros und allgemeine Programmierung
- Thema: alle leeren zellen finden und markieren
- Antworten: 10
- Zugriffe: 1350
Re: alle leeren zellen finden und markieren[fertig]
Sub leerezellennullen()
oSelect=ThisComponent.CurrentSelection
oColumn=oselect.Columns
oRow=oSelect.Rows
For n= 0 To oColumn.getCount-1
For m = 0 To oRow.getCount-1
oCell=oselect.getCellByPosition (n, m)
Select Case oCell.String
Case ""
oCell.cellbackcolor = RGB(250,250,0)
End Select
next
next
End ...
oSelect=ThisComponent.CurrentSelection
oColumn=oselect.Columns
oRow=oSelect.Rows
For n= 0 To oColumn.getCount-1
For m = 0 To oRow.getCount-1
oCell=oselect.getCellByPosition (n, m)
Select Case oCell.String
Case ""
oCell.cellbackcolor = RGB(250,250,0)
End Select
next
next
End ...