nome dinamico com valores de 2 celulas?

Question

ola, estou tentando criar uma macro para salvar arquivos com informações de duas celulas

uma celula fica a data nesse formato dd mm aa e a outra o nome 

preciso q o arquivo salvo fique assim: dd mm aa nome

estou usando o seguinte codigo mas só consigo capturar informação de uma das celulas

Sub Salvando()
Dim Nome As String
Dim SDate As String
Dim MyLocal As String
MyLocal = "D:\Documents\samsung\"
Nome = Range("B9").Value
SDate = Now
If Nome <> vbNullString Then
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
MyLocal & Nome & ".pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
False
MsgBox "O arquivo " & Nome & " foi salvo em " & SDate & ".", vbOKOnly, "Salvo"
Else
MsgBox "Nome do arquivo inválido", vbOKOnly, "Salvo"
End If
End Sub