Verwandte Themen

Bommel15
08.05.2019, 12:06
Wie schaffe ich es im Power Query-Editor Zeilen "zusammenzufassen"?

Hallo zusammen,

ich habe folgendes Problem. Ich möchte gerne eine etwas größere JSON-Datei in Excel importieren. Hierbei habe ich im Power Query-Editor eine Tabelle konvertiert. Jedoch sind in dieser Tabelle noch Werte mit "List" und diese habe ich dann wiederum mit dem Symbol (zwei Pfeile: einer nach rechts und einer nach links) aufgeklappt ("auf neue Zeilen ausweiten"), somit quasi eine Tabelle in einer Tabelle.

Jetzt jedoch sieht meine Tabelle wie folgt aus:

Owner ID Entity Code Entity Type RefCode Name Com Add

CY_CBC PSD_357 PSD_EMI 115.1.3.26 null nulll null

CY_CBC    PSD_357       PSD_EMI      null    Sureswipe    nulll      null

CY_CBC    PSD_357       PSD_EMI    null     null                Revsto     null

CY_CBC    PSD_357       PSD_EMI      null                 null                null 18 Kyriacou

Ich möchte jedoch, dass die Tabelle keine Zellen mit null hat, sondern die kompletten Werte in einer Zeile dargestellt werden, da es sich um den selben Owner handelt. Das heißt:

Owner ID  Entity Code  Entity Type   RefCode       Name            Com         Add

CY_CBC    PSD_357       PSD_EMI      115.1.3.26   Sureswipe    Revsto     18 Kyriacou

Ich hoffe jemand versteht mein Problem und kann mir weiterhelfen.

Liebe Grüße Jessica

Computer, Microsoft Excel, Schule, JSON-Datei
1 Antwort
GeniusBulldog
05.05.2019, 11:55
Mit Links
flexible Excel Dropdownliste erstellen?

Hallo zusammen,

Vorgeschichte zur Tabelle:

Ich habe eine Tabelle, welche als Rechenhilfe dienen soll. In dieser Tabelle gibt es einen Bereich, in dem man verschiedene Produkte per Dropdown auswählen kann. Es können mehrere Produkte in den Bereich eingefügt werden. Dahinter werden per SVERWEIS automatisch je nach Auswahl die Preise gezogen und im Anschluss unten addiert. Derzeit gibt es darunter einen Bereich in dem ich mögliche Rabatte manuell einschreiben kann, welche im Anschluss von der Summe subtrahiert werden.

Mein aktueller Plan:

Ich möchte für die Rabatte ebenfalls Dropdownlisten, damit schnell alle möglichen Rabatte ausgewählt werden können und dahinter wieder ein SVERWEIS stehen kann um den Rabatt in € anzuzeigen und in die Rechnung mit einzubeziehen.

Meine Hürden:

Ich möchte, dass die Dropdownliste für die Rabatte auch nur die Rabatte anzeigt, welche für die oben ausgewählten Produkte möglich sind, damit die Liste nicht unnötig lang wird (Beispiel: Es gibt 3 Produkte, pro Produkt gibt es ca. 3 Rabatte. Komplette Liste würde daher 9 Rabatte anzeigen, obwohl oben nur 2 Produkte ausgewählt sind. Es sollen also nur die 3 Rabatte für Produkt 1 und die 3 Rabatte für Produkt 2 in den Dropdownfeldern angezeigt werden.)

Optional würde ich auch gern noch einen Schritt weiter gehen und sagen können, wenn Rabatt 1 bereits ausgewählt wurde, zeige diesen und weitere nicht kombinierbare in den nächsten Zellen des Bereiches nicht mehr im Dropdown an.

Hier die Excel mit dem Beispiel des aktuellen Stands: Download "Rechenhilfe_Beispiel.xlsx

Ich hoffe jemand von euch hat einen Tipp für mich :S

vielen Dank vorab :)

Computer, Office, Microsoft Excel, Dropdownliste
3 Antworten
fatih1995497
25.03.2019, 03:07
Mit Bildern
VBA Programmierung - Automatischer Email versandt Probleme?

Hallo ich hoffe Ihr könnt mir helfen :/

Folgendes Problem: Wenn ich die Mail versende, öffnen sich für jede Zeile eine extra Email und leider auch nur jeweils ein Empfänger und einer in cc.

Was muss ich nun in der Programmierung hinzufügen, um nur eine Email geöffnet zu bekommen, mit mehreren Empfängern (Falls mehrere Kreuze gesetzt worden sind). Ich danke euch echt wenn Ihr mir helfen können :/

Ich habe mir die Bausteine aus dem Internet zusammengesetzt, bin daher kein Profi darin.

Programmtext:

Private Sub Send_Email()
   '-------------< Send_Email() >-------------
   Dim sTitle As String
   sTitle = "Test-HTML Email from Excel"
   '< HMTL holen >
   Dim sTemplate As String
   sTemplate = Sheets("ini_Vorlage").Shapes(1).TextFrame2.TextRange.Text
   '</ HMTL holen >
   '----< Send with Outlook >----
   Dim app_Outlook As Outlook.Application
   Set app_Outlook = New Outlook.Application
   '--< Email einstellen >--
   Dim objEmail As Outlook.MailItem
   Dim sEmail_Addresscc As String
   Dim sEmail_Address As String
   Dim iRow As Integer
   For iRow = 4 To 100
       If Cells(iRow, 21) = "x" Then
           '< get Email Address >
           'Column 2, B
           sEmail_Address = Cells(iRow, 19)
           sEmail_Addresscc = Cells(iRow, 20)
           '</ get Email Address >
           '< Fill Placeholders >
           Dim sHTML As String
           sHTML = Replace(sTemplate, "[@Name]", sEmail_Address)
           '</ Fill Placeholders >
           '--< Send Email >--
           Set objEmail = app_Outlook.CreateItem(olMailItem)
           objEmail.To = sEmail_Address
           objEmail.CC = sEmail_Addresscc
           objEmail.Subject = sTitle
           'objEmail.HTMLBody = sHTML 'use .HTMLBody for HTML
           objEmail.Body = sHTML      'and .body for pure Text
           objEmail.Display
           '--</ Send Email >--
       End If
   Next
   '< Abschluss >
   Set objEmail = Nothing
   Set app_Outlook = Nothing
   '</ Abschluss >
   MsgBox "Emails erstellt", vbInformation, "Fertig"
   '----</ Send with Outlook >----
   '-------------</ Send_Email() >-------------
End Sub

Bild zum Beitrag
Computer, Microsoft Excel, E-Mail, programmieren, VBA, VBA Programmierung, VBA Excel, makros erstellen
2 Antworten

Meistgelesene Beiträge zum Thema Microsoft Excel
Mehr meistgelesene Fragen zu Microsoft Excel