proflash
Goto Top

Excel per Button Pivot Tabelle anzeigen

Moin,

ich habe folgendes Problem. Ich bin blutiger Anfänger was Sachen Makros in Excel angeht und wollte gerne ein Button erstellen welcher dann eine bestimmte Pivot Tabelle ausgibt bzw anzeigt. Mein bissheriges Skript sieht so aus:

Sub Test1()

Dim b As Range, str As String
For Each b In Sheets("Schrank 1").[a5:l9]  
str = str & b & Chr(10)
Next
MsgBox str

End Sub

Allerdings werden die Werte dann nicht als Tabelle angezeigt, sodass die Tabelle unbrauchbar wird (Siehe Bild 1) .
Gibt es eine Lösung die Tabelle so anzeigen zu lassen, das die Tabelle auch als Tabelle angezeigt wird?
Es muss nicht unbedingt Msgbox sein aber die Tabelle soll halt einzeln angezeigt werden.

Vielen Dank!

MfG
Niklas
bild 1

Content-ID: 4946816357

Url: https://administrator.de/contentid/4946816357

Ausgedruckt am: 21.11.2024 um 17:11 Uhr

4863114660
Lösung 4863114660 13.12.2022 aktualisiert um 12:06:14 Uhr
Goto Top
Bau dir eine eigene Form, darauf setzt du eine Listbox und gibst dann den Range der Tabelle als RowSource an.

https://we.tl/t-TKTodn3yRY

screenshot

Gruß s.
ProFlash
ProFlash 13.12.2022 um 12:10:17 Uhr
Goto Top
Hallo,
danke für die Antwort. So wie bei dir hätte ich das gerne. Allerdings bin ich ein absoluter Anfänger und kann mit der Antwort leider nicht viel anfangen.
Kannst du mir auch sagen wie man das umsetzt?

Danke :D


Zitat von @4863114660:

Bau dir eine eigene Form, darauf setzt du eine Listbox und gibst dann den Range der Tabelle als RowSource an.

https://we.tl/t-TKTodn3yRY

screenshot

Gruß s.
4863114660
4863114660 13.12.2022 aktualisiert um 12:12:36 Uhr
Goto Top
Lade dir doch einfach das verlinkte Excel Beispiel-Dokument dazu runter darin findest du den Code. Mehr Silbertablett geht doch nicht ...
ProFlash
ProFlash 13.12.2022 um 12:18:08 Uhr
Goto Top
Ahh super!

Danke hab den Link übersehen :D

Vielen Dank