Zum Inhalt springen

-roTekuGeL-

Mitglieder
  • Gesamte Inhalte

    1163
  • Benutzer seit

  • Letzter Besuch

Alle Inhalte von -roTekuGeL-

  1. aso na dann such mal bei deiner IHK, Bremen oder Hamburg, oder wo du bist, die sollten die Anträge zum Download haben...
  2. wieso? was willst du denn machen? hab hier nen Antrag, der is aber von meiner IHK hier, ergo nich das was du suchen wirst
  3. *arm nehm und an Kuschelecke festkett* sooo damit du nicht wieder so schnell verschwindest :hodata
  4. is halt nur schlecht wenn dann noch eine Klausel "nicht übertragbar" im Vertrag drinsteht
  5. na is doch klar... warum schwer wenns auch einfach geht... und kann man in einer schwierigeren Sprache mehr ausdrücken als in einer leichten? es kommt ja auf die Verständigung an, das Mittel also die Sprache ist dabei ja ziemlich egal... aber nun genug OT
  6. *sich, wenn er diesen Thread liest, wünscht einen schnelleren PC zu haben*
  7. na wenn das so ist :e@sy irgendwie gehts mir heute nich so gut... heute code ich hier einen mist zusammen: Sub CreateCharts(strRange As String, bolPie As Boolean, strSheet As String, strChartName As String _ , Anfang As Integer, Ende As Integer, strTitle As String, intCol2 As Integer, intRow2 As Integer, intSub As Integer) Dim intRow As Integer, intCol As Integer intRow = intRow2 intCol = intCol2 [...] If strSheet = "C" Then Do While Tabelle3.Cells(intRow, intCol) <> "" intRow = intRow + 1 Loop intRow = intRow - 2 intCol = intCol + 1 ActiveChart.SetSourceData Source:=Sheets("C Pivots").Range(Chr(64 + intCol2) & intRow2 & ":" & Chr(64 + intCol) & intRow), PlotBy:=xlColumns Else Do While Tabelle4.Cells(intRow, intCol) <> "" intRow = intRow + 1 Loop Do While Tabelle4.Cells(intRow - 1, intCol) <> "" intCol = intCol + 1 If intCol >= 27 Then intCol = intCol - 27 Do While Tabelle4.Cells(intRow, 26 + intCol) <> "" intCol = intCol + 1 If intCol >= 27 Then intCol = intCol - 27 Do While Tabelle4.Cells(intRow, 52 + intCol) <> "" intCol = intCol + 1 Loop intCol = intCol + 52 ActiveChart.SetSourceData Source:=Sheets("P Pivots").Range(Chr(64 + intCol2) & intRow2 + 2 & ":" & "B" & Chr(64 + intCol) & intRow - 2), PlotBy:=xlColumns Exit Do Exit Do End If Loop intCol = intCol + 26 ActiveChart.SetSourceData Source:=Sheets("P Pivots").Range(Chr(64 + intCol2) & intRow2 + 2 & ":" & "A" & Chr(64 + intCol) & intRow - 2), PlotBy:=xlColumns Exit Do End If ActiveChart.SetSourceData Source:=Sheets("P Pivots").Range(Chr(64 + intCol2) & intRow2 - intSub + 1 & ":" & Chr(64 + intCol - (2 * intSub) + 2) & intRow - 2), PlotBy:=xlColumns Loop End If [...] End Sub [/PHP] sieht hier jemand was wie man das vereinfachen kann?
  8. das war doch nicht etwa deine Freundin da drin? :eek: :floet:
  9. was, denke ich mal, im Auge des Betrachters liegt
  10. wusste ich doch, dass nicht nur ich so denke :floet:
  11. okok, hab eingesehn dass ich vorher nur nicht drauf aufmerksam geworden bin aber bei der wiederumstellung gibt es doch nur leidtragende, bis auf die Chefredakteure von Magazinen wie dem Spiegel, die sich dann wahrscheinlich einbilden was besonderes getan zu haben aber nun gut sei es drum... ich werd einfach abwarten... am ende wird wahrscheinlich jeder so schreiben dürfen wie er will... un ich währ da sähr fro drübr
  12. bloß nich! sonst wachsen mir noch eiszapfen an der Nase, die haben die Klima mal wieder viel zu kalt eingestellt
  13. mh dann hab ich das wohl nicht mitbekommen... aber wie auch immer, entweder man sagt gleich von Anfang an Nein dazu oder beugt sich der Reform, aber den mist den die jetzt anzetteln versteh ich echt nicht... ich hoffe nur inständig dass die Schulen die alten Duden nicht schon entsorgt haben
  14. also ich finde ja Dooley sollte den Title "hottest soapie ever" erhalten ich mein so viel fell ist einfach nur *grrrr* :D
  15. was mir nicht in den Kopf geht, warum erst jetzt und nicht schon vor Jahren, als der ganze unsinn eingeführt wurde mittlerweile komme ich mit den neuen Schreibweisen (relativ) gut zurecht und hab ehrlichgesagt keine lust mehr wieder auf die alte zu wechseln... ist schon komisch... vor n paar jahren war die neue Rechtschreibung genauso gestalltet wie heute, nur stört es heute auf einmal jeden...
  16. ich glaub der Urlaub tut dir nich gut... *mal an Kopf fass* mönsch der is ja ganz heiß
  17. naja die Sonne hat die halt wieder hervorgelockt
  18. also das wäre dann schon etwas schwammig, es sollte schon klare regeln geben, außerdem wie dick soll ein Duden sein in dem jedes Wort in 2 Varianten drin steht
  19. LOOOOL!!!! Hammergeil!!! :bimei :OD :bimei :uli *rofl* mh komisch kannte ich noch gar nich
  20. ahhh da isses ja, das digge ding :e@sy :hodata *gähn* gestern 5 Stunden unterwegs gewesen... und nur einen Kaffee getrunken :eek: naja wenigstens war die fahrt nich sooo langweilig... hawky, du kennst nicht zufällig ein paar mädels, die gestern so um 18:30 auf der A3 bei Würzburg in einem blauen Saab (schätzungsweise Bj. 2003-04) unterwegs waren?
  21. soooo... also kleines fazit der SMS 2004: waren mal wieder haufn leute da (nicht nur die Cops ) und die DJs waren auch spitze, zumindest war ich von Sven Väth sehr angetan... nur schade dass ich die Chemical Brothers verpasst hab so und jetzt erstmal ne runde schlafen, morgen is ja der Urla** zu ende und es geht wieder ans arbeiten... bis denn, dann
  22. tja muss ich wohl... naja sie geht heute zum Friseur, da kann ich dann ja gleich mal ihre neue Frisur bewundern :floet: danke, aber brauch ich doch eh nicht in was für nem Ghetto wohnst du denn Display vom radio nicht abgenommen gehabt? also ich bin denke ich mal relativ sicher... wohngebiet, Auto direkt vor zig fenstern anderer, Tanke mit Videoüberwachung direkt daneben soo ich glaub ich geh dann mal auf ins FS und danach schön kühl planschen *mixki mal gaaanz doll :e@sy *

Fachinformatiker.de, 2024 by SE Internet Services

fidelogo_small.png

Schicke uns eine Nachricht!

Fachinformatiker.de ist die größte IT-Community
rund um Ausbildung, Job, Weiterbildung für IT-Fachkräfte.

Fachinformatiker.de App

Download on the App Store
Get it on Google Play

Kontakt

Hier werben?
Oder sende eine E-Mail an

Social media u. feeds

Jobboard für Fachinformatiker und IT-Fachkräfte

×
×
  • Neu erstellen...