Removing Footer From PowerPoint Files - Fortra Classified Files

Question

Removing Footer From PowerPoint Files - Fortra Classified Files

Soumya R 1

Hello there,

We’re currently facing a challenging scenario involving a customer who is migrating from their existing classification solution, Titus (by Fortra: https://www.fortra.com), to Microsoft Information Protection (MIP) Sensitivity Labels.

As part of the migration, we are introducing content marking (footer) via MIP. However, many existing documents—particularly PowerPoint files—already contain footers applied through Titus. This results in dual footers appearing in the same document, which is not ideal.

While manual removal of Titus-applied footers from PowerPoint presentations is not feasible, we attempted to automate the process using PowerShell scripting. The script successfully removes footers from Word documents, but unfortunately, it does not work for PowerPoint files.

We are seeking a reliable process or solution to programmatically remove Titus-applied footers from PowerPoint presentations. Any guidance, tools, or scripting approaches that could help resolve this would be greatly appreciated.

Thanks...

Soumya R 1 Reputation point

2025-08-14T06:42:58.75+00:00

Dear Allison, Glad to hear back from you. Tried with the advised steps, but it does not work for PowerPoint files.

Thanks.
Steve Rindsberg 99,031 Reputation points MVP Volunteer Moderator

2025-08-14T15:50:06.3866667+00:00

A lot will depend on exactly how and where Titus has applied footers. It could be using PowerPoint's own footers, adding footers as text boxes (on either individual slides or on the slide master(s)/layouts).

Can you provide a link to a sample PPTX that includes Titus-applied footers so we can see how they're done? That'd save a lot of wheel-spinning.

1 answer

Your answer

Soumya R 1 Reputation point

2025-08-14T06:42:58.75+00:00

Dear Allison, Glad to hear back from you. Tried with the advised steps, but it does not work for PowerPoint files.

Thanks.
Steve Rindsberg 99,031 Reputation points MVP Volunteer Moderator

2025-08-14T15:50:06.3866667+00:00

A lot will depend on exactly how and where Titus has applied footers. It could be using PowerPoint's own footers, adding footers as text boxes (on either individual slides or on the slide master(s)/layouts).

Can you provide a link to a sample PPTX that includes Titus-applied footers so we can see how they're done? That'd save a lot of wheel-spinning.

Answer 1

Hi @Soumya R

Welcome to Microsoft Q&A forum

Regarding your concern, if the Titus footer is in text format, you can automate its removal in PowerPoint using VBA.

I have a quick test and you can try my workaround:

1.Enable Developer Tab

-Go to File > Options > Customize Ribbon.

-Check the Developer box.

2.Open VBA Editor

-Click Developer > Visual Basic.

-Insert a new module via Insert > Module.

-Paste the script

 Sub RemoveTitusFooters()
    Dim sld As Slide
    Dim shp As Shape
    Dim keywords As Variant
    Dim k As Variant
    keywords = Array("Titus", "Titus Confidential", "Titus Internal", "Titus Classified")
    For Each sld In ActivePresentation.Slides
        For Each shp In sld.Shapes
            If shp.HasTextFrame Then
                For Each k In keywords
                    If InStr(1, shp.TextFrame.TextRange.Text, k, vbTextCompare) > 0 Then
                        shp.Delete
                        Exit For
                    End If
                Next k
            End If
        Next shp
    Next sld
End Sub

3.Run the Script

-Close the editor.

-Click Developer > Macros.

-Select RemoveTitusFooters and click Run.

I hope it will be helpful for your situation

If the answer is helpful, please click "Accept Answer" and kindly upvote it. If you have extra questions about this answer, please click "Comment".

Note: Please follow the steps in our documentation to enable e-mail notifications if you want to receive the related email notification for this thread.

Allison-H 1,100 Reputation points Microsoft External Staff Moderator

2025-07-28T14:13:19.99+00:00

Hi @Soumya R

I hope this message finds you well and that everything is going smoothly on your end

I am looking forward to hearing from you if there are any update
Steve Rindsberg 99,031 Reputation points MVP Volunteer Moderator

2025-07-28T18:37:56.4966667+00:00

There's one potential problem with your code:

Deleting collection members in a For Each/Next loop will give unexpected results unless you ONLY want to delete the first found instance.

If you have, say, ten items in a collection and delete the first one, you now have nine items in the collection but the loop counter is now 2. If you delete it, you've deleted the second item in the collection which was originally the third item, leaving the original second item behind.

It's better to do:

For x = Collection.Count to 1 Step -1

If SomeCondition Then Collection(x).Delete

Next

Share via

Removing Footer From PowerPoint Files - Fortra Classified Files

1 answer

Your answer