I have this working, but would like to know if there is a way to do this
without using my tempDir variable (just can't wrap my head around this!).

The goal is to strip off the filename and one folder name. Here is what I
am using:
fullPath = ActiveWorkbook.FullName
tempDir = Left(fullPath, InStrRev(fullPath, "\") - 1)
exportDir = Left(fullPath, InStrRev(fullPath, "\") - 1)

Can this be done without tempDir?

Thank you,
Judy