Per Dropdown Zeilen bzw. Datensets hinzufügen
Hallo zusammen,
ich möchte einer Übersicht für vermietete Objekte erstellen und habe dazu eine Vorlage erstellt. Innerhalb dieser Vorlage soll folgendes möglich sein:
per dropdown-Auswahl möchte ich die Anzahl der Wohneinheiten je Wohnhaus ausgeben (soweit bin ich) und anhand dieser Anzahl entsprechende oder mehrere neue Zeilen in der Vorlage einfügen. Wähle ich also 2 Wohneinheiten aus der Liste auswähle, sollen 4 neue Zeilen (je zwei Zeilen pro Anzahl) darunter eingefügt werden. Überragend wäre, wenn nicht jedes mal leere Zeilen, sondern ein festes Layout eingefügt würde. Ob das jedoch möglich ist, weiß ich nicht. Vielleicht mit PowerBi?
Weiß jemand, ob das einfügen eines solchen "Datenlayouts" möglich ist bzw. wie das ginge?
Beste Grüße
ich möchte einer Übersicht für vermietete Objekte erstellen und habe dazu eine Vorlage erstellt. Innerhalb dieser Vorlage soll folgendes möglich sein:
per dropdown-Auswahl möchte ich die Anzahl der Wohneinheiten je Wohnhaus ausgeben (soweit bin ich) und anhand dieser Anzahl entsprechende oder mehrere neue Zeilen in der Vorlage einfügen. Wähle ich also 2 Wohneinheiten aus der Liste auswähle, sollen 4 neue Zeilen (je zwei Zeilen pro Anzahl) darunter eingefügt werden. Überragend wäre, wenn nicht jedes mal leere Zeilen, sondern ein festes Layout eingefügt würde. Ob das jedoch möglich ist, weiß ich nicht. Vielleicht mit PowerBi?
Weiß jemand, ob das einfügen eines solchen "Datenlayouts" möglich ist bzw. wie das ginge?
Beste Grüße
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 2976426820
Url: https://administrator.de/contentid/2976426820
Ausgedruckt am: 26.11.2024 um 11:11 Uhr
3 Kommentare
Neuester Kommentar
Servus.
Kleines Makro erledigt dir das bspw,
Demo-Mappe zum Download:
create_rows_from_template_2976426820.zip
Grüße Uwe
Kleines Makro erledigt dir das bspw,
Private Sub comboCount_Change()
With Application
' if not numeric exit sub
If Not IsNumeric(comboCount.Value) Then
Exit Sub
End If
' disable screen updating
.ScreenUpdating = False
With ActiveSheet
' for selected value add times 2 = number fo items to add
For i = 1 To CInt(comboCount.Value) * 2
'copy template range
.Range("A4:E4").Copy
' paste in next free row
.Cells(Rows.Count, "A").End(xlUp).Offset(1, 0).PasteSpecial xlPasteValuesAndNumberFormats
Next
End With
.CutCopyMode = False
' enable screen updating
.ScreenUpdating = True
End With
End Sub
Demo-Mappe zum Download:
create_rows_from_template_2976426820.zip
Grüße Uwe