Copying to multiple directories

I asked this in another area, thought I would move it here as the issue is on a W2K box.

I have a subdirectory that I need to create in multiple similar directories. I would prefer to accomplish this through automation rather than adding each individually, one at a time.

The structure looks something like below:

R:\Project Folder\xxxSeries\PRyyy\Current\Data\Tooling\ where xxx is a number 800, 900, 1000, 1100 etc. and yyy is also number inside that series x00-x99.
Example:
R:\Project Folder\800Series\PR851\Current\Data\Tooling\

I would like to add the subdirectory \3D to each of these (roughly 900 instances)
Example:
R:\Project Folder\800Series\PR851\Current\Data\Tooling\
to become:
R:\Project Folder\800Series\PR851\Current\Data\Tooling\3D\

I could use the XCOPY command with the /E switch to copy the directory in but I still need a way to wildcard the directory into the parent.
Example:
R:\Project Folder\800Series\PR8xx\Current\Data\Tooling\ were xx is a wildcard. I will also need to overcome the space in the wordking Project Folder.

The Directory Structure is already in place, I just need to add the single folder to each of the directories.

Any ideas?