[In case non-Superusers (like me) get here, this is easy; see appended below]
Based on the answer above provided by Steve Rindsberg (Thank you so much!!!), the following code creates individual PNGs at 3840 pixels width (i.e. width for standard 4K resolution) for all slides in the current PPTX file. This is ideal e.g. for image output for on-screen poster presentations or for supplementary image output for scientific figures. I have been going crazy (PDF-printing and -exporting, PNG-exporting, including third-party plugins, all at bad output resolutions for bitmaps) until I came across Steve's code. Tested for Office 2021.
Sub ExportMe()
Dim ExportPath As String
Dim Pixwidth As Integer, Pixheight As Integer
Dim oSlide As Slide
' Edit to suit. Set whatever value you like here
Pixwidth = 3840
' Set height proportional to slide height
Pixheight = (Pixwidth * ActivePresentation.PageSetup.SlideHeight) / ActivePresentation.PageSetup.SlideWidth
ExportPath = ActivePresentation.Path & "\"
For i = 1 To ActivePresentation.Slides.Count
Set oSlide = ActivePresentation.Slides(i)
With oSlide
.Export ExportPath & "Slide" & CStr(.SlideIndex) & ".PNG", "PNG", Pixwidth, Pixheight
End With
Next
End Sub
[For amateurs like me: press <Alt>+<F11> in PowerPoint to get to the VBA editor and then on the left-hand side right-click on VBAProject (Filename)" or "Modules" to choose "Insert>Module" in the context menu and then to paste the code above in the newly created "Module1 (Code)" window. Press F5 (or click the Play button) to run the macro and check in the file directory if the PNGs have been created. To save the file with the macro, Save As .PPTM format afterwards.]