Macro to create multi subfolders

[Caveman1964]

Hi! please help. Beginner here.
I want to create this from a macro.

L:\Packets"data from cell A1""data from cell A2"data from A1 then Material at the end of it".xlsm

so it would look something similar in the directory when finished;
L:\Packets\Wheelbarrel\12345678\12345678Material.xlsm

What I have is a mess....its getting worse each time I amend! ugh.........any help is much appreciated.
Thanks

 

[JLGWhiz]

Dim fPath As string
With ActiveSheet
 fPath = "L:\Packets" & "\" & .Range("A1").Value & "\" & .Range("A2").Value & "\" & .Range("A3").Value & "Material.xlsm"
End With

This puts your directory path in a variable which you can then use throughout the code to save space when you need to referto the file.