|
Excel : VBA Excel Tabelle zusammenfassen
eday am 01.06.2015 um 19:38 Uhr (1)
Hallo,ich bin gerade dabei ein Makro zu erstellen und möchte dabei eine Tabelle zusammenfassen. Dabei sollen alle Zeilen von der Spalte F durchsucht werden. Falls der Inhalt (String) gleich ist, soll der Wert (Int) welcher in der gleichen Zeile, aber in Spalte E, ist aufaddiert werden und somit soll die Tabelle kleiner werden um unnötige Zeilen zu sparen: Datum X Y Z Wert Text2.3 a b c 4 bla 3.5 a b c 8 lala 9.6 a b c 3 ...
| | In das Form Excel wechseln |
|
Excel : VBA Excel Tabelle zusammenfassen
eday am 02.06.2015 um 21:19 Uhr (1)
Hallo Klaus Hallo Tobias,Vielen Dank für eure Antwort! Ich habe folgenden Code der super funktioniert:Option Explicit Sub summary()Dim rng As Range, rngC As RangeDim lngCol As Long On Error Resume NextApplication.ScreenUpdating = False With ActiveSheet Set rng = .ListObjects(1).Range If rng Is Nothing Then Exit Sub .Copy after:=ActiveSheetEnd WithWith ActiveSheet .Name = rng.Parent.Name & " Summary" If .AutoFilterMode Then .ShowAllData .Range(.Cells(1, 7), .Cells(1, 8)) = "XXX" .Range(.Cells(2, 7), .Cells ...
| | In das Form Excel wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |