Replies

Steve,

This is driving me nuts! It seems that FileCopy won’t take wildcards? As I remember using it with XP and Access 2002 that worked just fine.

You might want to check this out.

The only way I could get FileCopy to work was with full path/filenames on both the source and destination.

May the Forces of good computing be with you!

RG

PowerShell & VBA Rule!
Computer Specs

Sorry for the confusion. When checking for a directory do as follows:

Code:

Sub CreateDir()
  
If Dir("G:BEKDocsRUGCalculator", vbDirectory) = "" Then
   MkDir "G:BEKDocsRUGCalculator"
Else
   MsgBox "Directory Exists", vbOKOnly
End If

End Sub

This code executes w/o errors whether the directory exists or not.

May the Forces of good computing be with you!

RG

PowerShell & VBA Rule!
Computer Specs

Chuck,

I just conducted a test on my Laptop that has Office 2007 and I had no trouble placing a text box, inserting a graphic, putting a caption on the graphic {via right-click context menu}, then converting the textbox to a Frame. I then followed the same procedure to insert a new text box above the first and the captions automatically renumbered. See attached.

May the Forces of good computing be with you!

RG

PowerShell & VBA Rule!
Computer Specs

They should show up in Windows Update.

May the Forces of good computing be with you!

RG

PowerShell & VBA Rule!
Computer Specs

Chuck,

It seems the program RootsMagicToGo is expecting a disk {in this case a USB device according to a google search}. You may want to uninstall this program.

Addendum: I see this is a Genealogical program so you may not want to uninstall it but you at least need to figure out which USB device it is trying to write to.

May the Forces of good computing be with you!

RG

PowerShell & VBA Rule!
Computer Specs

Jim,

For some reason you may not have the latest Certificate for Microsoft installed in IE. Do you ever get follow on messages about out of date certificates?

May the Forces of good computing be with you!

RG

PowerShell & VBA Rule!
Computer Specs

Chuck,

Convert the text boxes to Frames and the numbering will work.

May the Forces of good computing be with you!

RG

PowerShell & VBA Rule!
Computer Specs

Jefferson,

That little idea I could have used 20 years ago when I was writing training manuals and course material! Gets a Big Thumbs UP from me!

Kathi,

Nice adaptation!

May the Forces of good computing be with you!

RG

PowerShell & VBA Rule!
Computer Specs

Thanks for the tip. i ended up doing this:

On Error Resume Next <– this forces the routine to complete; otherwise I get file/path error and execution halts.

If Dir("C:RUGCalculator") = "" Then
MkDir ("C:RUGCalculator")
Else
If Dir("C:RUGCalculator*.*") = "" Then
RmDir ("C:RUGCalculator")
MkDir ("C:RUGCalculator")
End If
End If

If you drop the trailing on the check for the Directory, e.g. If Dir("C:RUGCalculator") = "" Then
it should eliminate the error, actually you can remove them from the RmDir & MkDir also!

May the Forces of good computing be with you!

RG

PowerShell & VBA Rule!
Computer Specs

Paul,

Since the & is used to denote special fields in the header/footer you need to use a && to get a single & to print.

May the Forces of good computing be with you!

RG

PowerShell & VBA Rule!
Computer Specs

Attached are 3 pages from a course I created on Excel databases years ago so the screen shots are dated but the concepts are all still the same. I hope this helps.

Also note the sheet I posted has the Criteria range blank which equals all records, see the note with the bomb icon in the attached pages.

BTW: When using the Advanced Filter it helps if you have labels at the top of your columns, you’ll notice I added it to the sheet you posted.

Post back if you need more help.

May the Forces of good computing be with you!

RG

PowerShell & VBA Rule!
Computer Specs

Seems to work for me here’s the workbook.
Note the Defined Names of Database, Criteria, Extract! If you use these names to define your ranges the Advanced Filter dialog will pick up the ranges automatically.

Note: I did this test in 2003 converting the file in both directions.

May the Forces of good computing be with you!

RG

PowerShell & VBA Rule!
Computer Specs

Steve,

If dir(“drive:path*.*) = “” then ‘File is empty

End if

May the Forces of good computing be with you!

RG

PowerShell & VBA Rule!
Computer Specs

Pat,

Check this out! The next post says it works!

May the Forces of good computing be with you!

RG

PowerShell & VBA Rule!
Computer Specs

Stumped,

Right Click on the update and you will be given the option to hide. I did it with this same update.

May the Forces of good computing be with you!

RG

PowerShell & VBA Rule!
Computer Specs