>I'm new to VFP so please forgive me!

Forgive?? What for??? :)
Everybody´s here to learn. ;)

try this one:

OutFilename" "
OutFilename = GETFILE('xls', 'Create .xls:', 'OK', 0,   'Report in')
OutFilename = ["] + OutFilename + [.xls"]
IF frmmain.opgType.optCompany.VALUE =1
	USE viaiaallasc
	copy to (OutFilename) TYPE XLS
ELSE
	USE vfdfdallasc		
	COPY TO (OutFilename) TYPE XLS
ENDIF