Macropod,

Thanks so much for your response.

I tried your suggested code for the Sub CmdTarget_Click() module,
but on the line:

ListBox3.Column(1, i) = Split(TargetFile, "\")(UBound(Split(TargetFile, "\"))) 'gets the filename

I get a run-time error 381 - Could not set the column property. Invalid property array index.

This module worked fine in the version I sent you. Its purpose is to open a file dialog box filtered for Word-type files and populate Listbox3 with the user-selected files (these are the target files to which the styles are to be copied). The problem I'm having is with the Sub CmdCopyStyle_Click module, which I intended to loop through both the styles list and the target files list and copy those styles to those files.

If you need more code to review, or even the userform itself, I would be happy to send you offline. I'm completely at a loss as to how to make this work.

By the way, what are code tags and how do I use them?