Inserting Picture with Variable [Closed]

Hello Guys,

I am trying to insert an image into a particular cell by calling the value stored in the variable via an InputBox. The following code is showing error. Kindly help me. Thank u :)

Sub image()

Dim x As String
x = InputBox("insert image name")


ActiveSheet.Pictures.Insert( _
"G:\PEP\04.Kaizen\KAIZEN Audit\02 Auditfragebögen\5S questionaire\ x "). _
End Sub

Subscribe To Our Newsletter!

The Best of CCM in Your Inbox

Subscribe To Our Newsletter!