Anlegen von 12 neuen Zeilen pro neue Objektnummer

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Option Explicit Sub Kopie() Dim Loletzte As Long Dim LoI As Long With Worksheets("Objektinformationen") Loletzte = IIf(IsEmpty(.Cells(Rows.Count, 1)), .Cells(Rows.Count, 1).End(xlUp).Row, . _ Rows.Count) Sheets.Add(after:=Sheets(Sheets.Count)).Name = "Fakturenliste" For LoI = 1 To Loletzte .Rows(LoI).Copy Range(Cells((LoI - 1) * 12 + 1, 1), Cells((LoI - 1) * 12 + 12, 1)) Next LoI End With End Sub

... die Schwarmintelligenz hat mE (mit) dazu geführt, dass eine Verlagerung der Produktprüfung und -Dokumentation vom Hersteller zum Kunden stattfindet. Dies kann man jedenfalls seit vielen Jahren zunehmend feststellen. Dies dient wohl vordergründig zum Zwecke der Gewinnmaximierung von Herstellern aber vor allem Monopolen wie MS. Die meisten Kunden können davon wohl nicht wirklichen adäquaten Nutzen ziehen, in Summe betrachtet werden möglicherweise viele sogar "draufzahlen".
Das von Dir Behauptete befindet sich sehr im Ungefähren. Dokumentation zu Excel ist nicht sonderlich wichtig, da der Ansatz "Tabellenkalkulation" schlichteren Gemütern sowieso erst vermittelt werden muss. Die bestehende Doku reicht eigentlich aus. Third-Party-Kompendien gibt es seit der ersten Stunde (M&T-Verlag und andere). Foren gibt es fast seit Etablierung des Internets. Warum soll ein Hersteller das nicht sich zunutze machen und mit einkalkulieren? So etwas sind einfach Multiplikatoren des Erfolgs. Gäbe es einen Konkurrenten, könnte man sich nicht ausruhen. Selbst aber das "Ausruhen" ist hier noch Fortschritt genug (Google schiebt z.B. bei Docs an; LO/OO usw. hecheln aber immer nur hinterher, mit Einzelfeature-Ausnahmen). Außerdem ändern sich die Zeiten, und man sollte nicht auf alles Vergangenheitskriterien anwenden.
Viele Unternehmen (ob groß oder klein) oder Behörden haben kaum noch die Möglichkeit wirklich "frei" zu entscheiden. Hersteller von Produkten mit wenigen Kunden (selbst wenn es tausende sein sollten) können preislich absolut betrachtet pro Kunde da natürlich nicht mit Monopol-Produkten mithalten, wenn auch relativ zumindest teilweise zwar schon. Bei Produktherstellern mit gegenüber MS-Produkten wenig Kunden, war oftmals vor Jahren noch der Käufer noch Kunde. Doch auch diese Hersteller beschreiten "nachziehend" zunehmend den zuvor beschriebenen Weg und dies leider auch zum Nachteil vieler Kunden aber auch oft nicht zum Vorteil dieser Hersteller.
Worüber klagst Du? Ich fühle mich wohl. Behörden verbrennen Geld durch nutzlose Menschen, die dort abhocken, besonders in (der Stadt) Berlin. Diese Menschen werden bis zum Tod über Arbeitsplatzkosten, Bezüge und Pensionen mit 4-5 Mio. Euro durchschnittlich pro Kopf (heutiger Stand, Schätzung) alimentiert. Verbrennen: Aber bitte doch nicht durch die lächerlichen MS-Software-Beträge, die durch Großlizenzen und maßgeschneiderte Einzelproduktzählung dort auch noch etwas sinken.
Die Schwarmintelligenz nutzt also sowohl den Kunden als auch den Produktherstellern. Entscheidend(er) dürfte sein, wohin führt diese Entwicklung? Oder einfach(er) gefragt, ist das Glas halb voll oder halb leer, oder gar schon vor dem überlaufen bzw. fast leer?
In Nordkorea ist das Glas halb leer. Anderswo gibt es immer wieder Wettbewerb. Microsoft segelt gekonnt vor der Kante dessen, wohinter andere aufspringen würden. Niemand (also &lt10%) interessiert sich für LO oder OO oder andere, weil der Preis für MS-Office immer noch tolerabel niedrig ist.

... ist so teuer nicht:
5 Lizenzen für 99 Euro p.a. maximal. shift-del hat auch mal eine Quelle genannt, wo es bis runter für gut 50 Euro erhältlich ist. Kauft man einen neuen PC, ist öfters die 5-er Lizenz für ein Jahr dabei, die dann auch für die 4 anderen PC's einsetzbar ist.
Außerdem sind alle Office-Teilprodukte mit drin (auch Access).
In den Foren schlagen die Antworter den Fragern oft um die Ohren, warum sie mit so alten Office-Versionen arbeiten. Nehmen wir an, dass ein Office älter als 3 Jahre als "alt" gilt. Dann müsste es weniger als 300 Euro kosten, um mit 365 mitzuhalten (dann aber nur an einem Platz, statt an fünfen!).
Außerdem kann man weiterhin Festversionen von MS-Office kaufen. Daher ist jegliche Kritik sowieso schon grundsätzlich fehl am Platze. Wird dort teilweise in irgendeiner Richtung ausgedünnt, dann: "So what?" Darf jeder Anbieter so halten, wie er will! Auch früher gab es bei Festversionen immer nur Service-Packs, aber keine Funktionalitätsaufrüstung. Wieso sollte das jetzt auf einmal anders sein? Wie kommt jemand auf die Forderung, das müsse jetzt so sein? 365 ist einfach das Äquivalent zu Win 10 "à la Google (dynamisch)". Microsoft folgt damit Google in der Innovation fernupgedateter Systeme, um nicht abgehängt zu werden.
Ein System dynamisch zu halten, kann man aber immer nur von einem Produkt einer Linie erwarten. Auch bei einem Riesenkonzern.
Effizienz und Gewinnmaximierung sind in unserem Marktsystem noch nicht verboten! Wer nichts zahlen möchte, kann zu LO wechseln und seiner Arbeit nachkommen. Davon kriege ich persönlich aber immer Fingerkrebs, auch wenn ziemlich aufgeholt wurde!
Keiner beklagt sich darüber, sich ein fettes neues Notebook für 2000 Euro zu gönnen. Das eigentliche Werkzeug jedoch ist Office! Auch Lightroom oder andere Spezialsoftware sind oft richtig teuer - den geringeren Umsätzen als bei MS-Office geschuldet.
Im privaten Bereich hat Microsoft meines Wissens in den knapp 40 Jahren bei der Verwendung von unrechtmäßigen Kopien immer beide Augen zugedrückt. Denn dort entsteht schließlich das Wissen am Produkt, und erst dieses Wissen zieht heran und erhält die Kunden, die gewerblich bereitwillig dann zahlen. Microsoft wäre einfach schlecht beraten, z.B. einen Studenten hier zu maßregeln.
Die Stadt München ist nach dem (10jährigen?) Open-Office-Ausflug (den ich gut und mutig fand) am Ende zu MS-Office zurückgekehrt, wenn ich richtig informiert bin. Also zwei Umstellungen, da viel Zeit zwischen dem Weg und Zurück lag.
Mit 365 packe ich entspannt Lizenzen auf meine gesamte persönliche Umgebung, die gleichzeitig genutzt werden darf, auch durch Frau oder Kind. Kann sein, dass wir mittlerweile bei 6 Lizenzen angekommen sind.
Rein technisch ist an 365 nichts auszusetzen: Stabil, da massiv getestet - und vermutlich modular neu designt. Das einzige ist vielleicht, dass Experimentalfeatures nicht bei allen (gleichzeitig) ankommen, obwohl sie es so eingestellt haben (Insider). Aber da 365 immer allem anderen voraus ist, ist das nur Klagen auf ungerechtfertigt hohem Niveau.
Also gönn' neben Deinen beiden Büro-PC's auch einem Notebook und Deiner Frau 365 Home. "Hassle-free!"
RPP63, Jockel und andere, die es mittlerweile auch nutzen, stellen es, genau wie ich, nie in Frage. "Hast Du 365, hast Du 365."
Immerhin ist Office für die meisten von uns 10%-20% der gesamten Lebenszeit inklusive Schlaf- und Ruhezeiten. Das darf mich zumindest 99 Euro im Jahr kosten. Der autogeile Deutsche zuckt beim Kauf des 50.000 Euro-Audi mit allen Features noch nicht einmal mit der Wimper! Es gehört ganz selbstverständlich zur Lebensart, immer angefeuert durch das, was der Nachbar in der Häschensiedlung der Young-Urban-Professionals gerade so fährt. Das Sparen mit einem jungen Gebrauchten anderer Automarken für nur 10.000 Euro kommt denen nicht ins Haus, wider jegliche Vernunft oder Überlegung. Auch denken immer noch viele, dass Leasing ein Geschenk ist. Wovon aber leben dann die Leasinggeber?

Sub M_snb() sn = Sheet1.ListObjects(1).DataBodyRange For j = 1 To UBound(sn) c00 = c00 & Replace(Space(12), " ", j & " ") Next Cells(2, 10).Resize(UBound(sn) * 12, UBound(sn, 2)) = Application.Index(sn, Application. _ Transpose(Split(c00)), Evaluate("transpose(row(1:" & UBound(sn, 2) & "))")) End Sub

Beliebteste Forumthreads (12 Monate)

Anlegen von 12 neuen Zeilen pro neue Objektnummer

15 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

15
Beiträge zum Forumthread

Beiträge zu diesem Forumthread