kastnerp

{
    "$schema": "https://aka.ms/terminal-profiles-schema",
    "actions": 
    [
        {
            "command": 
            {
                "action": "copy",
                "singleLine": false
            },

kastnerp

# inspired by this post https://stackoverflow.com/a/65677170/4876516 by https://stackoverflow.com/users/334346/oleg

import numpy as np
import cv2 as cv

def stack_images(img_list, how, fill_color):
    max_height, max_width = 0, 0
    padding = 200  # 200
    total_height, total_width = padding, padding  # padding
    mult_by = 0 if fill_color == 'black' else 255

kastnerp

Sub ExportSectionsToPDF()
    Dim pptPresentation As Presentation
    Dim tmpPresentation As Presentation
    Dim slideCount As Integer
    Dim i As Integer
    Dim sectionCount As Integer
    Dim sectionName As String
    Dim sectionStart As Integer
    Dim filePath As String
    Dim baseFileName As String

kastnerp

Sub ConvertToPDFHighQuality()
    Dim pdfFileName As String
    Dim activePresentationPath As String

    ' Get the full path of the active presentation
    activePresentationPath = ActivePresentation.FullName

    ' Create a PDF filename based on the original PowerPoint filename
    pdfFileName = Replace(activePresentationPath, ".pptx", "_HighQuality.pdf")   ' Make sure to replace .pptx with .pptm if macro is saved with presentation
    pdfFileName = Replace(pdfFileName, ".pptm", "_HighQuality.pdf")