Suchergebnisse
Suchergebnisse 1-30 von insgesamt 32.
Hier erfahren Sie, wie einfach Sie Ihren Browser aktualisieren können.
-
Hallo liebe User von VB-Paradise, ich habe folgendes Problem und hoffe, dass Ihr mir dabei weiter helfen könnt. In einer Pivot-Tabelle (Basis OLE) filtere ich einzelne Namen an und übergebe anschließend auf Basis dieser Namen einen bestimmten Bereich als E-Mail an Outlook. An sich funktioniert das wunderbar. Jetzt habe ich allerdings festgestellt, dass nicht alle dargestellten Namen in der Pivot-Tabelle "abgearbeitet" werden. Beispiel: Ich habe 8 Namen - also eigentlich auch 8 E-Mails. Erzeugt w…
-
Hallo cry.baby, hallo petaod, vielen Dank für Eure Hilfe. Ich habe mir die Tabellen nochmal angesehen, da es sich um eine Test-Datei handelt, ging die Prüfung ob der Suchbegriff öfter vorkommt ganz schnell. Dies ist nicht der Fall. Im Anschluss habe ich "Range" durch "Union" ersetzt. Hier kommt allerdings die Fehlermeldung dann bei Zeile 15 "Fehler beim Kompilieren | Sub oder Function nicht definiert". Erweitere ich diese Zeile um "Active.Sheet" erscheint eine neue Fehlermeldung nun bei Zeile 17…
-
Hallo Cry.Baby, sorry das ich mich erst jetzt melde. Ich war einige Tage außer Gefecht gesetzt und bin erst heute wieder im Büro. Erstmal tausend Dank für deine erneute Hilfe. Setze ich das Makro allerdings ein, bekomme ich bei Zeile 13 "Range" folgende Fehlermeldung: Fehler beim Kompilieren: Falsche Anzahl an Argumenten oder ungültige Zuweisung zu einer Eigenschaft Ich verstehe nicht was hier schief läuft. Hast du eine Idee wie man diesen Fehler in den Griff bekommt? Vielen Dank nochmals, bis b…
-
Hallo liebe VBA-Cracks, kurz vor dem WM Spiel heute habe ich eine verzweifelte Frage an Euch, bei der ich hoffe, das Ihr mir die Lösung verraten könnt. Excel-Version: 2016 Ich habe eine Pivot-Tabelle, aus der ich einzelne PivotItems aus einem PivotField auswähle und möchte diese Items im Anschluss dann zu drei Gruppen zusammenfassen. Mein bisheriger Code - aufgenommen mit dem VBA Rekorder - sieht so aus: Sub PivotFields_auswaehlen() 'relevante WBS-Elemente anfiltern. ActiveSheet.PivotTables("Piv…
-
Hallo petaod, hallo cry.baby, vielen, vielen Dank für Eure Hilfe. Ich kann mich cry.baby nur anschließen - ich habe durch euch viel gelernt. Habe jetzt den Code von petaod verwendet und es läuft alles wunderbar. Wünsche euch noch eine schöne Woche. Liebe Grüße Jörg
-
Hallo cry.baby, super - du bist mein Held. Vielen Dank! Ich schau es mir jetzt noch einmal genauer an, damit ich es auch richtig verstehe. Dir noch eine schöne Woche. Jörg
-
Hallo cry.baby, vielen Dank für deine schnelle Hilfe. Aber ich verstehe nicht was du meinst - ich sitze gerade irgendwie auf dem Schlauch. Soll ich jetzt das komplette Array sein lassen und nur mit dem aufaddieren von Zeilen weitermachen. Aber ich muss doch die Infos, in welcher Zeile die Bedingung erfüllt ist, in ein Array bringen, damit ich später hieraus meine zweiten Variablen bilden kann. Ziel soll sein, dass zum Schluss in einer Mail steht: "Die Veränderungen zur Vorwoche sind auf folgende…
-
Liebe VB-Paradise User, ich stehe mal wieder vor einer Frage für die mir mittlerweile keine Lösung einfällt In Spalte "D" habe ich eine Liste von Datumswerten. Diese Liste lese ich in ein Array ein und vergleiche im nächsten Schritt, ob das Datum aus dem Array größer ist als der "Datumswert -7 Tage". An sich funktioniert dies wunderbar. Nun möchte ich aber, dass mir dann, wenn ein solcher Fall gefunden wird mir die Zeilennummer ausgegeben wird, in dem dieser Fall eintritt. Im Anschluss möchte ic…
-
Update: Hallo cry.baby, ich habe es jetzt mit der dynamischen Auswahl versucht, und es klappt wunderbar. Nochmals vielen Dank für den Tipp. Schöne Grüße Jörg *** Hallo cry.baby, vielen Dank für deine Hilfe. Sorry, dass ich erst heute antworte, aber ich bin erst heute wieder im Büro. Ich habe es jetzt mal mit deinen Tipps versucht (Dim as Long, Pivot_Table als PivotTable deklariert ...) Leider bekomme ich immer noch die Fehlermeldung 1004 Aber ich werde jetzt mal deinen anderen Tipp versuchen und…
-
Hallo liebe Forum Mitglieder, heute benötige ich schon wieder dringend eure Hilfe. Ich versuche verzweifelt aus einer Pivottabelle die Gesamtsumme in eine Variable zu schreiben, die ich dann später in einem Makro weiterverarbeite. Ich habe bereits über Makrorekorder versucht, die exakten "Feldnamen" der Pivot-Tabelle zu bekommen. Ergebnis: ActiveCell.FormulaR1C1 = "=GETPIVOTDATA(""[Measures].[Proposal Value Euro]"",R10C1)" Diese Formel habe ich nun versucht für VBA umzuwandeln und habe folgendes…
-
Hallo Henry, vielen Dank für deine schnelle Hilfe. Leider funktioniert dieses Vorgehen nicht. Es kommt ebenfalls die Fehlermeldung "91". Ich habe jetzt aber einmal "with objmail.createitem(0)" geschrieben, statt objnachricht und nun klappt alles wie gewünscht. Nochmals danke für deine Zeit. Schöne Grüße Jörg
-
Hallo Henry, super 1000 Dank - das wars. So simple und ich wäre fast verzweifelt. Was ich allerdings jetzt eben festgestellt habe, ist das mir das Makro nun alle "Serienmails" in eine einzige Mail schreibt. Er erzeugt eine Mail, schreibt die Daten von Person 1 in diese Mail, schreibt aber direkt darunter dann im nächsten Schritt die Daten von Person 2 usw. So dass ich zum Schluss eine einzige Mail mit den Infos aller Personen haben, statt getrennte E-Mails. Hast du hier noch eine Idee? Schöne Gr…
-
Hallo liebe Spezialisten, ich benötige wieder einmal eure Hilfe. Ich arbeite mit Outlook 2013 und Excel 2013. Ich habe ein VBA Makro erstellt, bei dem aus einer Pivot-Tabelle relevante Personen ausgelesen werden. Pro Person soll dann der Pivot-Tabellen Inhalt kopiert und als Mail an die Person verschickt werden. Der erste Durchlauf funktioniert wunderbar. Sobald jedoch eine Mail an die zweite Person verschickt werden soll, erhalte ich die Fehlermeldung "Laufzeitfehler 91: Objektvariable oder Wit…
-
Hallo VB-Paradise Gemeinde, nachdem ihr mir schon ein paar male geholfen habt, kommt hier die nächste Frage. Leider habe ich bis jetzt im www keine Infos gefunden, die mir bei meinem Problem weiterhelfen. Ich möchte aus Excel heraus, aus ganz bestimmten Zellen, z.B. c34 den Wert im Diagrammdatenraster eines Diagramms in PowerPoint auf einem bestimmten Chart (z.B. Nr. 10) kopieren. Darüber hinaus soll für dieses Chart ein Textfeld erstellt werden, welches einen Text einfügt, der ebenfalls in Exce…
-
Pivot Berichtsfilter klappt nur beim ersten mal, danach werden die Daten nicht mehr aktualisiert
BeitragHallo Communitie, ich stehe mal wieder vor einen riesen Problem Ich habe ein Array mit unterschiedlichen Projektnamen gefüllt (Variable = wbs_index bzw wbs) Es wird eine Pivot-Tabelle erzeugt (klappt wunderbar). Diese soll über den Bereichsfilter "wbs_index" die jeweiligen individuellen Werte für das über den index eingetragene Projekt darstellen. Das klappt beim ersten mal wunderbar. Das war es aber auch schon. VBA zeigt zwar die wbs_index Variablen korrekt an, jedoch hat dies keinen Einfluss a…
-
Hallo VaporiZed, irgendwie klappt das bei mir immer noch nicht. Aber vielen Dank für deine Mühen. Ich versuche es jetzt irgendwie anders zu lösen. Schönes Wochenende Jörg
-
Hallo VaporiZed, ich habe nun dein Macro ausprobiert. Leider funktioniert es doch nicht 100% so wie gewünscht. Bei der ersten Schleife macht das Makro seinen Job ganz gut. Es schreibt nur nicht den Namen der letzten Zelle hin. Setzt der zur zweiten Schleife an, stimmt nichts mehr. Das Marko zählt nur noch die Zeilen runter, also 4, 5, 6, 7, 8 ... und daneben wird nur noch eine 1 eingetragen. Hat noch jemand eine Idee hier? Schöne Grüße Jörg
-
Hallo VaporiZed, schon mal vielen Dank für deine Hilfe. Ich probiere es gleich mal aus, wenn ich im Büro bin. Schöne Grüße Jörg
-
Liebe Community, ich habe mal wieder ein Problem und somit eine Frage an Euch: Ich bräuchte einen VBA Code der mir die Zeile nennt und die Differenz zum vorherigen Wechsel, in der sich ein Wert ändert, der in den vorherigen Zeilennummern gleich war, Beispiel: * Zeilen Nr * Projekt * * * 1 * Banane * * * 2 * Banane * * * 3 * Banane * Hier bräuchte ich die Zeilennumer, also 3 und die Differenz zu vorher = 3 * * 4 * Apfel * * * 5 * Apfel * Hier bräuchte ich die Zeilennumer, also 5 und die Differenz…
-
Hallo, am Anfang sollte es nur die kleinste Zahl sein. Jetzt kamen die drei kleinsten Zahlen mit hinzu. Insgesamt sollen nun die Zeilen mit den drei kleinsten Zahlen farbig hinterlegt werden. Mehr Zahlen werden nicht benötigt. Grüße Jörg
-
Hallo Mono, gerne doch. Sub test4() Dim myrange as range Dim answer as variant For i = 1 to 3 set myrange = Worksheets(„Tabelle10")Range("E2:E17") answer = Application.WorksheetFunction.Small(myrange, i) MsgBox answer 'Range("3:3").Font.Colorindex = 8 ' *** nur als Hilfestellung für den Befehl die Zeile farbig zu gestalten, wenn die Zeilennummern endlich ermittelt wurde. '‚With Application.WorksheetFunction.Small '.Match '.... *** Das Ergebnis meines letzten Versuchs, Basis ist die Formel aus Ex…
-
Hallo und einen schönen guten Abend Zusammen, dank euch bin ich mit meinen VBA-Kenntnissen schon deutlich weiter gekommen. Allerdings hänge ich jetzt schon seit Stunden an einer für euch bestimmt simplen Aufgabe. Über die Application.Worksheet.Function Eigenschaft "small" ermittle ich den kleinsten Wert innerhalb einer Spalte. Dies klappt wunderbar. Nun möchte ich jedoch, dass die Zeile farbig hinterlegt wird, in der dieser kleinste Wert steht. Eigentlich dachte ich, dass ich einfach die Zeilen-…
-
Hi Mono, danke nochmals für deine Hilfe gestern. Aktuell habe ich eine per Hand in eine Tabelle eingetragene Übersicht über die vorkommenden Namen. Hier ermittle ich die Anzahl und übergebe die Namen in ein Array. Mit den Werten aus der Spalte Projekt und den Firmen startet dann ein Reporting, welches mir diese beiden Merkmale in Gruppen gegenüberstellt. Man könnte das auch auf alle Fälle mit einer Pivot-Tabelle machen, ich würde hier jedoch gerne auf ein VBA Makro zurückgreifen. Da diese Urspru…
-
Hallo -blaze-, erstmal vielen Dank für Deine Mühen und Deine Ausarbeitung. Beim lesen hat mir ehrlich gesagt der Kopf etwas geraucht Nichtsdestotrotz werde ich mich gleich mal hinsetzen und versuchen Deinen Vorschlag nach VBA zu konvertieren. Da ich selber auch (noch) kein großer VBA-Kenner bin, wäre ich nachwievor auf die Hilfe weiterer Foren-Mitglieder dankbar. Aber wie gesagt, ich versuche mal etwas zusammenzustellen. Schöne Grüße Jörg
-
Hallo liebe Forenmitglieder, ich stehe heute wieder einmal vor einem Problem und hoffe, dass ihr mir helfen könnt. Ich möchte in ein Array eine Exceldatei einlesen, Beispiel s.u. Anschließend sollen aus dem Array alle Doppler entfernt werden, die unter der Spalte Dienstleister aufgelistet sind. Das ganze soll darf jedoch nicht sortiert werden, da wir eine spezifische Rangfolge haben. Mit diesem Array nun neu "aufgebauten" Array möchte ich dann weiter arbeiten. Bis dato habe ich die Dienstleister…
-
Hallo Mono, super - vielen Dank! Jetzt sieht es so aus, wie es sein sollte. Bei den %-Berechnungen muss noch etwas angpasst werden (710866073741473%), aber das krieg ich hin. Nochmals 1.000 Dank für alles und hoffentlich bis bald mal wieder. Schöne Grüße Jörg
-
Sorry, bei mir dauert heute das mit dem Verständnis etwas länger. Also die KPIs stehen in der Spalte A1:A29 Die Monatswerte stehen in den Bereichen B1:M29. Wobei in der ersten Zeile die Namen der Monate stehen und in den jeweilgen Zeilen die entsprechenden Wert* * Januar * Februar * März * Labour Charged by Hourly Rate * 1.000 * 2.000 * 0 * Internal Service Costs * -5.000 * -7.000 * 0 * Direct Project Costs * -2.000 * 0 * 0 * ... * * * Ziel: * * 10% Abweiung zum Vormonat (Febr. zu Jan), wenn Ja …
-
Hallo, ich habe einmal ein Screenshot mit beigefügt. Das Makro soll den aktuellen Monat mit dem Vormonat vergleichen und dann die KPIs herausschreiben, die für diesen Vergleich eine Abweichung von >= 10% haben. In dem Beispiel soll also der KPI Labour Charged by Hourly Rate mit dem Februarwert verglichen werden. Und erst bei der Bedingung >=10% gegenüber den Vormonat soll der KPI, inkl. dem aktuellen Monatswert in Sheet2 übertragen werden. Schöne Grüße Jörg Sorry, hab gerade erfahren, dass ich k…