|
Excel : Pivottabellen und Datumsfilter
Axel.Strasser am 27.09.2008 um 15:24 Uhr (0)
Mit Excel 2007 gibt es ja jetzt sehr sehr viele neue Möglichkeiten. Ich habe eine Tabelle mit die vom Datum abhängen. Wenn ich jetzt eine Pivot Tabelle erstelle kann ich sehr schön das Datum über den Datumsfiletr auswählen, aber nur wenn ich das Datum bei den Zellen oder Spalten integriere. Ich würde es aber gerne dies im Berichtsfilter so haben, da scheint es nicht zu gehen. Warum nicht? Mach ich da was falsch oder hat MS die Funktionalität noch nicht fertig implementiert ? Ein Quartal Datum für Datum aus ...
|
| In das Form Excel wechseln |
|
Excel : Pivot Tabellen und vb
Axel.Strasser am 16.07.2010 um 10:58 Uhr (0)
Bei mir laufen beide problemlosich habe das Ganze inzwischen anders gelöst:Code: Dim pvItem As PivotItem With Sheets(BlattNameAbrechnung).PivotTables("Abrechnung").PivotFields("Department") .ClearAllFilters For Each pvItem In .PivotItems Select Case pvItem.Name Case "Abteil ABC" pvItem.Visible = False Case Else do nothing End Select Next End WithDamit geht es, ich habe inzwischen im Internet noch gefunden, dass vba und Pivot Tabellen manchmal etwas ungewöhnlic ...
|
| In das Form Excel wechseln |
|
Excel : Excel von vbs aus starten
Axel.Strasser am 16.04.2009 um 09:38 Uhr (0)
Also nur für die, die es mal brauchen, ich konnte es über einen Trick lösen:Code:set objXL_1 = WScript.CreateObject("Excel.Application")Set objXL_2 = WScript.CreateObject("Excel.Application")objXL_1.UserControl = FalseobjXL_1.Interactive = TrueobjXL_1.ScreenUpdating = FalseobjXL_1.Visible = FalseSet objWB = objXL_1.Workbooks.AddSet objWS = objWB.Worksheets.Add...objWB.SaveAs ExcelFileobjWB.CloseobjXL_1.quitset objXL_1 = Nothing objXL_2.UserControl = TrueobjXL_2.Interactive = TrueobjXL_2.ScreenUpdating = Tr ...
|
| In das Form Excel wechseln |
Auswertung.xls.txt |
Excel : Ranking erstellen
Axel.Strasser am 25.11.2012 um 00:01 Uhr (0)
Ich habe ein Problem zu dem ich noch keine richtige Lösung gefunden habe:Ich habe eine Tabelle in der ich ein Ranking erstellen will. In der ersten Spalte habe ich Teilnehmer, in der zweiten gehören sie einer Gruppe an (zwei unterschiedlichen) in der dritten Spalte erzielen sie Punkte und in der vierten will ich das Ranking für die Teilnehmer haben. ABER: Ich will das Ranking entweder für die Gruppe 1 oder die Gruppe2 oder für beide erstellen können. Ich habe es mit dem Filter versucht geht nicht. Irgendwi ...
|
| In das Form Excel wechseln |
|
Excel : Application.ActivePrinter
Martin_0103 am 13.03.2007 um 14:42 Uhr (0)
Hallo Zusammen,ich habe vor einiger Zeit folgendes Macro erstellt:Code:Sub freepdfdrucken() Range("A1").Select Application.ActivePrinter = "FreePDF XP auf Ne02:" ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _ "FreePDF XP auf Ne02:", Collate:=TrueEnd SubEs funktioniert super auf meinem PC. Auf einem Anderen jedoch nicht!Folgende Fehlermeldung erscheint:Laufzeitfehler 1004:Die Methode ActivePrinter für das Objekt _Application ist fehlgeschlagenGeh ich auf Debuggen wird die Zeile: App ...
|
| In das Form Excel wechseln |
|
Excel : Tabellenbereich mit Makro markieren.
moppesle am 17.04.2014 um 15:44 Uhr (1)
Hallo zusammen,ich möchte einen Tabellenbereich automatisch markieren und einen Rahmen zuweisen.Die leetzte befüllte Zelle suche ich mit:Code:letztezelle = Worksheets(sNameNewWorksheet).Range("A1").SpecialCells(xlCellTypeLastCell).Address MsgBox letztezelleIn der MsgBox aber kommt z.B.$K$12Nun wollte ich diesen Wert in der nächsten Spalte einbauen. Leider ohne Erfolg.Code:Worksheets(sNameNewWorksheet).Range(Cells(A, 8), Cells(letztezelle)).SelectHat jemand Rat?------------------Gruß UweAuch Catia ist nur e ...
|
| In das Form Excel wechseln |
|
Excel : Vergleich mit vb
Axel.Strasser am 11.08.2010 um 17:04 Uhr (0)
Irgendwie stehe ich auf dem Schlauch. Ich habe folgenden Code:Code:If Sheets(BlattNameAbrechnung).Cells(j, 14).Value Sheets(BlattNameDefaultFlex).Cells(8, 2).Value Then MsgBox IsNumeric(Sheets(BlattNameAbrechnung).Cells(j, 14).Value) & " " & IsNumeric(Sheets(BlattNameDefaultFlex).Cells(2, 8).Value) & vbCrLf & _Sheets(BlattNameAbrechnung).Cells(j, 14).Value & " " & Sheets(BlattNameDefaultFlex).Cells(2, 8).Value ExitTotalSum = TrueEnd IfBeide Vergleichswerte sind numerisch (Wahr) und der erste Wert ist ...
|
| In das Form Excel wechseln |
|
Excel : benutzerdefinierte Funktion
runkelruebe am 31.10.2006 um 19:45 Uhr (0)
was ist eigentlich aus Frederiks Vorschlag geworden?Code:Application.MacroOptions Macro:="VOL2", Description:="Berechnet Volumen"....usw.der funktioniert doch und macht fast keinen Aufwand!alternativer Vorschlag: im Pfad C:Dokumente und EinstellungenusernameAnwendungsdatenMicrosoftExcelXLSTART habe ich einfach noch eine xlDatei gespeichert und siehe da: sie wird ebenfalls geöffnet beim excel-Start (die Überraschung hielt sich in Grenzen ) Wenn ich jetzt dieser extra-mappe die Eigenschaft isAddin zuteile ( ...
|
| In das Form Excel wechseln |
|
Excel : Pivot (Diagrammdarstellung nicht Aktuell)
Axel.Strasser am 29.01.2008 um 15:18 Uhr (0)
Ich muss Runkelrübe zuerst mal recht geben, es ist nicht ganz klar was Du willst. Ich versuche aber trotzdem mal eine Antwort:Also IMHO sollte das mit dem Update so funktionieren, dass auch die Feldliste angepasst wird. Ich bin froh, dass ich den Update manuell anstossen kann. Ich habe teilweise Pivottabellen aus Access Dateien (da ich nicht mehr genügend Zeilen in Excel habe ) und da braucht der Update schon eine Zeitlang.Was Du aber mach kannst ist, wenn Du mehrere Pivots hast, die auf die gleiche Source ...
|
| In das Form Excel wechseln |
|
Excel : Application.ActivePrinter
Paulchen am 13.03.2007 um 14:55 Uhr (0)
Hallo,"Application.ActivePrinter" liefert bei mir den Standarddrucker. Ist das jeweils der gleiche auf beiden Rechnern?[thedit] Ich war wohl etwas voreilig, da ihr ja beide zuweist und nicht abfragt - darauf bezieht sich meine Zeile oben. Allerdings meine ich, eine zweifache Zuweisung herauszulesen? Ungetestet lese ich bei MartinCode:...Application.ActivePrinter = "FreePDF XP auf Ne02:"ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:="FreePDF XP auf Ne02:", C...und frage mich, ob das erforder ...
|
| In das Form Excel wechseln |
|
Excel : Zeilen einfügen
Paulchen am 25.01.2011 um 09:36 Uhr (0)
Hallo DrOsh2,wie viele Zeilen sind es denn? Fünf - oder 200?Wenn Du eine Zeile kopierst, kannst Du (in xls2007 leider nur einmalig) die Kopierten Zeilen einfügen.Für Handarbeit lassen sich mit der Strg-Taste mehrere Zeilen auswählen, dann Strg + + um Leerzeilen dazwischen einzufügen. In einem zweiten Lauf kannst Du dann die Original-Zeile kopieren, einfügen und via Strg + V (oder Strg + Y) wiederholt einfügen.Sind es eher an die 200 Zeilen, dann hilft wohl nur VBA - die Prinzipien von oben lassen sich dabe ...
|
| In das Form Excel wechseln |
|
Excel : Probleme beim Drucken
Axel.Strasser am 20.07.2010 um 17:07 Uhr (0)
Es wird nach jeder Zeile ein Seitenumbruch gemacht. Ich habe das Gefühl es liegt am Druckertreiber (weiss jetzt auch nicht genau warum), habe inzwischen den Drucker geändert und dann ging es . Wenn es ansonsten an der Formatierung der Zeile 33724 liegen sollte, warum mascht sich das erst beim Ausdruck auf eine Seite breit bemerkbar ? Wenn ich umstelle, geht die Skalierung auf 10 %. Axel------------------Inoffizielle deutsche CATIA Hilfeseite Netiquette von cad.de[Diese Nachricht wurde von Axel.Strasser a ...
|
| In das Form Excel wechseln |
|
Excel : Zeilenhöhe Anpassen mit Minimalhöhe
moppesle am 20.11.2015 um 08:02 Uhr (1)
Hallo zusammen,ich benötige in einer Vorlage eine minimale Zeilenhöhe von z.B. 20.Zusätzlich sollte Zeilenhöhe automatisch anpassen eingestellt sein wenn mehrzeiliger Text eingefügt wir.Wird dieser Text dann gelöscht wir die Zeile auf Höhe "X" zurückgesetzt und passt sich der Schriftgröße an.Dann entspricht die Zeilenhöhe nicht mehr dem vor eingestellten Wert Im Moment behelfe ich mir mit einen Pseudotext den ich in den Zeilen außerhalb des Arbeitsbereich erstellen und verdecke.Gibt es dazu eine elegantere ...
|
| In das Form Excel wechseln |
