Set file extention as variant

Hello.

I have a button the runs Application.GetOpenFilename And puts the output filepath into a label.

I then have another button that opens a inputbox asking to change the file name and then copys the file from above path to my destenation.

when setting the destination i use ThisWorkbook.Path & Application.PathSeparator & "Images" & Application.PathSeparator

and the imputbox value as the filename.

doing it like this it wont alocate a extention for the file ".jpg,ect".
The label.caption has the .ext and i would like to be able to store everythink after the . as a variant.

Thankyou.

This code will error if there is no . in the file name

Please Login or Register  to view this content.